home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / opendc12.zip / od124os2.exe / od12osp1.exe / src / dynamicp / bscript / scominit.c < prev    next >
Text File  |  1997-04-02  |  2KB  |  48 lines
  1. /*====START_GENERATED_PROLOG======================================
  2.  */
  3. /*
  4.  *   COMPONENT_NAME: oddynamicpart
  5.  *
  6.  *   CLASSES: none
  7.  *
  8.  *   ORIGINS: 82,27
  9.  *
  10.  *
  11.  *   (C) COPYRIGHT International Business Machines Corp. 1995,1996
  12.  *   All Rights Reserved
  13.  *   Licensed Materials - Property of IBM
  14.  *   US Government Users Restricted Rights - Use, duplication or
  15.  *   disclosure restricted by GSA ADP Schedule Contract with IBM Corp.
  16.  *       
  17.  *   IBM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
  18.  *   ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  19.  *   PURPOSE. IN NO EVENT SHALL IBM BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  20.  *   CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
  21.  *   USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
  22.  *   OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE
  23.  *   OR PERFORMANCE OF THIS SOFTWARE.
  24.  */
  25. /*====END_GENERATED_PROLOG========================================
  26.  */
  27. /* @(#) 1.3 com/src/samples/dynamicp/bscript/scominit.c, oddynamicpart, od96os2, odos29712d 11/1/96 08:50:45 [3/21/97 17:48:34]
  28. *******************************************************************
  29. ** Name: void CommonInit
  30. **
  31. ** Description:  Common initialization code common to InitPart and
  32. **               InitPartFromStorage.
  33. **
  34. *******************************************************************
  35. */
  36. try {
  37.     // create scripting event manager
  38.     ODGUID odguid = {0xd3662880, 0x267a, 0x11d0,
  39.                      {0xa5, 0xc3, 0x00, 0x04, 0xac, 0x32, 0x80, 0xdc}};
  40.     _fEvtGuid = odguid;
  41.  
  42.     Environment *ev = somGetGlobalEnvironment();
  43.     _fEventMgr = new ODDSEventMgr(ev, _fEvtGuid);
  44.     somSelf->AddEventMgr(ev, _fEventMgr);
  45. } catch (...) {
  46.    reportAnyException(somGetGlobalEnvironment());
  47. } /* end try */
  48.