home bbs files messages ]

Forums before death by AOL, social media and spammers... "We can't have nice things"

   comp.databases.oracle      Overblown overpriced overengineered SHIT      2,288 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 1,642 of 2,288   
   Mat Hess to All   
   Re: How to call a private package level    
   14 Aug 04 21:54:55   
   
   From: LBMKGKUXJFJU@spammotel.com   
      
   I figured it out.   
      
   If I want a function or a procedure to be private, I just add it to   
   the body of the package. But note: The private function must be   
   declared before any code that calls  it!   
      
   create or replace package  test   
   is   
   	FUNCTION MYPUBLICFUNC (parm in integer) return INTEGER;   
   end;   
   /   
   create or replace package body test   
   AS   
   	-- MUST Declare HERE   
                 FUNCTION MYPRIVATEFUNC (parm in integer)   
   	return integer   
   	IS   
   	BEGIN   
   		RETURN 3*parm;   
   	END;   
      
   	FUNCTION MYPUBLICFUNC (parm in integer)   
   	return integer   
   	IS   
   	BEGIN   
   		RETURN test.MYPRIVATEFUNC(parm);   
   	END;   
      
   	-- MUST NOT DECARE HERE!!   
      
      
   END;   
      
   Regards Mat   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca