//  29.07.2004   03.02.02.02

	    ()    .

      "NASC_Exchange.dll"  a "URVExchange.inc"  
   . 


       
	procedure nasc_OpenExchange(Wnd: HWND; Msg: DWord);
   HWND ,       .

  ,     .
	procedure nasc_CloseExchange();


			***	        .	***


1. procedure nasc_CmdTest(NCommand: Integer);
           .
   NCommand,          
 .
      .

2. procedure nasc_CmdCallGroup(const CmdCallGroup: TCmdCallGroup);
    .    
	TCmdCallGroup = packed record
		NCommand: Integer;		-  ( )
		IDGroup: DWord;		- ID ,   
		Phone: array [0..28] of Char;	-  ,   .
	end;
         .

3. procedure nasc_CmdHold(NCommand: Integer);
    ,     ,   "".
   NCommand,          
 .
         "".

4. procedure nasc_CmdSwitch(NCommand: Integer);
         "".
   NCommand,          
 .
         .

5. procedure nasc_CmdTransfer(NCommand: Integer);
    . ,    ""           .     .
   NCommand,          
 .
          .

6. procedure nasc_CmdDisconect(NCommand: Integer; ForAll: Boolean);
   "" .    NCommand,            .   ForAll.    ForAll = True,      .    ForAll = False,      (..     ).
         "" .

7. procedure nasc_CmdDTMFDial(const CmdDTMFDial: TCmdDTMFDial);
    DTMF         .
   NCommand,          
 .     (0-9, *, #)   .
         DTMF . 

				***	     	***


       "LParam"  "Msg"    .
	te_CmdResult		= 1;		-   
	te_CallToOperator	= 2;		-     
	te_CallToOperatorEnd	= 3;		-        


   "te_CmdResult"   
	function nasc_GetCmdResult(var CmdResult: TCmdResult): Boolean;
   ,     
	TCmdResult = packed record
		Command: Integer;		- ,     
		NCommand: Integer;		-  (,     )
		Result: Boolean;		-   
		ErrorCod: Integer;		-   (,   0)
	end;


   "te_CallToOperator"   
	function nasc_GetCallToOperator(var CallToOperator: TCallToOperator): Boolean;
   ,     
	TCallToOperator = packed record
		ID: DWord;					- ID  
		Name: array [0..48] of Char;	-   
		Phone_A: array [0..28] of Char;	-   ""
		Phone_B: array [0..28] of Char;	-   ""
		Time: TSystemTime;			-   
	end;


   "te_CallToOperatorEnd"   
	function nasc_GetCallToOperatorEnd(var CallToOperatorEnd: TCallToOperatorEnd): Boolean;
   ,     
	TCallToOperatorEnd = packed record
		Time: TSystemTime;			-   
	end;

