Compare commits

...

2 Commits

  1. 4
      superx/WEB-INF/conf/edustore/db/conf/build.xml
  2. 93
      superx/WEB-INF/conf/edustore/db/install/conf/kern.xml
  3. 14
      superx/WEB-INF/conf/edustore/db/install/prozeduren/proc_decval_ids.sql
  4. 11
      superx/WEB-INF/conf/edustore/db/install/prozeduren/proc_decval_pg.sql
  5. 4
      superx/WEB-INF/conf/edustore/db/install/upgrade/kernmodul_upgrade_man.sql

4
superx/WEB-INF/conf/edustore/db/conf/build.xml

@ -576,10 +576,10 @@ xmlns:HtmlUtils="de.superx.util.HtmlUtils"> @@ -576,10 +576,10 @@ xmlns:HtmlUtils="de.superx.util.HtmlUtils">
</target>
<target name="add_files_nd_his1" if="isNdModuleAndIsPlatformHIS1">
<!--rpta,etl,viz benötigt unter HIS1 ein paar Stylesheets von SuperX-KERN-Standalone 5.2-->
<!--rpta,etl,viz benötigt unter HIS1 ein paar Stylesheets von SuperX-KERN-Standalone 5.3-->
<property name="MODULE_DIR" value="../module/${MODULE}" />
<xmlproperty file="${MODULE_DIR}/conf/${MODULE}.xml"/>
<property name="KERN_DEPENDENT_URL" value="https://git.campussource.de/git/SuperX/kern/raw/branch/RELEASE_kern5.2/superx" />
<property name="KERN_DEPENDENT_URL" value="https://git.campussource.de/git/SuperX/kern/raw/branch/RELEASE_kern5.3/superx" />
<property name="ZIELPFAD" value="${PFAD}/${MODULE}${module(version)}_${PLATFORM}_${ENCODING}_${DATABASE}"/>
<echo message="Modul ${MODULE} Version ${module(version)} in Pfad ${ZIELPFAD} mit Encodierung ${ENCODING} erzeugen." />

93
superx/WEB-INF/conf/edustore/db/install/conf/kern.xml

@ -7159,82 +7159,6 @@ CREATE or replace FUNCTION val(smallint) RETURNS integer STABLE @@ -7159,82 +7159,6 @@ CREATE or replace FUNCTION val(smallint) RETURNS integer STABLE
</returns>
</function>
<function version="3.0">
<name>decval</name>
<description>Liefert einen String als decimal (analog Basic-Funktion
val). </description>
<parameters>
<param>
<name>wert</name>
<type>varchar(255)</type>
<description>Eine String-Repräsentation einer Dezimalzahl
</description>
</param>
</parameters>
<src>
<body><![CDATA[
CREATE or replace FUNCTION decval(varchar(255)) RETURNS numeric(16,2) STABLE
AS 'select $1::numeric where trim($1) !='''' ' LANGUAGE sql;
]]></body>
<author>D.Quathamer</author>
<lastupdated>9.1.2004</lastupdated>
<dbsystem>POSTGRES</dbsystem>
<type>function</type>
</src>
<src>
<body><![CDATA[
create procedure decval(p_str varchar(255))
returning decimal(16,2);
return p_str::decimal(16,2);
end procedure;
]]></body>
<author>D.Quathamer</author>
<lastupdated>9.1.2004</lastupdated>
<dbsystem>INFORMIX</dbsystem>
<type>procedure</type>
</src>
<returns>
<param>
<name>wert</name>
<type>numeric</type>
<description />
</param>
<comment>Die Zahl</comment>
</returns>
</function>
<function version="3.0">
<name>decval</name>
<description>Liefert einen String als decimal (analog Basic-Funktion
val). </description>
<parameters>
<param>
<name>wert</name>
<type>text</type>
<description>Eine String-Repräsentation einer Dezimalzahl
</description>
</param>
</parameters>
<src>
<body><![CDATA[
CREATE or replace FUNCTION decval(text) RETURNS numeric(16,2) STABLE
AS 'select $1::numeric where trim($1) !='''' ' LANGUAGE sql;
]]></body>
<author>D.Quathamer</author>
<lastupdated>9.1.2004</lastupdated>
<dbsystem>POSTGRES</dbsystem>
<type>function</type>
</src>
<returns>
<param>
<name>wert</name>
<type>numeric</type>
<description />
</param>
<comment>Die Zahl</comment>
</returns>
</function>
<function version="3.0">
<name>decval</name>
@ -7249,23 +7173,14 @@ CREATE or replace FUNCTION decval(text) RETURNS numeric(16,2) STABLE @@ -7249,23 +7173,14 @@ CREATE or replace FUNCTION decval(text) RETURNS numeric(16,2) STABLE
</param>
</parameters>
<src>
<body><![CDATA[
CREATE or replace FUNCTION decval(char(255)) RETURNS numeric(16,2) STABLE
AS 'select $1::numeric where trim($1) !='''' ' LANGUAGE sql;
]]></body>
<file>$SUPERX_DIR/db/install/prozeduren/proc_decval_pg.sql</file>
<author>D.Quathamer</author>
<lastupdated>9.1.2004</lastupdated>
<dbsystem>POSTGRES</dbsystem>
<type>function</type>
</src>
<src>
<body><![CDATA[
create procedure decval(p_str char(255))
returning decimal(16,2);
return p_str::decimal(16,2);
end procedure;
]]></body>
<file>$SUPERX_DIR/db/install/prozeduren/proc_decval_ids.sql</file>
<author>D.Quathamer</author>
<lastupdated>9.1.2004</lastupdated>
<dbsystem>INFORMIX</dbsystem>
@ -9976,7 +9891,7 @@ where dimension_bp_id=(select D.tid from dimension_bp D where D.apnr='bluep_absc @@ -9976,7 +9891,7 @@ where dimension_bp_id=(select D.tid from dimension_bp D where D.apnr='bluep_absc
<dbsystem>INFORMIX</dbsystem>
</src>
</maske>
<maske tid="71840" name="Datenblatt archivieren" thema="">
<maske tid="71840" name="Datenblatt archivieren" thema="Datenmanagement">
<src>
<path>$SUPERX_DIR/db/install/masken</path>
<author>D. Quathamer</author>
@ -9990,7 +9905,7 @@ where dimension_bp_id=(select D.tid from dimension_bp D where D.apnr='bluep_absc @@ -9990,7 +9905,7 @@ where dimension_bp_id=(select D.tid from dimension_bp D where D.apnr='bluep_absc
<dbsystem>INFORMIX</dbsystem>
</src>
</maske>
<maske tid="71860" name="Übersicht Datenblatt-Archiv" thema="">
<maske tid="71860" name="Übersicht Datenblatt-Archiv" thema="Datenmanagement">
<src>
<path>$SUPERX_DIR/db/install/masken</path>
<author>I. John</author>

14
superx/WEB-INF/conf/edustore/db/install/prozeduren/proc_decval_ids.sql

@ -0,0 +1,14 @@ @@ -0,0 +1,14 @@
-- Function: decval
-- Wandelt String Datentypen zu numeric um
create procedure decval(p_str varchar(255))
returning decimal(16,2);
return p_str::decimal(16,2);
end procedure;
create procedure decval(p_str char(255))
returning decimal(16,2);
return p_str::decimal(16,2);
end procedure;

11
superx/WEB-INF/conf/edustore/db/install/prozeduren/proc_decval_pg.sql

@ -0,0 +1,11 @@ @@ -0,0 +1,11 @@
-- Function: decval
-- Wandelt String Datentypen zu numeric um
CREATE or replace FUNCTION decval(varchar(255)) RETURNS numeric(16,2) STABLE
AS 'select replace($1,'','',''.'')::numeric where trim($1) !='''' ' LANGUAGE sql;
CREATE or replace FUNCTION decval(text) RETURNS numeric(16,2) STABLE
AS 'select replace($1,'','',''.'')::numeric where trim($1) !='''' ' LANGUAGE sql;
CREATE or replace FUNCTION decval(char(255)) RETURNS numeric(16,2) STABLE
AS 'select replace($1,'','',''.'')::numeric where trim($1) !='''' ' LANGUAGE sql;

4
superx/WEB-INF/conf/edustore/db/install/upgrade/kernmodul_upgrade_man.sql

@ -190,3 +190,7 @@ where T.tid !=T.richtig); @@ -190,3 +190,7 @@ where T.tid !=T.richtig);
drop table tmp_dummy;
--obsolete Zeilen weg:
delete from sachgeb_maske_bez where maskeninfo_id is null;

Loading…
Cancel
Save