git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@50874 248e525c-4dfb-0310-94bc-949c084e9493

This commit is contained in:
andrew.gilmore
2012-03-19 11:57:19 +00:00
parent 2a0f4900c3
commit 0e9ca75d77
1587 changed files with 500863 additions and 0 deletions

View File

@@ -0,0 +1,63 @@
CREATE OR REPLACE PACKAGE EFT_NOM.cafo_session_variables IS
g_header CONSTANT VARCHAR2(160):= '$Header: /Isle Of Grain/database/PLSQL/cafo_session_variables.pck 1 7/01/05 12:54 Gilberta $';
g_revision CONSTANT VARCHAR2(160):= '$Revision: 1 $';
/*
* $History: cafo_session_variables.pck $
*
* ***************** Version 1 *****************
* User: Gilberta Date: 7/01/05 Time: 12:54
* Created in $/Isle Of Grain/database/PLSQL
* Initial Version
*
* ***************** Version 1 *****************
* User: Mcdonaldp Date: 12/05/01 Time: 1:42p
* Created in $/Database/Foundation
*
* ***************** Version 1 *****************
* User: Mcdonaldp Date: 11/29/01 Time: 4:54p
* Created in $/Database/Foundation
*
* ***************** Version 3 *****************
* User: Pearsona Date: 10/25/01 Time: 11:25a
* Updated in $/Database/Foundation
* get rid of the not found bit
*
* ***************** Version 6 *****************
* User: Mcdonaldp Date: 10/19/01 Time: 4:15p
* Updated in $/Database/Security and Menus
* merged to cafo session variables (with cookies)
*
* ***************** Version 5 *****************
* User: Mcdonaldp Date: 10/04/01 Time: 5:06p
* Updated in $/Website
* Added Revision Strings
*/
TYPE t_user_rec IS RECORD
(syus_id system_users.syus_id%TYPE
,inte_id system_users.inte_id%TYPE
,cust_id_employer system_users.cust_id%TYPE
,cust_id_on_behalf system_users.cust_id%TYPE
);
FUNCTION getsyus RETURN VARCHAR2;
FUNCTION getcust RETURN VARCHAR2;
FUNCTION getinte RETURN VARCHAR2;
FUNCTION getcustname RETURN VARCHAR2;
FUNCTION getintename RETURN VARCHAR2;
FUNCTION get_user_rec RETURN t_user_rec;
--PROCEDURE setcust (p_id NUMBER);
--PROCEDURE setinte (p_id NUMBER);
PROCEDURE setdetails (p_cust NUMBER
,p_inte NUMBER);
PROCEDURE setcookies;
--TYPE t_user_tab IS TABLE OF t_user_rec
--INDEX BY BINARY_INTEGER;
END cafo_session_variables;
/