$FUNCNAME$
	COM_OPEN()
$CATEGORY$
  Serial I/O
$SUMMARY$
	Opens the port and initializes the buffer
$LANG_RU$
	    .
$SYNTAX$
	COM_OPEN(<nComPort>,<notused>,<notused>,<notused>,
		[<lRTSCTS>],[<lXONXOFF>],[<lDebug>]) --> lStatus
$ARGUMENTS$
	<nComPort> - Designates the number of the port (1 to N).
	<lRTSCRS>  - Enable or disable use of hardware flow control.
	<lXONXOFF> - Enable or disable use of software flow control.
	<lDebug> - True value enable com port debug output
$LANG_RU$
	<nComPort> -   ( 1  N).
	<lRTSCRS> -        .
	<lXONXOFF> -        .
	<lDebug> -    .
$RETURNS$
	Returns .T. when the port has been successfully opened and you can select the buffer.
$LANG_RU$
	 .T.     .
$DESCRIPTION$
	This function allows you to open a serial interface port.
$LANG_RU$
	     .
$EXAMPLES$
	IF COM_NUM() > 0
	    ComOk  :=  COM_OPEN(1)     // Open COM1

	    IF .NOT. ComOk
		 ? "Port cannot be opened  !"
	    ENDIF
	ENDIF
$PECULIARITIES$
$LANG_RU$
$PLATFORMS$
   No dependies of platform.
   $LANG_RU$
      
$SEEALSO$
	COM_FLUSH(),COM_INIT(),COM_READ(),COM_SEND(),COM_SFLUSH()
$AUTHOR$
ITK,Paul
$END$
