sqlvars auf Prozeduren umstellen

src-modules/module/rpta/masken/48000_maskeninfo.unl

@@ -29,26 +29,12 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\

src-modules/module/rpta/masken/48080_maskeninfo.unl

@@ -21,46 +21,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.tid=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.tid=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 </sqlvars>\

src-modules/module/rpta/masken/48110_maskeninfo.unl

@@ -21,47 +21,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 </sqlvars>\

src-modules/module/rpta/masken/48180_maskeninfo.unl

@@ -32,37 +32,16 @@ L.is_virtual,\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.runtime_tablename}';\
 \
 ]]></sqlvar>\
 \
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48220_maskeninfo.unl

@@ -26,47 +26,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48250_maskeninfo.unl

@@ -21,47 +21,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 </sqlvars>\

src-modules/module/rpta/masken/48280_maskeninfo.unl

@@ -26,47 +26,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48310_maskeninfo.unl

@@ -29,48 +29,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48430_maskeninfo.unl

@@ -29,48 +29,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48460_maskeninfo.unl

@@ -29,48 +29,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="jahr_filter" ><![CDATA[\

src-modules/module/rpta/masken/48490_maskeninfo.unl

@@ -26,48 +26,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L, rpta_column C, rpta_column_type T, rpta_column2layout CL\
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48520_maskeninfo.unl

@@ -26,48 +26,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L, rpta_column C, rpta_column_type T, rpta_column2layout CL\
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 <sqlvar name="endsemester"><![CDATA[\

src-modules/module/rpta/masken/48550_maskeninfo.unl

@@ -29,48 +29,19 @@ name as runtime_tablename\
     ]]>\
 </sqlvar>\
 <sqlvar name="rpta_resultset" type="hash"><![CDATA[\
-select  caption,\
+select * from rpta_resultset\
-       uniquename,\
-       fieldclause,\
-       joinclause,\
-       whereclause,\
-       systeminfo_id\
-       from rpta_resultset\
        where uniquename='${basetable.name}';\
 \
 ]]></sqlvar>\
 <sqlvar name="rpta_column_layout" type="hash"><![CDATA[\
-select L.uniquename,\
+       SELECT * from sp_rpta_column_layout('${basetable.name}',<<Spaltenlayout>>::varchar(255));\
-       L.caption,\
-       L.whereclause,\
-       R.is_virtual,\
-       L.sortclause\
-       from rpta_resultset R, rpta_column_layout L\
-       where L.resultset_id=R.tid\
-       and R.uniquename='${basetable.name}'\
-       and L.uniquename=<<Spaltenlayout>>;\
 \
 ]]></sqlvar>\
 <sqlvar name="columns" type="hashsequence"><![CDATA[\
-SELECT C.srcfieldname,\
+SELECT * from sp_rpta_columns_in_layout(<<Spaltenlayout>>::varchar(255))\
-(case when string_not_null(C.targetfieldname)='' then C.srcfieldname else C.targetfieldname end) as targetfieldname,\
+where 1=1\
-T.uniquename as coltype,\
+/* and column_uniquename in (<<Spalten>>) */\
-C.is_aggregate,\
+order by sortnr\
-(case when string_not_null(CL.caption)='' then C.caption else CL.caption end) as caption,\
-CL.is_visible,\
-CL.visible_size as visible_width,\
-F.sql_code as format_sql,\
-F.uniquename as format_uniquename,\
-C.col_function as colfunction,\
-(case when string_not_null(CL.description)='' then C.description else CL.description end) as description\
-FROM rpta_column_layout L,  rpta_column C, rpta_column_type T,rpta_column2layout CL \
-left outer join rpta_format_code F on (F.tid=CL.format_code_id)\
-where L.tid=CL.layout_id\
-and C.tid=CL.column_id\
-and T.tid=C.column_type\
-and L.uniquename=<<Spaltenlayout>>\
-/* and C.uniquename in (<<Spalten>>) */\
-order by CL.sortnr\
  ;\
 ]]></sqlvar>\
 \

src-modules/module/rpta/prozeduren/proc_get_rpta_column_layout_p.sql

@@ -0,0 +1,23 @@
+
+DROP FUNCTION if exists sp_rpta_column_layout(character varying,character varying) ;
+
+CREATE FUNCTION sp_rpta_column_layout(p_resultset_uniquename varchar(255), p_column_layout_uniquename varchar(255))
+RETURNS TABLE(uniquename  varchar(255),
+caption varchar(255),
+whereclause text,
+is_virtual smallint,
+sortclause text
+) AS '
+BEGIN
+    RETURN QUERY select L.uniquename,
+       L.caption,
+       L.whereclause,
+       R.is_virtual,
+       L.sortclause
+       from rpta_resultset R, rpta_column_layout L
+       where L.resultset_id=R.tid
+       and R.uniquename=p_resultset_uniquename
+       and L.uniquename=p_column_layout_uniquename;
+END;
+' LANGUAGE plpgsql;
+