Add Column with Varchar2 function

i created a program unit (function) that returns a varchar2(100). How do i create a link between the function and a new column on the report for each record? I created a query that returns two columns now i want to apply this function to a third column to get some formatted text.

Make sure the column type property for the formula column is set to CHARACTER, and the width is set to 100 to match up with your function. And the PL/SQL prolog of the formula column should read:
function CF_<some_name>Formula return Char is
FYI, in Reports, CHAR and VARCHAR get formatted the same way (e.g., trailing blanks are ignored).

Similar Messages

Add column with preq number to ALV grid in me53n

hi all,
i am trying to add column with preq number (BANFN) to ALV with preq items in ME53N. it is not available in column set, when trying to add by "change layout" button - i dont understand why, when the strcucture MEREQ3211GRID contains it :-(
i also tried to add new field ZZBANFN into the structure CI_EBANMEM and after that, i could add the new field to ALV through change layout, but it was empty of course. so i implemented EXIT_SAPLMEREQ_001 from MEREQ001, but ZZBANFN is still empty, because this exit is not called when opening ME53N, but when clicking on tab "customer data" in preq item detail.
how to solve this? is there any exit that is called before displaying the ALV grid?

Here is some more detail. I included my code from the Enhancement.
ENHANCEMENT-POINT MM06EFPO_POT_AUFBAUEN_02 SPOTS ES_MM06EFPO_POT_AUFBAUEN INCLUDE BOUND.
   ENHANCEMENT 1 Z_MM06EFPO_POT_AUFBAUEN_1.    "active version
SELECT SINGLE zz_old_material FROM mara
    INTO pot-zz_old_material
    WHERE matnr = pot-matnr.
ENDENHANCEMENT.
You will also need to change the layout in Item Overview to bring your field in.

MS SQL - Add column with all rows being "0"

Add column with all rows being "0"

nevermind
"lee" <[email protected]> wrote in message
news:e3b5kt$mch$[email protected]..
> Add column with all rows being "0"
>
>
>

AdvancedDataGrid - Add columns with ActionScript

I'm trying to add columns to an AdvancedDataGrid via ActionScript.
I can't get it to work.
I've tried two approaches -- One with an intermediary array to store the columns then set the adg's columns to the array; One where I assign the columns directly to the adg's columns array.
They both fail in their own way. The columns don't "take" and the adg uses the dataProviders defaults, or there are no columns at all.
"adg_test.mxml" has the AdvancedDataGrids/code.
"adg_test_renderer.mxml" is a renderer for one of the columns.
Would appreciate learning what I'm doing wrong.
Thanks for any help.
=== START adg_test_renderer.mxml ===
<?xml version="1.0" encoding="utf-8"?>
<mx:VBox xmlns:mx="http://www.adobe.com/2006/mxml">
     <mx:Button id="btnTest" label="Renderer Working"/>
</mx:VBox>
=== END adg_test_renderer.mxml ===
== START adg_test.mxml ====
<?xml version="1.0"?>
<mx:Application
    xmlns:mx="http://www.adobe.com/2006/mxml"
    initialize="init()">
    <mx:Script>
      <![CDATA[
         import mx.collections.ArrayCollection;
         [Bindable]
         private var dpADGExplicit:ArrayCollection = new ArrayCollection([
           {Artist:'Pavement', Album:'Slanted and Enchanted', Price:11.99},
           {Artist:'Pavement', Album:'Brighten the Corners', Price:11.99},
           {Artist:'Saner', Album:'A Child Once', Price:11.99},
           {Artist:'Saner', Album:'Helium Wings', Price:12.99},
           {Artist:'The Doors', Album:'The Doors', Price:10.99},
           {Artist:'The Doors', Album:'Morrison Hotel', Price:12.99},
           {Artist:'Grateful Dead', Album:'American Beauty', Price:11.99},
           {Artist:'Grateful Dead', Album:'In the Dark', Price:11.99},
           {Artist:'Grateful Dead', Album:'Shakedown Street', Price:11.99},
           {Artist:'The Doors', Album:'Strange Days', Price:12.99},
           {Artist:'The Doors', Album:'The Best of the Doors', Price:10.99}
         [Bindable]
         private var dpADGActionScript:ArrayCollection = new ArrayCollection([
           {Artist:'Pavement', Album:'Slanted and Enchanted', Price:11.99},
           {Artist:'Pavement', Album:'Brighten the Corners', Price:11.99},
           {Artist:'Saner', Album:'A Child Once', Price:11.99},
           {Artist:'Saner', Album:'Helium Wings', Price:12.99},
           {Artist:'The Doors', Album:'The Doors', Price:10.99},
           {Artist:'The Doors', Album:'Morrison Hotel', Price:12.99},
           {Artist:'Grateful Dead', Album:'American Beauty', Price:11.99},
           {Artist:'Grateful Dead', Album:'In the Dark', Price:11.99},
           {Artist:'Grateful Dead', Album:'Shakedown Street', Price:11.99},
           {Artist:'The Doors', Album:'Strange Days', Price:12.99},
           {Artist:'The Doors', Album:'The Best of the Doors', Price:10.99}
        private function init():void
            var arr:Array=[];//Intermediary array that will become the AdvancedDataGridColumn array
            var col:AdvancedDataGridColumn = new AdvancedDataGridColumn();
            col.dataField = "Artist";
            arr.push(col);
            col.dataField = "Album";
            col.visible = false;
            arr.push(col);
            col.dataField = "Price";
            col.itemRenderer = new ClassFactory(adg_test_renderer);
            arr.push(col);
            adgActionScript.columns = arr;
            //ALTERNATE UNSUCCESFUL APPROACH
            col.dataField = "Artist";
            adgActionScript.columns.push(col);
            col.dataField = "Album";
            col.visible = false;
            adgActionScript.columns.push(col);
            col.dataField = "Price";
            col.itemRenderer = new ClassFactory(adg_test_renderer);
            adgActionScript.columns.push(col);
      ]]>
    </mx:Script>
    <mx:Label text="Explicit Columns"/>
    <mx:AdvancedDataGrid
        id="adgExplicit"
        width="100%" height="100%"
        sortExpertMode="true"
        dataProvider="{dpADGExplicit}">
        <mx:columns>
            <mx:AdvancedDataGridColumn dataField="Artist" />
            <mx:AdvancedDataGridColumn dataField="Album" visible="false"/>
            <mx:AdvancedDataGridColumn dataField="Price" itemRenderer="adg_test_renderer"/>
        </mx:columns>
   </mx:AdvancedDataGrid>
   <mx:Label text="ActionScript Columns (If ActionScript works: Arist column should be hidden. Should see Album column with data and Price column with buttons."/>
    <mx:AdvancedDataGrid
        id="adgActionScript"
        width="100%" height="100%"
        sortExpertMode="true"
        dataProvider="{dpADGActionScript}">
   </mx:AdvancedDataGrid>
</mx:Application>
== END adg_test.mxml ====

Thanks so much for your help.
Here's how I altered your code for my example. This logic allows easier assignment of additional column parameters.
=== START adg_test_renderer.mxml ===
<?xml version="1.0" encoding="utf-8"?>
<mx:VBox xmlns:mx="http://www.adobe.com/2006/mxml">
    <mx:Button id="btnTest" label="Renderer Working"/>
</mx:VBox>
=== END adg_test_renderer.mxml ===
== START adg_test.mxml ====
<?xml version="1.0"?>
<mx:Application
    xmlns:mx="http://www.adobe.com/2006/mxml"
    initialize="init()">
    <mx:Script>
      <![CDATA[
         import mx.collections.ArrayCollection;
         [Bindable]
         private var dpADGExplicit:ArrayCollection = new ArrayCollection([
           {Artist:'Pavement', Album:'Slanted and Enchanted', Price:11.99},
           {Artist:'Pavement', Album:'Brighten the Corners', Price:11.99},
           {Artist:'Saner', Album:'A Child Once', Price:11.99},
           {Artist:'Saner', Album:'Helium Wings', Price:12.99},
           {Artist:'The Doors', Album:'The Doors', Price:10.99},
           {Artist:'The Doors', Album:'Morrison Hotel', Price:12.99},
           {Artist:'Grateful Dead', Album:'American Beauty', Price:11.99},
           {Artist:'Grateful Dead', Album:'In the Dark', Price:11.99},
           {Artist:'Grateful Dead', Album:'Shakedown Street', Price:11.99},
           {Artist:'The Doors', Album:'Strange Days', Price:12.99},
           {Artist:'The Doors', Album:'The Best of the Doors', Price:10.99}
         [Bindable]
         private var dpADGActionScript:ArrayCollection = new ArrayCollection([
           {Artist:'Pavement', Album:'Slanted and Enchanted', Price:11.99},
           {Artist:'Pavement', Album:'Brighten the Corners', Price:11.99},
           {Artist:'Saner', Album:'A Child Once', Price:11.99},
           {Artist:'Saner', Album:'Helium Wings', Price:12.99},
           {Artist:'The Doors', Album:'The Doors', Price:10.99},
           {Artist:'The Doors', Album:'Morrison Hotel', Price:12.99},
           {Artist:'Grateful Dead', Album:'American Beauty', Price:11.99},
           {Artist:'Grateful Dead', Album:'In the Dark', Price:11.99},
           {Artist:'Grateful Dead', Album:'Shakedown Street', Price:11.99},
           {Artist:'The Doors', Album:'Strange Days', Price:12.99},
           {Artist:'The Doors', Album:'The Best of the Doors', Price:10.99}
        private function init():void
            var arrCols:Array = adgActionScript.columns;
            var col:AdvancedDataGridColumn;
            col = new AdvancedDataGridColumn;
            col.dataField = "Artist";
            arrCols.push(col);
            col = new AdvancedDataGridColumn;
            col.dataField = "Album";
            col.visible = false;
            arrCols.push(col);
            col = new AdvancedDataGridColumn;
            col.dataField = "Price";
            col.itemRenderer = new ClassFactory(adg_test_renderer);
            arrCols.push(col);
            adgActionScript.columns = arrCols;
            adgActionScript.validateNow();
      ]]>
    </mx:Script>
    <mx:Label text="Explicit Columns"/>
    <mx:AdvancedDataGrid
        id="adgExplicit"
        width="100%"
        height="100%"
        dataProvider="{dpADGExplicit}">
        <mx:columns>
            <mx:AdvancedDataGridColumn dataField="Artist" />
            <mx:AdvancedDataGridColumn dataField="Album" visible="false"/>
            <mx:AdvancedDataGridColumn dataField="Price" itemRenderer="adg_test_renderer"/>
        </mx:columns>
   </mx:AdvancedDataGrid>
   <mx:Label text="ActionScript Columns"/>
    <mx:AdvancedDataGrid
        id="adgActionScript"
        width="100%"
        height="100%"
        dataProvider="{dpADGActionScript}">
   </mx:AdvancedDataGrid>
</mx:Application>
== END adg_test.mxml ====

Calculated List column with Now() function

I am designing a Sharepoint list for recording entry and exit times. I have one column which has been set as time function with a calculation of =Now() a second column called [Out] with a Yes/No choice and a 3rd calculated column [Time Out] with a
formula =IF(Out="Yes",NOW(),"On Site"). This works fine until you add data into other columns then the [Time Out] column keeps on changing time. How can I make the[TimeOut] column only show the time when the [Out] column changes to yes
and keep that time.

Hi
another approach
if first column represent the time when the item is creted, you don't need it. You could use [Created] column value
Next, set [Out] columnn with default value NO, and next you can use 2 scenarios
First one - you don't use the calculated column, you create a new one [TimeOut], text column. with default value="On Site"
You should also attacha workflow to your list, which will start when an item is changed ( only in this case ! ) wnd which will analyse if [Out]=yes - in this case will fill [TimeOut] with string value for now() value
Second one. you keep the calculated column, but the formula should contain converting datetime in string value
More details about this formula for converting time in text
http://msdn.microsoft.com/en-us/library/office/bb862071%28v=office.14%29.aspx
Romeo Donca, Orange Romania (MCSE, MCITP, CCNA) Please Mark As Answer if my post solves your problem or Vote As Helpful if the post has been helpful for you.

How to Add column with default value in compress table.

Hi ,
while trying to add column to compressed table with default value i am getting error.
Even i tried no compress command on table still its giivg error that add/drop not allowed on compressed table.
Can anyone help me in this .
Thanks.

Aman wrote:
while trying to add column to compressed table with default value i am getting error.This is clearly explain in the Oracle doc :
"+You cannot add a column with a default value to a compressed table or to a partitioned table containing any compressed partition, unless you first disable compression for the table or partition+"
http://download.oracle.com/docs/cd/B19306_01/server.102/b14200/statements_3001.htm#sthref5163
Nicolas.

Add column with row number to table

Hi,
to a table view I'd like to add a new column that contains the row number for each row.
I have many data sources (twelve) and with the union operator I create one output dataset. The output data is sorted by the arrangement of the input ports of the union operator.
Is there a way to add a column with its corresponding entry number?
Regards, FT

I have a similar question to the original post. It seems your answer will fill the new field in all rows with the same value. But, what if we want an actual row number?
I am simply looking to add a row number to a table. I only have one data source. The business scenario is that the output of the data service is sorted in descending order on value. I want to be able to select the first 10 (i.e. the top 10 items based on that value).
Even if I can solve my business scenario without using a row number field after the sort, it seems like a technique that would come in handy.
Any ideas? I'm pretty new to using Visual Composer so I may be missing something obvious.

How to convert rows into columns with decode function

Hi,
How to convert rows into columns with the help of decode function in oracle.
thanks and regards
P Prakash

say
col1 col2
1 10
2 20
3 30
then use
select col1,
sum(decode(col2,10,10)) "new1"
sum(decode(col2,20,20))"new2"
sum(decode(col2,30,30))"new3"
from table_name
group by col1;
we used sum u can use ny function if wont u have to give the column name i.e col2 name also
so i think u got it nw
regards

Achieving chronological sort on a date column with month function

Hello all ,
I have a a date column(start_date) on which I applied 'MONTHNAME' function to extract the month name
out of the date . i.e. 4/24/2013 will return 'Apr' .
While trying to achieve a sort on this , its returning alphabetical sorting , i.e.
aug , apr , dec , jul ,jun etc .
So achieving a chronological order , I created a logical column 'sort_month' . In the expression section,
I wrote , month(start_date) . so this return numeric values of months , i.e . 1,2,3, 4 etc.
Now , in 'start_date' column properties i have selected this 'sort_month' column ,
sort on column . So , this should add a chronological sorting order to start_date column ?
well its not working !
Am I missing anything here ?

Logical column general properties and set 'sort order column' to months
Edited by: Srini VEERAVALLI on Apr 23, 2013 1:55 PM

Add-on with Fax Functionality

Hi,
I am looking for an add-on which allows a user to fax directly from SAP Business One.
The add-on is for a customer based in Germany.
So far I have not found sufficient information on the P2P Network or SAP Solution Catelog.
If anyone has any information on an add-on which offers this functionality please post the details here, preferably with links to partner website & solution details.
The add-on should support SBO 2005 & 2007 versions.
Kind Regards,
Paul Tormey

Hi Paul,
You can also configure SAP Business One to work with MS Fax Services in order to fax for example the current active document.
As long as the SBO Mailer is set up correctly then you should be able to fax directly from B1 using the 'Fax' icon (when you are standing on a document for example).
There's a document on how to do it in the Documentation Resource Centre on the Channel Partner Portal (http://service.sap.com/~sapidb/011000358700002906862005E/)
Kind regards,
Maria

Add columns with custom fields in the table control of MIGO

Hi,
I have to add custom fields in the table control view of item in the MIGO. I have added the fields in the GOITEM structure and i am able to display it in the item details tab. I want the same fields to be visible as columns in the table control view of the items.
I found that TV_GOITEM is the control in SAPLMIGO program referring to the table control of items but it is referring only to the standard fields available in Screen 200.
Please let me know if there is any screen exit or option to add the custom fields in the control TV_GOITEM.
Thanks.

Hi,
Thanks for your reply. I have added the custom fields in the item detail. But the customer wants the custom fields in the table view also.
Is there any screen exit available to modify the table control of MIGO?
Thanks.

I want to update timestamp(3) column with respect to varchar2

Hi all,
I have a date field column with varchar2 as datatype :
create table t1 (id number,date1 varchar2(35))
insert into (1,' 3/13/2011 10:22 AM');
insert into (2,' 3/14/2011 10:22 AM');
insert into (3,' 3/15/2011 10:22 AM');
I want to update table2
create table t1 (id number,date1 timestamp(3))
insert into (1,' ');
insert into (2,' ');
insert into (3,' ');I want to update t2 with date column in t1
can any one help me
Thanks in advance!!!!!

Hi,
846773 wrote:
Hi all,
I have a date field column with varchar2 as datatype : That's not a very good idea. You should always use a DATE or TIMESTAMP column for dates.
create table t1 (id number,date1 varchar2(35))
insert into (1,' 3/13/2011 10:22 AM');Thanks for posting the CREATE TABLE and INSERT statements; that's very helpful.
Test them and make sure they work before you post them. You forgot the table name (after the keyword INTO).
insert into (2,' 3/14/2011 10:22 AM');
insert into (3,' 3/15/2011 10:22 AM');
I want to update table2
create table t1 (id number,date1 timestamp(3))This is the same name you used for the other table. I'll assume you meant to say t2 here, not t1.
insert into (1,' ');Don't try to insert a string (such as ' ') into a TIMESTAMP column, You can INSERT a literal NULL, or simply not INSERT anything into that column.
insert into (2,' ');
insert into (3,' ');I want to update t2 with date column in t1Use TO_TIMESTAMP to convert the string into a TIMESTAMP:
MERGE INTO     t2     dst
USING (
           SELECT id
        ,        TO_TIMESTAMP ( date1
                          , 'MM/DD/YYYY HH:MI AM'
                   )      AS ts
        FROM    t1
       )          src
ON     (src.id     = dst.id)
WHEN MATCHED THEN UPDATE
SET     dst.date1 = src.ts
;

Operations in querie or add columns

hi!.
How can do operations in querie or add columns with operations.
greetings.

hi
good
go through this link hope this will give you idea of the query operation.
http://help.sap.com/saphelp_nw70/helpdata/en/16/a6fe41b227096fe10000000a155106/content.htm
thanks
mrutyun^

How to convert a column from varchar2 into timestamp(3)

Hi all,
I have a date field column with varchar2 as datatype :
date
3/13/2011 10:22 AM
3/13/2011 10:22 AM
I tried this:
select to_timestamp(date,'HH24MI') from dual;Iam getting this error:
ORA-01858: a non-numeric character was found where a numeric was expected
I want to convert date column to timestamp(3) column

846773 wrote:
I want to convert date column to timestamp(3) columnTIMESTAMP is not time column. Look at it as a date with better precision - it supports franctional part of a second. Anyway, use:
select to_timestamp(date,'MM/DD/YYYY HH:MI AM') from dual;SY.

View with columns based on function - problem with query

Hi,
I'm using Oracle 9i;
I've created a view which has columns based on a table columns (multiple columns from 1 table) and funtion (multiple columns based on 1 function).
The function takes ID as the first argument and name of the column to determine which value to return as the second one.
Here is a sample of such function (simplified):
FUNCTION my_function
(in_id IN NUMBER, in_col_name IN VARCHAR2)
RETURN VARCHAR2
IS
c_name VARCHAR2(100);
c_last_name VARCHAR2(100);
BEGIN
SELECT T.NAME, T.LAST_NAME
INTO c_name, c_last_name
FROM TABLE_1 T, TABLE_2 Z
WHERE T.PK = Z.FK
AND Z.ID = in_id;
IF in_col_name = 'NAME' THEN
RETURN c_name;
ELSIF in_col_name = 'LAST_NAME' THEN
RETURN c_last_name;
END IF;
END;
For simplicty I've restricted the number of columns.
CREATE OR REPLACE VIEW my_view
(ID, NAME, LAST_NAME)
AS
SELECT
T.ID ID
,CAST(my_function(T.ID,'NAME') AS VARCHAR2(100)) NAME
,CAST(my_function(T.ID,'LAST_NAME') AS VARCHAR2(100)) LAST_NAME
FROM TABLE T;
There is no problem with query:
SELECT * FROM my_view;
The problem arises when I query the view (regardles of '=' or 'LIKE'):
SELECT * FROM my_view
WHERE name LIKE '%some_part_of_name%'
The query returns rows for same names, for same it doesn't. If I put '=' and the whole name the query returns nothing, but when I put 'LIKE' and the first letter it returns rows in some cases.
I've tried to debug this situation and I've discovered that the function recives ID not in the proper order and not the same amount of times - in explicit:
for each ID in (1, 2, 3, 4, 5, 6, ... , 100) the function should be called twice for each ID and in the same order, but it does not.
I get 1, 1, 2, 3, 3, 6, 20, 20 and so on.
Help needed.
Greetings.

The problem is more complicated than the solutions provided here.
The reason why I'm using the function is this:
the original view was constructed using multiple union all selects and the speed was terrible. I've created the index on the base table to obtain a proper sort. For retriving all records at once the view works perfectly, but if one wants to query by columns based on function the results are suprisng - sometimes there are, some times there are none, or if you serch with "like" and only a part of string there are results, but with "=" there are no results.
Here are real DDLs:
View:
CREATE OR REPLACE VIEW V_DOK_ARCH
(ID_ZDAR, TYP, STAN, DATE_CREATED, CREATED_BY,
DATE_MODIFIED, MODIFIED_BY, SPRA_ID_SPRA, PODM_ID_PODM, PODM_UMOW_ID_UMOW,
NR_WFS, WFS_NR_INTER, UWAGI_OPER, FUNDUSZ, NUMER,
DATA_PODPISANIA, RODZAJ, TYP_PRZY, TYP_UBEZ, NAZWISKO,
IMIE, IMIE_OJCA, NAZWA_FIRMY, NAZWA_FIRMY_SKR, DANE_KLIE)
AS
SELECT /*+ INDEX(Z ZDAR_DATE_CREATED_DESC_I) */
Z.ID_ZDAR ID_ZDAR
, Z.TYP TYP
, Z.STAN STAN
, Z.DATE_CREATED DATE_CREATED
, Z.CREATED_BY CREATED_BY
, Z.DATE_MODIFIED DATE_MODIFIED
, Z.MODIFIED_BY MODIFIED_BY
, Z.SPRA_ID_SPRA SPRA_ID_SPRA
, Z.PODM_ID_PODM PODM_ID_PODM
, Z.PODM_UMOW_ID_UMOW PODM_UMOW_ID_UMOW
, Z.NR_WFS NR_WFS
, Z.WFS_NR_INTER WFS_NR_INTER
, Z.UWAGI_OPER UWAGI_OPER
, Z.FUNDUSZ FUNDUSZ
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NUMER') AS VARCHAR2(30)) NUMER
, F_Rej_Zdar_Date(Z.ID_ZDAR, 'DATA_PODPISANIA') DATA_PODPISANIA
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'RODZAJ') AS VARCHAR2(4)) RODZAJ
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'TYP_PRZY') AS VARCHAR2(4)) TYP_PRZY
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'TYP_UBEZ') AS VARCHAR2(3)) TYP_UBEZ
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWISKO') AS VARCHAR2(30)) NAZWISKO
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'IMIE') AS VARCHAR2(30)) IMIE
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'IMIE_OJCA') AS VARCHAR2(30)) IMIE_OJCA
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWA_FIRMY') AS VARCHAR2(300)) NAZWA_FIRMY
, CAST(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWA_FIRMY_SKR') AS VARCHAR2(100)) NAZWA_FIRMY_SKR
, CAST(LTRIM(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWISKO')||' '||F_Rej_Zdar_Char(Z.ID_ZDAR, 'IMIE')||' '||F_Rej_Zdar_Char(Z.ID_ZDAR, 'IMIE_OJCA')||F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWA_FIRMY')||DECODE(F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWA_FIRMY'),NULL,F_Rej_Zdar_Char(Z.ID_ZDAR, 'NAZWA_FIRMY_SKR'),NULL)) AS VARCHAR2(492)) DANE_KLIE
FROM T_ZDARZENIA Z
WHERE F_Rej_Zdar_Char(Z.ID_ZDAR, 'JEST') = 'T';
and functions:
CREATE OR REPLACE FUNCTION F_Rej_Zdar_Char
(WE_ID_ZDAR IN NUMBER
,WE_KOLUMNA IN VARCHAR2
RETURN VARCHAR2
IS
c_numer           T_PRZYSTAPIENIA.NUMER%TYPE;--VARCHAR2(30);
c_rodzaj           T_KLIENCI.RODZAJ%TYPE;--VARCHAR2(1);
c_typ_przy           T_PRZYSTAPIENIA.TYP_PRZY%TYPE;--VARCHAR2(1);
c_typ_ubez           T_PRZYSTAPIENIA.TYP_UBEZ%TYPE;--VARCHAR2(3);
c_nazwisko           T_KLIENCI.NAZWISKO%TYPE;--VARCHAR2(30);
c_imie                T_KLIENCI.IMIE%TYPE;--VARCHAR2(30);
c_imie_ojca      T_KLIENCI.IMIE_OJCA%TYPE;--VARCHAR2(30);
c_nazwa_firmy      T_KLIENCI.NAZWA_FIRMY%TYPE;--VARCHAR2(300);
c_nazwa_firmy_skr T_KLIENCI.NAZWA_FIRMY%TYPE;--VARCHAR2(100);
c_jest                VARCHAR2(1) := 'T';
c EXCEPTION;
BEGIN
--dbms_output.put_line('id zdar wykonania '||WE_ID_ZDAR);
BEGIN
SELECT p.NUMER, k.RODZAJ,p.TYP_PRZY,p.TYP_UBEZ,k.nazwisko, k.imie, k.imie_ojca, k.nazwa_firmy, k.nazwa_firmy_skr
INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
FROM T_KLIENCI k, T_PRZYSTAPIENIA p, T_ZDARZENIA z, T_PODMIOTY D1, T_PODMIOTY D2
WHERE p.KLIE_ID_KLIE = k.ID_KLIE
AND z.PODM_ID_PODM = D1.ID_PODM
AND D1.KLIE_ID_KLIE = p.KLIE_ID_KLIE
AND Z.PODM_UMOW_ID_UMOW = D2.ID_PODM
AND D2.PRZY_ID_PRZY = P.ID_PRZY
AND z.ID_ZDAR = WE_ID_ZDAR;
EXCEPTION
     WHEN NO_DATA_FOUND THEN
     BEGIN
     SELECT p.NUMER, k.RODZAJ,p.TYP_PRZY,p.TYP_UBEZ,k.nazwisko, k.imie, k.imie_ojca, k.nazwa_firmy, k.nazwa_firmy_skr
     INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
     FROM T_KLIENCI k, T_PRZYSTAPIENIA p, T_ZDARZENIA z, T_PODMIOTY D
     WHERE z.PODM_UMOW_ID_UMOW IS NULL
     AND z.PODM_ID_PODM = D.ID_PODM
     AND D.KLIE_ID_KLIE = k.ID_KLIE
     AND p.KLIE_ID_KLIE = k.ID_KLIE
     AND z.ID_ZDAR = WE_ID_ZDAR;
     EXCEPTION
          WHEN NO_DATA_FOUND THEN
          BEGIN
          SELECT NULL NUMER, NULL RODZAJ,NULL TYP_PRZY,NULL TYP_UBEZ, I.nazwisko, I.imie, I.imie_ojca, I.NAZWA NAZWA_FIRMY, I.NAZWA_SKR nazwa_firmy_skr
          INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
          FROM T_ZDARZENIA z, T_INSTYTUCJE I
          WHERE Z.TYP IN ('WFS526','WFS542','WFS553','WFS609','WFS611','WYP_KS','WYP_PO','WYP_SB','DI_ZAT')
          AND z.PODM_UMOW_ID_UMOW IS NULL
          AND Z.PODM_ID_PODM = I.ID_INST
          AND z.ID_ZDAR = WE_ID_ZDAR;
          EXCEPTION
               WHEN NO_DATA_FOUND THEN
               BEGIN
               SELECT p.NUMER NUMER, DECODE(a.TYP_AGENTA,'A','F','P') RODZAJ, DECODE(a.TYP_AGENTA,'P','R',a.TYP_AGENTA) TYP_PRZY,NULL TYP_UBEZ,a.nazwisko, a.imie, a.imie_ojca, a.nazwa_firmy, a.nazwa_firmy_skr
               INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
               FROM T_AG_AGENCI a, T_AG_UMOWY p, T_ZDARZENIA z
               WHERE a.ID_AGAG = p.AGAG_ID_AGAG
               AND z.PODM_UMOW_ID_UMOW = p.ID_AGUM
               AND z.ID_ZDAR = WE_ID_ZDAR;
               EXCEPTION
                    WHEN NO_DATA_FOUND THEN
                    BEGIN
                    SELECT p.NUMER NUMER, DECODE(a.TYP_AGENTA,'A','F','P') RODZAJ, DECODE(a.TYP_AGENTA,'P','R',a.TYP_AGENTA) TYP_PRZY,NULL TYP_UBEZ,a.nazwisko, a.imie, a.imie_ojca, a.nazwa_firmy, a.nazwa_firmy_skr
                    INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                    FROM T_AG_AGENCI a, T_AG_UMOWY p, T_ZDARZENIA z
                    WHERE a.ID_AGAG = p.AGAG_ID_AGAG
                    AND z.PODM_ID_PODM = a.ID_AGAG
                    AND z.PODM_UMOW_ID_UMOW IS NULL
                    AND z.ID_ZDAR = WE_ID_ZDAR;
                    EXCEPTION
                         WHEN NO_DATA_FOUND THEN
                         BEGIN
                         SELECT p.NUMER_UMOWY NUMER, DECODE(p.TYP_AGENTA,'A','F','P') RODZAJ, DECODE(p.TYP_AGENTA,'P','R',p.TYP_AGENTA) TYP_PRZY,NULL TYP_UBEZ,p.nazwisko, p.imie_pierwsze, p.imie_ojca, p.nazwa_firmy, p.nazwa_firmy_skr
                         INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                         FROM T_AG_KANDYDACI a, T_AG_UMOWY_TAB p, T_ZDARZENIA z
                         WHERE a.ID_AGKAN = p.TECH_PODM_ID_PODM
                         AND z.PODM_UMOW_ID_UMOW = p.TECH_ID_AGUMT
                         AND z.ID_ZDAR = WE_ID_ZDAR;
                         EXCEPTION
                              WHEN NO_DATA_FOUND THEN
                              BEGIN
                              SELECT p.NUMER_UMOWY NUMER, DECODE(p.TYP_AGENTA,'A','F','P') RODZAJ, DECODE(p.TYP_AGENTA,'P','R',p.TYP_AGENTA) TYP_PRZY,NULL TYP_UBEZ,p.nazwisko, p.imie_pierwsze, p.imie_ojca, p.nazwa_firmy, p.nazwa_firmy_skr
                              INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                              FROM T_AG_KANDYDACI a, T_AG_UMOWY_TAB p, T_ZDARZENIA z
                              WHERE a.ID_AGKAN = p.TECH_PODM_ID_PODM
                              AND z.PODM_ID_PODM = a.ID_AGKAN
                              AND z.PODM_UMOW_ID_UMOW IS NULL
                              AND z.ID_ZDAR = WE_ID_ZDAR;
                              EXCEPTION
                                   WHEN NO_DATA_FOUND THEN
                                   BEGIN
                                   SELECT k.NUMER_UMOWY NUMER, DECODE(k.TYP_PRZYSTAPIENIA,'P','F','P') RODZAJ,k.TYP_PRZYSTAPIENIA TYP_PRZY,'NPO' TYP_UBEZ, k.nazwisko, k.imie_pierwsze, k.imie_ojca, k.nazwa_firmy nazwa_firmy, k.nazwa_firmy_skr nazwa_firmy_skr
                                   INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                                   FROM T_WE_UM_NPO_TAB k, T_ZDARZENIA z
                                   WHERE z.ID_ZDAR = k.TECH_ZDAR_ID_ZDAR
                                   AND k.TYP_PRZYSTAPIENIA IN ('P','W')
                                   AND z.PODM_ID_PODM IS NULL
                                   AND z.PODM_UMOW_ID_UMOW IS NULL
                                   AND z.ID_ZDAR = WE_ID_ZDAR;
                                   EXCEPTION
                                        WHEN NO_DATA_FOUND THEN
                                        BEGIN
                                        SELECT k.NUMER_UMOWY NUMER, 'F' RODZAJ,'-' TYP_PRZY,'OPS' TYP_UBEZ, k.nazwisko, k.imie_pierwsze, k.imie_ojca, NULL nazwa_firmy, NULL nazwa_firmy_skr
                                        INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                                        FROM T_WE_UM_OPS_TAB k,T_ZDARZENIA z
                                        WHERE z.ID_ZDAR = k.TECH_ZDAR_ID_ZDAR
                                        AND z.PODM_ID_PODM IS NULL
                                        AND z.PODM_UMOW_ID_UMOW IS NULL
                                        AND z.ID_ZDAR = WE_ID_ZDAR;
                                        EXCEPTION
                                             WHEN NO_DATA_FOUND THEN
                                             BEGIN
                                             SELECT NULL NUMER, NULL RODZAJ,NULL TYP_PRZY,NULL TYP_UBEZ, NULL nazwisko, NULL imie_pierwsze, NULL imie_ojca, NULL nazwa_firmy, NULL nazwa_firmy_skr
                                             INTO c_numer, c_rodzaj, c_typ_przy, c_typ_ubez, c_nazwisko, c_imie, c_imie_ojca, c_nazwa_firmy, c_nazwa_firmy_skr
                                             FROM T_ZDARZENIA z
                                             WHERE z.TYP NOT IN ('UM_OPS','UM_NPO','NPO_OP','UZUP_U')
                                             AND z.PODM_ID_PODM IS NULL
                                             AND z.PODM_UMOW_ID_UMOW IS NULL
                                             AND z.ID_ZDAR = WE_ID_ZDAR;
                                             EXCEPTION
                                                  WHEN NO_DATA_FOUND THEN
                                                       --dbms_output.put_line('id zdar wykonania '||WE_ID_ZDAR||' ostatni wyjatek');
                                                       NULL;
                                             END;
                                        END;
                                   END;
                              END;
                         END;
                    END;
               END;
          END;
     END;
END;
--raise c;
IF WE_KOLUMNA = 'NUMER' THEN
RETURN c_numer;
ELSIF WE_KOLUMNA = 'RODZAJ' THEN
RETURN c_rodzaj;
ELSIF WE_KOLUMNA = 'TYP_PRZY' THEN
RETURN c_typ_przy;
ELSIF WE_KOLUMNA = 'TYP_UBEZ' THEN
RETURN c_typ_ubez;
ELSIF WE_KOLUMNA = 'NAZWISKO' THEN
RETURN c_nazwisko;
ELSIF WE_KOLUMNA = 'IMIE' THEN
RETURN c_imie;
ELSIF WE_KOLUMNA = 'IMIE_OJCA' THEN
RETURN c_imie_ojca;
ELSIF WE_KOLUMNA = 'NAZWA_FIRMY' THEN
RETURN c_nazwa_firmy;
ELSIF WE_KOLUMNA = 'NAZWA_FIRMY_SKR' THEN
RETURN c_nazwa_firmy_skr;
ELSIF WE_KOLUMNA = 'JEST' THEN
RETURN c_jest;
END IF;
END;
CREATE OR REPLACE FUNCTION F_Rej_Zdar_Date
(WE_ID_ZDAR IN NUMBER
,WE_KOLUMNA IN VARCHAR2
RETURN DATE
IS
d_data DATE;
BEGIN
BEGIN
SELECT p.DATA_PODPISANIA
INTO d_data
FROM T_KLIENCI k, T_PRZYSTAPIENIA p, T_ZDARZENIA z, T_PODMIOTY D1, T_PODMIOTY D2
WHERE p.KLIE_ID_KLIE = k.ID_KLIE
AND z.PODM_ID_PODM = D1.ID_PODM
AND D1.KLIE_ID_KLIE = p.KLIE_ID_KLIE
AND Z.PODM_UMOW_ID_UMOW = D2.ID_PODM
AND D2.PRZY_ID_PRZY = P.ID_PRZY
AND z.ID_ZDAR = WE_ID_ZDAR;
EXCEPTION
     WHEN NO_DATA_FOUND THEN
     BEGIN
     SELECT p.DATA_PODPISANIA
     INTO d_data
     FROM T_KLIENCI k, T_PRZYSTAPIENIA p, T_ZDARZENIA z, T_PODMIOTY D
     WHERE z.PODM_UMOW_ID_UMOW IS NULL
     AND z.PODM_ID_PODM = D.ID_PODM
     AND D.KLIE_ID_KLIE = k.ID_KLIE
     AND p.KLIE_ID_KLIE = k.ID_KLIE
     AND z.ID_ZDAR = WE_ID_ZDAR;
     EXCEPTION
          WHEN NO_DATA_FOUND THEN
          BEGIN
          SELECT NULL DATA_PODPISANIA
          INTO d_data
          FROM T_ZDARZENIA z, T_INSTYTUCJE I
          WHERE Z.TYP IN ('WFS526','WFS542','WFS553','WFS609','WFS611','WYP_KS','WYP_PO','WYP_SB','DI_ZAT')
          AND z.PODM_UMOW_ID_UMOW IS NULL
          AND Z.PODM_ID_PODM = I.ID_INST
          AND z.ID_ZDAR = WE_ID_ZDAR;
          EXCEPTION
               WHEN NO_DATA_FOUND THEN
               BEGIN
               SELECT p.DATA_PODPISANIA DATA_PODPISANIA
               INTO d_data
               FROM T_AG_AGENCI a, T_AG_UMOWY p, T_ZDARZENIA z
               WHERE a.ID_AGAG = p.AGAG_ID_AGAG
               AND z.PODM_UMOW_ID_UMOW = p.ID_AGUM
               AND z.ID_ZDAR = WE_ID_ZDAR;
               EXCEPTION
                    WHEN NO_DATA_FOUND THEN
                    BEGIN
                    SELECT p.DATA_PODPISANIA DATA_PODPISANIA
                    INTO d_data
                    FROM T_AG_AGENCI a, T_AG_UMOWY p, T_ZDARZENIA z
                    WHERE a.ID_AGAG = p.AGAG_ID_AGAG
                    AND z.PODM_ID_PODM = a.ID_AGAG
                    AND z.PODM_UMOW_ID_UMOW IS NULL
                    AND z.ID_ZDAR = WE_ID_ZDAR;
                    EXCEPTION
                         WHEN NO_DATA_FOUND THEN
                         BEGIN
                         SELECT p.DATA_PODPISU_AGENTA DATA_PODPISANIA
                         INTO d_data
                         FROM T_AG_KANDYDACI a, T_AG_UMOWY_TAB p, T_ZDARZENIA z
                         WHERE a.ID_AGKAN = p.TECH_PODM_ID_PODM
                         AND z.PODM_UMOW_ID_UMOW = p.TECH_ID_AGUMT
                         AND z.ID_ZDAR = WE_ID_ZDAR;
                         EXCEPTION
                              WHEN NO_DATA_FOUND THEN
                              BEGIN
                              SELECT p.DATA_PODPISU_AGENTA DATA_PODPISANIA
                              INTO d_data
                              FROM T_AG_KANDYDACI a, T_AG_UMOWY_TAB p, T_ZDARZENIA z
                              WHERE a.ID_AGKAN = p.TECH_PODM_ID_PODM
                              AND z.PODM_ID_PODM = a.ID_AGKAN
                              AND z.PODM_UMOW_ID_UMOW IS NULL
                              AND z.ID_ZDAR = WE_ID_ZDAR;
                              EXCEPTION
                                   WHEN NO_DATA_FOUND THEN
                                   BEGIN
                                   SELECT k.DATA_PODPISANIA_UM DATA_PODPISANIA
                                   INTO d_data
                                   FROM T_WE_UM_NPO_TAB k, T_ZDARZENIA z
                                   WHERE z.ID_ZDAR = k.TECH_ZDAR_ID_ZDAR
                                   AND k.TYP_PRZYSTAPIENIA IN ('P','W')
                                   AND z.PODM_ID_PODM IS NULL
                                   AND z.PODM_UMOW_ID_UMOW IS NULL
                                   AND z.ID_ZDAR = WE_ID_ZDAR;
                                   EXCEPTION
                                        WHEN NO_DATA_FOUND THEN
                                        BEGIN
                                        SELECT k.DATA_PODPISANIA_UM DATA_PODPISANIA
                                        INTO d_data
                                        FROM T_WE_UM_OPS_TAB k,T_ZDARZENIA z
                                        WHERE z.ID_ZDAR = k.TECH_ZDAR_ID_ZDAR
                                        AND z.PODM_ID_PODM IS NULL
                                        AND z.PODM_UMOW_ID_UMOW IS NULL
                                        AND z.ID_ZDAR = WE_ID_ZDAR;
                                        EXCEPTION
                                             WHEN NO_DATA_FOUND THEN
                                             BEGIN
                                             SELECT NULL DATA_PODPISANIA
                                             INTO d_data
                                             FROM T_ZDARZENIA z
                                             WHERE z.TYP NOT IN ('UM_OPS','UM_NPO','NPO_OP','UZUP_U')
                                             AND z.PODM_ID_PODM IS NULL
                                             AND z.PODM_UMOW_ID_UMOW IS NULL
                                             AND z.ID_ZDAR = WE_ID_ZDAR;
                                             EXCEPTION
                                                  WHEN NO_DATA_FOUND THEN
                                                       d_data := NULL;
                                             END;
                                        END;
                                   END;
                              END;
                         END;
                    END;
               END;
          END;
     END;
END;
IF WE_KOLUMNA = 'DATA_PODPISANIA' THEN
RETURN d_data;
END IF;
END;

Add Column with Varchar2 function

Similar Messages

Maybe you are looking for