home *** CD-ROM | disk | FTP | other *** search
/ Australian Personal Computer 1999 July / APC47-1.ISO / workshop / win95 / pws / mts4.cab / Account.VC_Account.idl < prev    next >
Encoding:
Text File  |  1997-11-14  |  2.7 KB  |  144 lines
  1. // Filename: Account.idl
  2. //
  3. // Description: IDL source for Account.dll
  4. // This file will be processed by the MIDL tool to
  5. // produce the type library (Account.tlb) and marshalling code
  6. //
  7. // This file is provided as part of the Microsoft Transaction Server Samples
  8. //
  9. // THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT 
  10. // WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, 
  11. // INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES 
  12. // OF MERCHANTABILITY AND/OR FITNESS FOR A  PARTICULAR 
  13. // PURPOSE.
  14. //
  15. // Copyright (C) 1997 Microsoft Corporation, All rights reserved
  16.  
  17. #include <mtxattr.h>
  18.  
  19.     [
  20.         object,
  21.         uuid(04CF0B72-1989-11D0-B917-0080C7394688),
  22.         dual,
  23.         helpstring("IAccount Interface"),
  24.         pointer_default(unique)
  25.  
  26.     ]
  27.     interface IAccount : IDispatch
  28.     {
  29.         import "oaidl.idl";
  30.         HRESULT Post(        
  31.             [in] long lAccount,
  32.             [in] long lAmount,
  33.             [out,retval] BSTR* pbstrResult);
  34.     };
  35.  
  36.     [
  37.         object,
  38.         uuid(04CF0B77-1989-11D0-B917-0080C7394688),
  39.         dual,
  40.         helpstring("IMoveMoney Interface"),
  41.         pointer_default(unique)
  42.  
  43.     ]
  44.     interface IMoveMoney : IDispatch
  45.     {
  46.         import "oaidl.idl";
  47.         HRESULT Perform(        
  48.             [in] long lPrimeAccount,
  49.             [in] long lSecondAccount,
  50.             [in] long lAmount,
  51.             [in] long lTranType,
  52.             [out, retval] BSTR* pbstrResult);
  53.     };
  54.     
  55.         
  56.     [
  57.         object,
  58.         uuid(A81260B1-DDC8-11D0-B5A0-00C04FB957D8),
  59.         dual,
  60.         helpstring("IGetReceipt Interface"),
  61.         pointer_default(unique)
  62.  
  63.     ]
  64.     interface IGetReceipt : IDispatch
  65.     {
  66.         import "oaidl.idl";
  67.         HRESULT GetNextReceipt (
  68.             [out,retval] long* plReceiptNo);
  69.     };
  70.     
  71.     [
  72.         object,
  73.         uuid(A81260B7-DDC8-11D0-B5A0-00C04FB957D8),
  74.         dual,
  75.         helpstring("IUpdateReceipt Interface"),
  76.         pointer_default(unique)
  77.  
  78.     ]
  79.     interface IUpdateReceipt : IDispatch
  80.     {
  81.         import "oaidl.idl";
  82.         HRESULT Update (
  83.             [out,retval] long* plReceiptNo);
  84.     };
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93. [
  94.     uuid(04CF0B70-1989-11D0-B917-0080C7394688),
  95.     version(1.0),
  96.     helpstring("Sample Bank Account (VC version)")
  97. ]
  98. library ACCOUNT
  99. {
  100.     importlib("stdole2.tlb");
  101.  
  102.     [
  103.         uuid(04CF0B76-1989-11D0-B917-0080C7394688),
  104.         helpstring("Account Class"),
  105.         TRANSACTION_REQUIRED
  106.     ]
  107.     coclass CAccount
  108.     {
  109.         [default] interface IAccount;
  110.     };
  111.  
  112.     [
  113.         uuid(04CF0B7B-1989-11D0-B917-0080C7394688),
  114.         helpstring("MoveMoney Class"),
  115.         TRANSACTION_REQUIRED
  116.     ]
  117.     coclass CMoveMoney
  118.     {
  119.         [default] interface IMoveMoney;
  120.     };
  121.     
  122.     [
  123.         uuid(A81260B2-DDC8-11D0-B5A0-00C04FB957D8),
  124.         helpstring("GetReceipt Class"),
  125.         TRANSACTION_SUPPORTED
  126.     ]
  127.     coclass CGetReceipt
  128.     {
  129.         [default] interface IGetReceipt;
  130.     };
  131.  
  132.     
  133.     [
  134.         uuid(A81260B8-DDC8-11D0-B5A0-00C04FB957D8),
  135.         helpstring("UpdateReceipt Class"),
  136.         TRANSACTION_REQUIRES_NEW
  137.     ]
  138.     coclass CUpdateReceipt
  139.     {
  140.         [default] interface IUpdateReceipt;
  141.     };
  142.  
  143. };
  144.