From 1c0d75b011c959dde1d395a4a894e7239a789aa5 Mon Sep 17 00:00:00 2001
From: Robin Stoker <robin.stoker@aareon.nl>
Date: Thu, 5 Jun 2025 14:45:50 +0000
Subject: [PATCH] WAGE#85401 -- Deze was nog niet aangemaakt, default m2m
 procedure

svn path=/Customer/trunk/; revision=69319
---
 WAGE/wage.sql | 48 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100644 WAGE/wage.sql

diff --git a/WAGE/wage.sql b/WAGE/wage.sql
new file mode 100644
index 000000000..75a9b80d0
--- /dev/null
+++ b/WAGE/wage.sql
@@ -0,0 +1,48 @@
+--
+-- $Id$
+--
+-- Script containing customer specific sql statements for the WAGE database
+
+DEFINE thisfile = 'WAGE.SQL'
+DEFINE dbuser   = 'WAGE'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT;
+WHENEVER SQLERROR CONTINUE;
+SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
+SPOOL &fcltlogfile
+WHENEVER SQLERROR EXIT;
+SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+---------------------------------------
+PROMPT &fcltcusttxt
+---------------------------------------
+SET DEFINE OFF
+
+------ payload begin ------
+
+CREATE OR REPLACE PROCEDURE wage_processemail (pfrom        IN VARCHAR2,
+                                               pto          IN VARCHAR2,
+                                               psubject     IN VARCHAR2,
+                                               pbody        IN VARCHAR2,
+                                               psessionid   IN VARCHAR2,
+                                               pemailkey    IN NUMBER)
+AS
+BEGIN
+fac.processemail (pfrom, pto, psubject, pbody, psessionid);
+END;
+/
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 0); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile