/*
 * $Id$
 */

/*
 * Harbour Project source code:
 * HTML Classes
 *
 * Copyright 2007 Hannes Ziegler <hz/at/knowleXbase.com>
 * www - http://harbour-project.org
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this software; see the file COPYING.  If not, write to
 * the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
 * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/).
 *
 * As a special exception, the Harbour Project gives permission for
 * additional uses of the text contained in its release of Harbour.
 *
 * The exception is that, if you link the Harbour libraries with other
 * files to produce an executable, this does not by itself cause the
 * resulting executable to be covered by the GNU General Public License.
 * Your use of that executable is in no way restricted on account of
 * linking the Harbour library code into it.
 *
 * This exception does not however invalidate any other reasons why
 * the executable file might be covered by the GNU General Public License.
 *
 * This exception applies only to the code released by the Harbour
 * Project under the name Harbour.  If you copy code from other
 * Harbour Project or Free Software Foundation releases into a copy of
 * Harbour, as the General Public License permits, the exception does
 * not apply to the code that you add in this way.  To avoid misleading
 * anyone as to the status of such modified files, you must delete
 * this exception notice from them.
 *
 * If you write modifications of your own for Harbour, it is your choice
 * whether to permit this exception to apply to your modifications.
 *
 */

#include "error.ch"
#include "hbclass.ch"
#include "thtml.ch"

// A Html document can have more than 16 nesting levels.
// The current implementation of FOR EACH is not suitable for the HTML classes

// Directives for a light weight html parser
#xtrans P_PARSER( <c> )       =>    { <c>, 0, Len( <c> ), 0 }
#define P_STR                 1    // the string to parse
#define P_POS                 2    // current parser position
#define P_LEN                 3    // length of string
#define P_END                 4    // last parser position

#xtrans :p_str                =>   \[P_STR]
#xtrans :p_pos                =>   \[P_POS]
#xtrans :p_len                =>   \[P_LEN]
#xtrans :p_end                =>   \[P_END]

#xtrans P_SEEK( <a>, <c> )    =>   (<a>:p_end:=<a>:p_pos, <a>:p_pos:=hb_At(<c>,<a>:p_str,<a>:p_end+1))
#xtrans P_SEEKI( <a>, <c> )   =>   (<a>:p_end:=<a>:p_pos, <a>:p_pos:=hb_AtI(<c>,<a>:p_str,<a>:p_end+1))
#xtrans P_PEEK( <a>, <c> )    =>   (<a>:p_end:=<a>:p_pos, __tip_PStrCompi( <a>:p_str, <a>:p_pos, <c> ))
#xtrans P_NEXT( <a> )         =>   (<a>:p_end:=<a>:p_pos, SubStr(<a>:p_str,++<a>:p_pos,1))
#xtrans P_PREV( <a> )         =>   (<a>:p_end:=<a>:p_pos, SubStr(<a>:p_str,--<a>:p_pos,1))

// Directives for a light weight stack
#define S_DATA                1    // array holding data elements
#define S_NUM                 2    // number of occupied data elements
#define S_SIZE                3    // total size of data array
#define S_STEP                4    // number of elements for auto sizing

#xtrans S_STACK()             =>   S_STACK(64)
#xtrans S_STACK( <n> )        =>   {Array(<n>),0,<n>,Max(32,Int(<n>/2))}
#xtrans S_GROW( <a> )         =>   (iif(++<a>\[S_NUM]><a>\[S_SIZE],ASize(<a>\[S_DATA],(<a>\[S_SIZE]+=<a>\[S_STEP])),<a>))
#xtrans S_SHRINK( <a> )       =>   (iif(<a>\[S_NUM]>0 .AND. --<a>\[S_NUM]\<<a>\[S_SIZE]-<a>\[S_STEP],ASize(<a>\[S_DATA],<a>\[S_SIZE]-=<a>\[S_STEP]),<a>))
#xtrans S_COMPRESS( <a> )     =>   (ASize(<a>\[S_DATA],<a>\[S_SIZE]:=<a>\[S_NUM]))
#xtrans S_PUSH(<a>,<x>)       =>   (S_GROW(<a>),<a>\[S_DATA,<a>\[S_NUM]]:=<x>)
#xtrans S_POP(<a>,@<x>)       =>   (<x>:=<a>\[S_DATA,<a>\[S_NUM]],<a>\[S_DATA,<a>\[S_NUM]]:=NIL,S_SHRINK(<a>))
#xtrans S_POP(<a>)            =>   (<a>\[S_DATA,<a>\[S_NUM]]:=NIL,S_SHRINK(<a>))
#xtrans S_TOP(<a>)            =>   (<a>\[S_DATA,<a>\[S_NUM]])


THREAD STATIC t_aHtmlAttr                  // data for HTML attributes
THREAD STATIC t_hTagTypes                  // data for HTML tags
THREAD STATIC t_aHtmlAnsiEntities          // HTML character entities (ANSI character set)
THREAD STATIC t_lInit      := .F.          // initilization flag for HTML data

// #define _DEBUG_
#ifdef _DEBUG_
#xtranslate HIDDEN:  =>  EXPORTED:   // debugger can't see HIDDEN iVars
#endif

/*
 * Class for handling an entire HTML document
 */
CREATE CLASS THtmlDocument MODULE FRIENDLY

   HIDDEN:
   VAR oIterator
   VAR nodes

   EXPORTED:
   VAR root    READONLY
   VAR head    READONLY
   VAR body    READONLY
   VAR changed INIT .T.

   METHOD new( cHtmlString )
   METHOD readFile( cFileName )
   METHOD writeFile( cFileName )

   METHOD collect()
   METHOD toString()
   METHOD getNode( cTagName )
   METHOD getNodes( cTagName )
   METHOD findFirst( cName, cAttrib, cValue, cData )
   METHOD findFirstRegex( cName, cAttrib, cValue, cData )
   METHOD findNext() INLINE ::oIterator:Next()

ENDCLASS

// accepts a HTML formatted string

METHOD new( cHtmlString ) CLASS THtmlDocument

   LOCAL cEmptyHtmlDoc, oNode, oSubNode, oErrNode, aHead, aBody, nMode := 0

   cEmptyHtmlDoc := '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">' + hb_eol() + ;
      '<html>' + hb_eol() + ;
      ' <head>' + hb_eol() + ;
      ' </head>' + hb_eol() + ;
      ' <body>' + hb_eol() + ;
      ' </body>' + hb_eol() + ;
      '</html>'

   IF ! HB_ISSTRING( cHtmlString )
      ::root := THtmlNode():new( cEmptyHtmlDoc )
   ELSE
      IF ! "<html" $ Lower( Left( cHtmlString, 4096 ) )
         ::root := THtmlNode():new( cEmptyHtmlDoc )
         nMode := 1
      ELSE
         ::root := THtmlNode():new( cHtmlString )
      ENDIF
   ENDIF

   ::root:document := Self
   ::head := ::getNode( "head" )
   ::body := ::getNode( "body" )

   IF ::head == NIL .AND. ::body == NIL
      // A HTML document consists of <html>, <head> and <body> tags
      // Although they are optional, the THtmlDocument class enforces them
      // so that the instance variables :head and :body are always available
      aHead := {}
      aBody := {}
      FOR EACH oSubNode IN ::root:htmlContent
         IF oSubNode:isType( CM_HEAD )
            AAdd( aHead, oSubNode )
         ELSE
            AAdd( aBody, oSubNode )
         ENDIF
      NEXT

      ::root    := THtmlNode():new( cEmptyHtmlDoc )
      ::root:document := Self
      ::changed := .T.
      ::head    := ::getNode( "head" )
      ::body    := ::getNode( "body" )

      FOR EACH oSubNode IN aHead
         IF oSubNode:isType( CM_HEAD )
            ::head:addNode( oSubNode )
         ELSE
            ::body:addNode( oSubNode )
         ENDIF
      NEXT

      FOR EACH oSubNode IN aBody
         IF Lower( oSubNode:htmlTagName ) $ "html,head,body"
            // This node is an error in the HTML string.
            // We gracefully add its subnodes to the <body> tag
            FOR EACH oErrNode IN oSubNode:htmlContent
               ::body:addNode( oErrNode )
            NEXT
         ELSE
            IF oSubNode:isType( CM_HEAD )
               oSubNode:delete()
               ::head:addNode( oSubNode )
            ELSE
               ::body:addNode( oSubNode )
            ENDIF
         ENDIF
      NEXT

   ELSEIF ::head == NIL
      ::head := ::body:insertBefore( THtmlNode():new( ::body, "head" ) )

   ELSEIF ::body == NIL
      ::head := ::head:insertAfter( THtmlNode():new( ::head, "body" ) )

   ENDIF

   IF nMode == 1
      oNode := THtmlNode():new( cHtmlString )

      FOR EACH oSubNode IN oNode:htmlContent
         IF oSubNode:isType( CM_HEAD )
            ::head:addNode( oSubNode )
         ELSE
            ::body:addNode( oSubNode )
         ENDIF
      NEXT
   ENDIF

   RETURN Self

// Builds a HTML formatted string

METHOD toString() CLASS THtmlDocument

   RETURN ::root:toString()

// reads HTML file and parses it into tree of objects

METHOD readFile( cFileName ) CLASS THtmlDocument

   IF ! hb_FileExists( cFileName )
      RETURN .F.
   ENDIF
   ::changed := .T.
   ::new( MemoRead( cFileName ) )

   RETURN .T.

// writes the entire tree of HTML objects into a file

METHOD writeFile( cFileName ) CLASS THtmlDocument

   LOCAL cHtml := ::toString()
   LOCAL nFileHandle := FCreate( cFileName )

   IF FError() != 0
      RETURN .F.
   ENDIF

   FWrite( nFileHandle, cHtml )
   FClose( nFileHandle )
   ::changed := .F.

   RETURN FError() == 0

// builds a one dimensional array of all nodes contained in the HTML document

METHOD collect() CLASS THtmlDocument

   IF ::changed
      ::nodes   := ::root:collect()
      ::changed := .F.
   ENDIF

   RETURN ::nodes

// returns the first tag matching the passed tag name

METHOD getNode( cTagName ) CLASS THtmlDocument

   LOCAL oNode

   IF ::changed
      ::collect()
   ENDIF

   FOR EACH oNode IN ::nodes
      IF Lower( oNode:htmlTagName ) == Lower( cTagName )
         RETURN oNode
      ENDIF
   NEXT

   RETURN NIL

// returns all tags matching the passed tag name

METHOD getNodes( cTagName ) CLASS THtmlDocument

   LOCAL oNode, stack := S_STACK()

   IF ::changed
      ::collect()
   ENDIF

   FOR EACH oNode IN ::nodes
      IF Lower( oNode:htmlTagName ) == Lower( cTagName )
         S_PUSH( stack, oNode )
      ENDIF
   NEXT

   S_COMPRESS( stack )

   RETURN stack[ S_DATA ]

// finds the first HTML tag matching the search criteria

METHOD findFirst( cName, cAttrib, cValue, cData ) CLASS THtmlDocument

   ::oIterator := THtmlIteratorScan():New( Self )

   RETURN ::oIterator:Find( cName, cAttrib, cValue, cData )

// finds the first HTML tag matching the RegEx search criteria

METHOD findFirstRegex( cName, cAttrib, cValue, cData ) CLASS THtmlDocument

   ::oIterator := THtmlIteratorRegex():New( Self )

   RETURN ::oIterator:Find( cName, cAttrib, cValue, cData )

/*
 * Abstract super class for THtmlIteratorScan and THtmlIteratorScanRegEx
 *
 * (Adopted from TXMLIterator -> source\rtl\txml.prg)
 */

CREATE CLASS THtmlIterator MODULE FRIENDLY

   METHOD New( oHtml ) CONSTRUCTOR
   METHOD Next()
   METHOD Rewind()
   METHOD Find( cName, cAttribute, cValue, cData )
   METHOD GetNode()                 INLINE   ::oNode
   METHOD SetContext()
   METHOD Clone()

   HIDDEN:

   VAR cName
   VAR cAttribute
   VAR cValue
   VAR cData
   VAR oNode
   VAR oTop
   VAR aNodes
   VAR nCurrent
   VAR nLast

   METHOD MatchCriteria()

ENDCLASS

// accepts a THtmlNode or THtmlDocument object

METHOD New( oHtml ) CLASS THtmlIterator

   IF oHtml:isDerivedFrom ( "THtmlDocument" )
      ::oNode := oHtml:root
      ::aNodes := oHtml:nodes
   ELSE
      ::oNode  := oHtml
      ::aNodes := ::oNode:collect()
   ENDIF

   ::oTop     := ::oNode
   ::nCurrent := 1
   ::nLast    := Len( ::aNodes )

   RETURN Self

METHOD rewind() CLASS THtmlIterator

   ::oNode := ::oTop
   ::nCurrent := 0

   RETURN Self

METHOD Clone() CLASS THtmlIterator

   LOCAL oRet

   oRet            := THtmlIterator():New( ::oTop )
   oRet:cName      := ::cName
   oRet:cAttribute := ::cAttribute
   oRet:cValue     := ::cValue
   oRet:cData      := ::cData
   oRet:nCurrent   := 0
   oRet:nLast      := Len( ::aNodes )
   oRet:aNodes     := ::aNodes

   RETURN oRet

METHOD SetContext() CLASS THtmlIterator

   ::oTop          := ::oNode
   ::aNodes        := ::oNode:collect()
   ::nCurrent      := 0
   ::nLast         := Len( ::aNodes )

   RETURN Self

METHOD Find( cName, cAttribute, cValue, cData ) CLASS THtmlIterator

   ::cName         := cName
   ::cAttribute    := cAttribute
   ::cValue        := cValue
   ::cData         := cData

   IF ::nLast == 0
      ::nCurrent := 0
      RETURN NIL
   ENDIF

   IF ::MatchCriteria( ::oNode )
      RETURN ::oNode
   ENDIF

   RETURN ::Next()

METHOD Next() CLASS THtmlIterator

   LOCAL oFound, lExit := .F.

   DO WHILE ! lExit
      BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
         oFound := ::aNodes[ ++::nCurrent ]
         IF ::MatchCriteria( oFound )
            ::oNode := oFound
            lExit := .T.
         ENDIF
      RECOVER
         lExit      := .T.
         oFound     := NIL
         ::nCurrent := 0
      END SEQUENCE
   ENDDO

   RETURN oFound

METHOD MatchCriteria() CLASS THtmlIterator

   RETURN .T.

/********************************************
   Iterator scan class
*********************************************/

CLASS THtmlIteratorScan FROM THtmlIterator MODULE FRIENDLY

   METHOD New( oNodeTop ) CONSTRUCTOR

   HIDDEN:

   METHOD MatchCriteria( oFound )

ENDCLASS

METHOD New( oNodeTop ) CLASS THtmlIteratorScan

   ::Super:New( oNodeTop )

   RETURN Self

METHOD MatchCriteria( oFound ) CLASS THtmlIteratorScan

   LOCAL xData

   IF ::cName != NIL .AND. !( Lower( ::cName ) == Lower( oFound:htmlTagName ) )
      RETURN .F.
   ENDIF

   IF ::cAttribute != NIL .AND. ! hb_HHasKey( oFound:getAttributes(), ::cAttribute )
      RETURN .F.
   ENDIF

   IF ::cValue != NIL
      xData := oFound:getAttributes()
      IF hb_HScan( xData, {| xKey, cValue | HB_SYMBOL_UNUSED( xKey ), Lower( ::cValue ) == Lower( cValue ) } ) == 0
         RETURN .F.
      ENDIF
   ENDIF

   IF ::cData != NIL
      xData := oFound:getText( " " )
      /* NOTE: != changed to !( == ) */
      IF Empty( xData ) .OR. !( AllTrim( ::cData ) == AllTrim( xData ) )
         RETURN .F.
      ENDIF
   ENDIF

   RETURN .T.

/********************************************
   Iterator regex class
*********************************************/

CLASS THtmlIteratorRegex FROM THtmlIterator MODULE FRIENDLY

   METHOD New( oNodeTop ) CONSTRUCTOR
   HIDDEN:
   METHOD MatchCriteria( oFound )

ENDCLASS

METHOD New( oNodeTop ) CLASS THtmlIteratorRegex

   ::Super:New( oNodeTop )

   RETURN Self

METHOD MatchCriteria( oFound ) CLASS THtmlIteratorRegex

   LOCAL xData

   IF ::cName != NIL .AND. ! hb_regexLike( Lower( oFound:htmlTagName ), Lower( ::cName ) )
      RETURN .F.
   ENDIF

   IF ::cAttribute != NIL .AND. ;
         hb_HScan( oFound:getAttributes(), {| cKey | hb_regexLike( Lower( ::cAttribute ), cKey ) } ) == 0
      RETURN .F.
   ENDIF

   IF ::cValue != NIL .AND. ;
         hb_HScan( oFound:getAttributes(), {| xKey, cValue | HB_SYMBOL_UNUSED( xKey ), hb_regexLike( ::cValue, cValue ) } ) == 0
      RETURN .F.
   ENDIF

   IF ::cData != NIL
      xData := oFound:getText( " " )
      IF Empty( xData ) .OR. ! hb_regexHas( AllTrim( ::cData ), AllTrim( xData ) )
         RETURN .F.
      ENDIF
   ENDIF

   RETURN .T.

/*
 * Class representing a HTML node tree.
 * It parses a HTML formatted string
 */

CREATE CLASS THtmlNode MODULE FRIENDLY

   HIDDEN:

   VAR root
   VAR _document
   VAR parent
   VAR htmlContent

   METHOD parseHtml( parser )
   METHOD parseHtmlFixed( parser )
   METHOD _getTextNode()
   METHOD _setTextNode( cText )
   METHOD keepFormatting()

   EXPORTED:

   VAR htmlTagName     READONLY
   VAR htmlEndTagName  READONLY
   VAR htmlTagType     READONLY
   VAR htmlAttributes  READONLY

   METHOD New( oParent, cTagName, cAttrib, cContent )

   METHOD isType( nType )
   ACCESS isEmpty()
   ACCESS isInline()
   ACCESS isOptional()
   ACCESS isNode()
   ACCESS HB_ISBLOCK()

   METHOD addNode( oTHtmlNode )
   METHOD insertAfter( oTHtmlNode )
   METHOD insertBefore( oTHtmlNode )
   METHOD Delete()

   // Messages from TXmlNode
   MESSAGE insertBelow METHOD addNode
   MESSAGE unlink      METHOD Delete

   METHOD firstNode( lRoot )
   METHOD lastNode( lRoot )

   ACCESS nextNode()
   ACCESS prevNode()

   ACCESS siblingNodes()  INLINE iif( ::parent == NIL, NIL, ::parent:htmlContent )
   ACCESS childNodes()    INLINE iif( ::isNode(), ::htmlContent, NIL )
   ACCESS parentNode()    INLINE ::parent
   ACCESS document()      INLINE iif( ::root == NIL, NIL, ::root:_document )

   METHOD toString( nIndent )
   METHOD attrToString()

   METHOD collect( oEndNode )
   METHOD getText( cEOL )

   METHOD getAttribute( cName )
   METHOD getAttributes()

   METHOD setAttribute( cName, cValue )
   METHOD setAttributes( cHtml )

   METHOD delAttribute( cName )
   METHOD delAttributes()

   METHOD isAttribute( cName )

   ACCESS TEXT    INLINE ::_getTextNode()
   ASSIGN TEXT( x ) INLINE ::_setTextNode( x )

   ACCESS attr    INLINE ::getAttributes()
   ASSIGN attr( x ) INLINE ::setAttributes( x )

   METHOD pushNode  OPERATOR +
   METHOD popNode   OPERATOR -

   METHOD findNodeByTagName
   METHOD findNodesByTagName

   ERROR HANDLER noMessage

   METHOD noAttribute

ENDCLASS

METHOD new( oParent, cTagName, cAttrib, cContent ) CLASS THtmlNode

   IF ! t_lInit
      THtmlInit( .T. )
   ENDIF

   IF HB_ISSTRING( oParent )
      // a HTML string is passed -> build new tree of objects
      IF Chr( 9 ) $ oParent
         oParent := StrTran( oParent, Chr( 9 ), Chr( 32 ) )
      ENDIF
      ::root           := Self
      ::htmlTagName    := "_root_"
      ::htmlTagType    := THtmlTagType( "_root_" )
      ::htmlContent    := {}
      ::parseHtml( P_PARSER( oParent ) )
   ELSEIF HB_ISOBJECT( oParent )
      // a HTML object is passed -> we are in the course of building an object tree
      ::root           := oParent:root
      ::parent         := oParent
      IF HB_ISSTRING( cAttrib )
         IF Right( cAttrib, 1 ) == "/"
            cAttrib := Stuff( cAttrib, Len( cAttrib ), 1, " " )
            ::htmlEndTagName := "/"
            ::htmlAttributes := RTrim( cAttrib )
         ELSE
            ::htmlAttributes := cAttrib
         ENDIF
      ELSE
         ::htmlAttributes := cAttrib
      ENDIF
      ::htmlTagName    := cTagName
      ::htmlTagType    := THtmlTagType( cTagName )
      ::htmlContent    := iif( cContent == NIL, {}, cContent )
   ELSE
      RETURN ::error( "Parameter error", ::className(), ":new()", EG_ARG, hb_AParams() )
   ENDIF

   RETURN Self

METHOD isType( nType ) CLASS THtmlNode

   LOCAL lRet

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      lRet := hb_bitAnd( ::htmlTagType[ 2 ], nType ) > 0
   RECOVER
      lRet := .F.
   END SEQUENCE

   RETURN lRet

// checks if this is a node that is always empty and never has HTML text, e.g. <img>,<link>,<meta>

METHOD isEmpty() CLASS THtmlNode

   RETURN hb_bitAnd( ::htmlTagType[ 2 ], CM_EMPTY ) > 0

// checks if this is a node that may occur inline, eg. <b>,<font>

METHOD isInline() CLASS THtmlNode

   RETURN hb_bitAnd( ::htmlTagType[ 2 ], CM_INLINE ) > 0

// checks if this is a node that may appear without a closing tag, eg. <p>,<tr>,<td>

METHOD isOptional() CLASS THtmlNode

   RETURN hb_bitAnd( ::htmlTagType[ 2 ], CM_OPT ) > 0

// checks if this is a node (leafs contain no further nodes, e.g. <br>,<hr>,_text_)

METHOD isNode() CLASS THtmlNode

   RETURN HB_ISARRAY( ::htmlContent ) .AND. Len( ::htmlContent ) > 0

// checks if this is a block node that must be closed with an ending tag: eg: <table></table>, <ul></ul>

METHOD HB_ISBLOCK() CLASS THtmlNode

   RETURN hb_bitAnd( ::htmlTagType[ 2 ], CM_BLOCK ) > 0

// checks if this is a node whose text line formatting must be preserved: <pre>,<script>,<textarea>

METHOD keepFormatting() CLASS THtmlNode

   RETURN "<" + Lower( ::htmlTagName ) + ">" $ "<pre>,<script>,<textarea>"

// parses a HTML string and builds a tree of THtmlNode objects

METHOD parseHtml( parser ) CLASS THtmlNode

   LOCAL nLastPos := parser:p_pos
   LOCAL lRewind  := .F.
   LOCAL oThisTag, oNextTag, oLastTag
   LOCAL cTagName, cAttr, nStart, nEnd, nPos, cText

   IF ! "<" $ parser:p_Str
      // Plain text
      ::addNode( THtmlNode():new( Self, "_text_", , parser:p_Str ) )
      RETURN Self
   ENDIF

   oThisTag := Self

   DO WHILE P_SEEK( parser, "<" ) > 0
      nStart   := parser:p_pos
      P_SEEK( parser, ">" )
      nEnd     := parser:p_pos
      cAttr    := SubStr( parser:p_Str, nStart, nEnd - nStart + 1 )
      cText    := LTrim( SubStr( parser:p_str, nLastPos + 1, nStart - nLastPos - 1 ) )
      cTagName := CutStr( " ", @cAttr )

      IF !( cText == "" )
         IF Left( cText, 2 ) == "</"
            // ending tag of previous node
            cText := Lower( AllTrim( SubStr( CutStr( ">", @cText ), 3 ) ) )
            oLastTag := oThisTag:parent
            DO WHILE oLastTag != NIL .AND. !( Lower( oLastTag:htmlTagName ) == cText ) /* NOTE: != changed to !( == ) */
               oLastTag := oLastTag:parent
            ENDDO
            IF oLastTag != NIL
               oLastTag:htmlEndTagName := "/" + oLastTag:htmlTagName
            ENDIF

         ELSEIF Chr( 10 ) $ cText
            cText := RTrim( cText )
            nPos := Len( cText ) + 1
            DO WHILE nPos > 0 .AND. SubStr( cText, -- nPos, 1 ) $ Chr( 9 ) + Chr( 10 ) + Chr( 13 )
            ENDDO
            oThisTag:addNode( THtmlNode():new( oThisTag, "_text_", , Left( cText, nPos ) ) )
         ELSE
            oThisTag:addNode( THtmlNode():new( oThisTag, "_text_", , cText ) )
         ENDIF
      ENDIF

      IF cTagName == "<"
         // <  tagName>
         cAttr    := LTrim( cAttr )
         cTagName += CutStr( " ", @cAttr )
      ENDIF
      cTagName := StrTran( cTagName, ">" )
      cTagName := AllTrim( SubStr( cTagName, 2 ) )

      SWITCH Left( cTagName, 1 )
      CASE "!"
         // comment or PI
         oThisTag:addNode( THtmlNode():new( oThisTag, cTagName, Left( cAttr, Len( cAttr ) - 1 ) ) )
         EXIT

      CASE "/"
         // end tag
         IF Lower( "/" + oThisTag:htmlTagName ) == Lower( cTagName )
            oThisTag:htmlEndTagName := cTagName

         ELSE

            oNextTag := oThisTag:parent
            DO WHILE oNextTag != NIL .AND. !( Lower( oNextTag:htmlTagName ) == Lower( SubStr( cTagName, 2 ) ) ) /* NOTE: != changed to !( == ) */
               oNextTag := oNextTag:parent
            ENDDO

            IF oNextTag == NIL
               // orphaned end tag with no opening tag
               LOOP
            ELSE
               // node that opened the end tag
               oNextTag:htmlEndTagName := cTagName
               oThisTag := oNextTag
            ENDIF

         ENDIF

         lRewind := .T.
         EXIT

         OTHERWISE

         IF oThisTag:isOptional()
            // this tag has no closing tag
            // a new opening tag is found
            DO CASE
            CASE Lower( cTagName ) == Lower( oThisTag:htmlTagName )
               // the next tag is the same like this tag
               // ( e.g. <p>|<tr>|<td>|<li>)
               lRewind := .T.
            CASE ( Lower( cTagName ) == Lower( oThisTag:parent:htmlTagName ) ) .AND. ! oThisTag:isType( CM_LIST )
               // the next tag is the same like the parent tag
               // ( e.g. this is <td> and the next tag is <tr> )
               lRewind := .T.
            CASE Lower( ::htmlTagName ) $ "dd,dt"
               // <dl><dt><dd> is a unique special case
               IF Lower( cTagName ) $ "dd,dt"
                  // next tag is <dt> or <dd>
                  lRewind := .T.
               ENDIF
            ENDCASE

            IF lRewind
               // go back to previous node
               parser:p_pos := nStart - 1
            ENDIF
         ENDIF

         IF ! lRewind
            IF cAttr == ""
               // tag has no attributes
               oNextTag := THtmlNode():new( oThisTag, cTagName )
            ELSE
               // attribute string has ">" at the end. Remove ">"
               oNextTag := THtmlNode():new( oThisTag, cTagName, Left( cAttr, Len( cAttr ) - 1 ) )
            ENDIF

            oThisTag:addNode( oNextTag )

            IF ! oThisTag:isOptional() .AND. Lower( oThisTag:htmlTagName ) == Lower( ctagName )
               oThisTag:htmlEndTagName := "/" + oThisTag:htmlTagName
            ENDIF

            IF oNextTag:keepFormatting()
               // do not spoil formatting of Html text
               oNextTag:parseHtmlFixed( parser )

            ELSEIF ! oNextTag:isEmpty()
               // parse into node list of new tag
               oThisTag := oNextTag

            ENDIF
         ENDIF
      ENDSWITCH

      IF lRewind
         oThisTag := oThisTag:parent
         lRewind := .F.

         IF oThisTag == NIL
            oThisTag := Self
            nLastPos := parser:p_len
            EXIT
         ENDIF
      ENDIF

      nLastPos := parser:p_pos
      IF nLastPos == 0
         EXIT
      ENDIF
   ENDDO

   IF nLastPos > 0 .AND. nLastPos < parser:p_len
      oThisTag:addNode( THtmlNode():new( Self, "_text_", , SubStr( parser:p_str, nLastPos + 1 ) ) )
   ENDIF

   RETURN Self

// parses a HTML string without any changes to indentation and line breaks

METHOD parseHtmlFixed( parser ) CLASS THtmlNode

   LOCAL nStart, nEnd

   // keep entire Html text within tag
   nStart := parser:p_pos + 1
   P_SEEK( parser, "<" )

   IF P_NEXT( parser ) == "!" .AND. P_NEXT( parser ) == "["
      // <![CDATA[   ]]>
      P_SEEK( parser, "]]>" )
   ENDIF

   IF ! P_PEEK( parser, "/" + ::htmlTagName )
      // seek  <  /endtag>
      P_SEEKI( parser, "/" + ::htmlTagName )
   ENDIF

   // back to "<"
   DO WHILE !( P_PREV( parser ) == "<" )
   ENDDO /* NOTE: != changed to !( == ) */

   nEnd  := parser:p_pos
   ::addNode( THtmlNode():new( Self, "_text_", , SubStr( parser:p_Str, nStart, nEnd - nStart ) ) )

   ::htmlEndTagName := "/" + ::htmlTagName

   P_SEEK( parser, ">" )

   RETURN Self

// adds a new CHILD node to the current one

METHOD addNode( oTHtmlNode ) CLASS THtmlNode

   IF oTHtmlNode:parent != NIL .AND. ! oTHtmlNode:parent == Self
      oTHtmlNode:delete()
   ENDIF

   oTHtmlNode:parent := Self
   oTHtmlNode:root   := ::root

   AAdd( ::htmlContent, oTHtmlNode )

   IF ::root != NIL .AND. ::root:_document != NIL
      ::root:_document:changed := .T.
   ENDIF

   RETURN oTHtmlNode

// inserts a SIBLING node before the current one

METHOD insertBefore( oTHtmlNode ) CLASS THtmlNode

   IF ::parent == NIL
      RETURN ::error( "Cannot insert before root node", ::className(), ":insertBefore()", EG_ARG, hb_AParams() )
   ENDIF

   IF oTHtmlNode:parent != NIL .AND. ! oTHtmlNode:parent == Self
      oTHtmlNode:delete()
   ENDIF

   oTHtmlNode:parent := ::parent
   oTHtmlNode:root   := ::root

   IF ::root != NIL .AND. ::root:_document != NIL
      ::root:_document:changed := .T.
   ENDIF

   IF HB_ISARRAY( ::parent:htmlContent )
      hb_AIns( ::parent:htmlContent, 1, oTHtmlNode, .T. )
   ENDIF

   RETURN oTHtmlNode

// inserts a SIBLING node after the current one

METHOD insertAfter( oTHtmlNode ) CLASS THtmlNode

   LOCAL nPos

   IF oTHtmlNode:parent != NIL .AND. ! oTHtmlNode:parent == Self
      oTHtmlNode:delete()
   ENDIF

   oTHtmlNode:parent := ::parent
   oTHtmlNode:root   := ::root

   IF ::root != NIL .AND. ::root:_document != NIL
      ::root:_document:changed := .T.
   ENDIF

   nPos := AScan( ::parent:htmlContent, Self ) + 1

   IF nPos > Len( ::parent:htmlContent )
      ::parent:addNode( oTHtmlNode )
   ELSE
      hb_AIns( ::parent:htmlContent, nPos, oTHtmlNode, .T. )
   ENDIF

   RETURN oTHtmlNode

// deletes this node from the object tree

METHOD Delete()  CLASS THtmlNode

   LOCAL nPos

   IF ::parent == NIL
      RETURN Self
   ENDIF

   IF ::root != NIL .AND. ::root:_document != NIL
      ::root:_document:changed := .T.
   ENDIF

   IF HB_ISARRAY( ::parent:htmlContent )
      nPos := AScan( ::parent:htmlContent, Self )
      hb_ADel( ::parent:htmlContent, nPos, .T. )
   ENDIF

   ::parent := NIL
   ::root   := NIL

   RETURN Self

// returns first node in subtree (.F.) or first node of entire tree (.T.)

METHOD firstNode( lRoot ) CLASS THtmlNode

   IF ! HB_ISLOGICAL( lRoot )
      lRoot := .F.
   ENDIF

   IF lRoot
      RETURN ::root:htmlContent[ 1 ]
   ELSEIF ::htmlTagName == "_text_"
      RETURN ::parent:htmlContent[ 1 ]
   ENDIF

   RETURN iif( Empty( ::htmlContent ), NIL, ::htmlContent[ 1 ] )

// returns last node in subtree (.F.) or last node of entire tree (.T.)

METHOD lastNode( lRoot ) CLASS THtmlNode

   LOCAL aNodes

   IF ! HB_ISLOGICAL( lRoot )
      lRoot := .F.
   ENDIF

   IF ::htmlTagName == "_text_"
      RETURN ::parent:lastNode( lRoot )
   ENDIF

   aNodes := iif( lRoot, ::root:collect(), ::collect() )

   RETURN ATail( aNodes )

// returns next node

METHOD nextNode() CLASS THtmlNode

   LOCAL nPos, aNodes

   IF ::htmlTagName == "_root_"
      RETURN ::htmlContent[ 1 ]
   ENDIF

   /* NOTE: != changed to !( == ) */
   IF !( ::htmlTagName == "_text_" ) .AND. ! Empty( ::htmlContent )
      RETURN ::htmlContent[ 1 ]
   ENDIF

   nPos := AScan( ::parent:htmlContent, {| o | o == Self } )

   IF nPos < Len( ::parent:htmlContent )
      RETURN ::parent:htmlContent[ nPos + 1 ]
   ENDIF

   aNodes := ::parent:parent:collect()
   nPos   := AScan( aNodes, {| o | o == Self } )

   RETURN iif( nPos == Len( aNodes ), NIL, aNodes[ nPos + 1 ] )

// returns previous node

METHOD prevNode() CLASS THtmlNode

   LOCAL nPos, aNodes

   IF ::htmlTagName == "_root_"
      RETURN NIL
   ENDIF

   aNodes := ::parent:collect( Self )
   nPos   := AScan( aNodes, {| o | o == Self } )

   RETURN iif( nPos == 1, ::parent, aNodes[ nPos - 1 ] )

// creates HTML code for this node

METHOD toString( nIndent ) CLASS THtmlNode

   LOCAL cIndent, cHtml := "", oNode

   IF ::htmlTagName == "_text_"
      // a leaf has no child nodes
      RETURN ::htmlContent
   ENDIF

   IF nIndent == NIL
      nIndent := - 1
   ENDIF

   cIndent := iif( ::keepFormatting(), "", Space( Max( 0, nIndent ) ) )

   IF ! ::htmlTagName == "_root_"
      // all nodes but the root node have a HTML tag
      IF ! ::isInline() .OR. ::htmlTagName == "!--"
         cHtml += cIndent
      ELSEIF ::keepFormatting()
         cHtml += hb_eol()
      ENDIF
      cHtml += "<" + ::htmlTagName + ::attrToString()

      IF ! ::htmlEndTagName == "/"
         cHtml += ">"
      ENDIF
   ENDIF

   IF HB_ISARRAY( ::htmlContent )

      FOR EACH oNode IN ::htmlContent
         IF ! oNode:isInline() .OR. oNode:htmlTagName == "!--"
            cHtml += hb_eol()
         ENDIF
         cHtml += oNode:toString( nIndent + 1 )
      NEXT

   ELSEIF HB_ISSTRING( ::htmlContent )
      cHtml += ::htmlContent
   ENDIF

   IF ::htmlEndTagName != NIL
      IF ::isInline() .OR. ::keepFormatting() .OR. ::isType( CM_HEADING ) .OR. ::isType( CM_HEAD )
         RETURN cHtml += iif( ::htmlEndTagName == "/", " />", "<" + ::htmlEndTagName + ">" )
      ENDIF
      IF !( Right( cHtml, Len( hb_eol() ) ) == hb_eol() )
         cHtml += hb_eol()
      ENDIF
      RETURN cHtml += cIndent + iif( ::htmlEndTagName == "/", " />", "<" + ::htmlEndTagName + ">" )
   ELSEIF ::htmlTagName $ "!--,br"
      RETURN cHtml += hb_eol() + cIndent
   ENDIF

   RETURN cHtml

// Builds the attribute string

METHOD attrToString() CLASS THtmlNode

   LOCAL aAttr, cAttr

   IF ::htmlAttributes == NIL
      cAttr := ""

   ELSEIF HB_ISSTRING( ::htmlAttributes )
      cAttr := " " + ::htmlAttributes

   ELSE
      // attributes are parsed into a Hash
      BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
         aAttr := ::htmlTagType[ 1 ]:exec()
      RECOVER
         // Tag has no attributes
         aAttr := {}
      END SEQUENCE
      cAttr := ""
      hb_HEval( ::htmlAttributes, {| cKey, cValue | cAttr += __AttrToStr( cKey, cValue, aAttr, Self ) } )
   ENDIF

   RETURN cAttr

STATIC FUNCTION __AttrToStr( cName, cValue, aAttr, oTHtmlNode )

   LOCAL nPos

   IF ( nPos := AScan( aAttr, {| a | a[ 1 ] == Lower( cName ) } ) ) == 0
      // Tag doesn't have this attribute
      RETURN oTHtmlNode:error( "Invalid HTML attribute for: <" + oTHtmlNode:htmlTagName + ">", oTHtmlNode:className(), cName, EG_ARG, { cName, cValue } )
   ENDIF

   IF aAttr[ nPos, 2 ] == HTML_ATTR_TYPE_BOOL
      RETURN " " + cName
   ENDIF

   RETURN " " + cName + "=" + '"' + cValue + '"'

// collects all (sub)nodes of the tree in a one dimensional array

METHOD collect( oEndNode ) CLASS THtmlNode

   LOCAL stack, oSubNode

   stack := S_STACK()

   IF ::htmlTagName == "_root_"
      FOR EACH oSubNode IN ::htmlContent
         __CollectTags( oSubNode, stack, oEndNode )
      NEXT
   ELSE
      __CollectTags( Self, stack, oEndNode )
   ENDIF

   S_COMPRESS( stack )

   RETURN stack[ S_DATA ]

STATIC FUNCTION __CollectTags( oTHtmlNode, stack, oEndNode )

   LOCAL oSubNode

   S_PUSH( stack, oTHtmlNode )

   IF oTHtmlNode:isNode() .AND. ! oTHtmlNode == oEndNode
      FOR EACH oSubNode IN oTHtmlNode:htmlContent
         __CollectTags( oSubNode, stack, oEndNode )
      NEXT
   ENDIF

   RETURN stack

// Retrieves the textual content of a node

METHOD getText( cEOL ) CLASS THtmlNode

   LOCAL cText := ""
   LOCAL oNode

   IF ! HB_ISSTRING( cEOL )
      cEOL := hb_eol()
   ENDIF

   IF ::htmlTagName == "_text_"
      RETURN RTrim( ::htmlContent ) + cEOL
   ENDIF

   FOR EACH oNode IN ::htmlContent
      cText += oNode:getText( cEOL )
      IF Lower( ::htmlTagName ) $ "td,th" .AND. AScan( ::parent:htmlContent, {| o | o == Self } ) < Len( ::parent:htmlContent )
         // leave table rows in one line, cells separated by Tab
         cText := SubStr( cText, 1, Len( cText ) - Len( cEol ) )
         cText += Chr( 9 )
      ENDIF
   NEXT

   RETURN cText

// Returns the value of an HTML attribute

METHOD getAttribute( cName ) CLASS THtmlNode

   LOCAL hHash := ::getAttributes()
   LOCAL cValue

   IF ! HB_ISHASH( hHash )
      RETURN hHash
   ENDIF

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      cValue := hHash[ cName ]
   RECOVER
      cValue := NIL
   END SEQUENCE

   RETURN cValue

// Returns all HTML attributes as a Hash

METHOD getAttributes() CLASS THtmlNode

   IF ::htmlTagType[ 1 ] == NIL
      // Tag has no valid attributes
      RETURN NIL

   ELSEIF Left( ::htmlTagName, 1 ) == "!"
      // <!DOCTYPE > and <!-- comments --> have no HTML attributes
      RETURN ::htmlAttributes

   ELSEIF ::htmlAttributes == NIL
      ::htmlAttributes := { => }
      hb_HCaseMatch( ::htmlAttributes, .F. )

   ELSEIF HB_ISSTRING( ::htmlAttributes )
      IF ::htmlAttributes == "/"
         ::htmlAttributes := { => }
         hb_HCaseMatch( ::htmlAttributes, .F. )
      ELSE
         ::htmlAttributes := __ParseAttr( P_PARSER( AllTrim( ::htmlAttributes ) ) )
      ENDIF
   ENDIF

   RETURN ::htmlAttributes

// HTML attribute parser

STATIC FUNCTION __ParseAttr( parser )

   LOCAL cChr, nMode := 1 // 1=name, 2=value
   LOCAL aAttr := { "", "" }
   LOCAL hHash := { => }
   LOCAL nStart, nEnd
   LOCAL lIsQuoted := .F.

   hb_HSetCaseMatch( hHash, .F. )

   DO WHILE ! ( cChr := P_NEXT( parser ) ) == ""

      SWITCH cChr
      CASE "="
         lIsQuoted := .F.

         IF nMode == 2
            aAttr[ 2 ] += "="
         ELSE
            nMode := 2
         ENDIF
         EXIT

      CASE " "
         IF nMode == 1
            IF !( aAttr[ 1 ] == "" )
               hHash[ aAttr[ 1 ] ] := aAttr[ 2 ]
               aAttr[ 1 ] := ""
               aAttr[ 2 ] := ""
            ENDIF
            LOOP
         ENDIF

         nMode := iif( lIsQuoted, 2, 1 )
         hHash[ aAttr[ 1 ] ] := aAttr[ 2 ]
         aAttr[ 1 ] := ""
         aAttr[ 2 ] := ""

         DO WHILE P_NEXT( parser ) == " "
         ENDDO

         IF parser:p_pos > Len( parser:p_str )
            RETURN hHash
         ENDIF

         parser:p_end := parser:p_pos
         parser:p_pos --
         EXIT

      CASE Chr( 34 )
      CASE "'"
         lIsQuoted := .T.
         parser:p_end := parser:p_pos
         parser:p_pos ++

         nStart := parser:p_pos

         IF SubStr( parser:p_str, nStart, 1 ) == cChr
            // empty value ""
            hHash[ aAttr[ 1 ] ] := ""
            parser:p_end := parser:p_pos
            parser:p_pos --
         ELSE
            P_SEEKI( parser, cChr )
            nEnd := parser:p_pos

            IF nEnd > 0
               aAttr[ 2 ] := SubStr( parser:p_str, nStart, nEnd - nStart )
            ELSE
               aAttr[ 2 ] := SubStr( parser:p_str, nStart )
            ENDIF

            hHash[ aAttr[ 1 ] ] := aAttr[ 2 ]
         ENDIF

         aAttr[ 1 ] := ""
         aAttr[ 2 ] := ""
         nMode := 1

         IF nEnd == 0
            RETURN hHash
         ENDIF

         EXIT

         OTHERWISE
         aAttr[ nMode ] += cChr
      ENDSWITCH
   ENDDO

   IF !( aAttr[ 1 ] == "" )
      hHash[ aAttr[ 1 ] ] := aAttr[ 2 ]
   ENDIF

   RETURN hHash

// Sets one attribute and value

METHOD setAttribute( cName, cValue ) CLASS THtmlNode

   LOCAL aAttr
   LOCAL nPos
   LOCAL nType
   LOCAL hHash := ::getAttributes()

   IF ! HB_ISHASH( hHash )
      // Tag doesn't have any attribute
      RETURN ::error( "Invalid HTML attribute for: <" + ::htmlTagName + ">", ::className(), cName, EG_ARG, { cName, cValue } )
   ENDIF

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      aAttr := ::htmlTagType[ 1 ]:exec()
   RECOVER
      // Tag has no attributes
      aAttr := {}
   END SEQUENCE

   IF ( nPos := AScan( aAttr, {| a | a[ 1 ] == Lower( cName ) } ) ) == 0
      // Tag doesn't have this attribute
      RETURN ::error( "Invalid HTML attribute for: <" + ::htmlTagName + ">", ::className(), cName, EG_ARG, { cName, cValue } )
   ENDIF

   nType := aAttr[ nPos, 2 ]
   IF nType == HTML_ATTR_TYPE_BOOL
      hHash[ cName ] := ""
   ELSE
      hHash[ cName ] := cValue
   ENDIF

   RETURN hHash[ cName ]

// Sets all attribute and values

METHOD setAttributes( cHtml ) CLASS THtmlNode

   ::htmlAttributes := cHtml

   RETURN ::getAttributes()

// Removes one attribute

METHOD delAttribute( cName ) CLASS THtmlNode

   LOCAL xVal := ::getAttribute( cName )
   LOCAL lRet := .F.

   IF xVal != NIL
      BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
         hb_HDel( ::htmlAttributes, cName )
         lRet := .T.
      RECOVER
         lRet := .F.
      END SEQUENCE
   ENDIF

   RETURN lRet

// Removes all attributes

METHOD delAttributes() CLASS THtmlNode

   ::htmlAttributes := NIL

   RETURN .T.

// Checks for the existence of an attribute

METHOD isAttribute( cName ) CLASS THtmlNode

   LOCAL lRet

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      lRet := hb_HHasKey( ::getAttributes(), cName )
   RECOVER
      lRet := .F.
   END SEQUENCE

   RETURN lRet

// Error handling

METHOD noMessage( ... ) CLASS THtmlNode

   RETURN ::noAttribute( __GetMessage(), hb_AParams() )

// Non existent message -> returns and/or creates Tag or Attribute

METHOD noAttribute( cName, aValue ) CLASS THtmlNode

   LOCAL oNode

   cName := Lower( cName )

   IF Left( cName, 1 ) == "_"
      cName := SubStr( cName, 2 )
   ENDIF

   IF hb_HHasKey( t_hTagTypes, cName )
      // message identifies a html tag
      oNode := ::findNodeByTagName( cName )

      IF oNode == NIL
         oNode := THtmlNode():new( Self, cName )
         IF ! oNode:isOptional() .AND. ! oNode:isEmpty()
            oNode:htmlEndTagName := "/" + cName
         ENDIF
         ::addNode( oNode )
      ENDIF

      RETURN oNode

   ELSEIF Right( cName, 1 ) == "s" .AND. hb_HHasKey( t_hTagTypes, Left( cName, Len( cName ) - 1 ) )
      // message is the plural of a html tag -> oNode:forms -> Array of <FORM> tags
      RETURN ::findNodesByTagName( Left( cName, Len( cName ) - 1 ), Atail( aValue ) )
   ENDIF

   IF ! Empty( aValue )
      RETURN ::setAttribute( cName, aValue[ 1 ] )
   ENDIF

   RETURN ::getAttribute( cName )

// finds the first node in tree with this name

METHOD findNodeByTagName( cName ) CLASS THtmlNode

   LOCAL aNodes := ::collect()
   LOCAL oNode

   FOR EACH oNode IN aNodes
      IF Lower( oNode:htmlTagName ) == Lower( cName )
         RETURN oNode
      ENDIF
   NEXT

   RETURN NIL

// collects all nodes in tree with this name

METHOD findNodesByTagName( cName, nOrdinal ) CLASS THtmlNode

   LOCAL aNodes := ::collect()
   LOCAL oNode
   LOCAL aRet := {}

   FOR EACH oNode IN aNodes
      IF Lower( oNode:htmlTagName ) == Lower( cName )
         AAdd( aRet, oNode )
      ENDIF
   NEXT

   IF HB_ISNUMERIC( nOrdinal )
      IF nOrdinal < 1 .OR. nOrdinal > Len( aRet )
         RETURN NIL
      ENDIF
      RETURN aRet[ nOrdinal ]
   ENDIF

   RETURN aRet

// returns the text node of this node

METHOD _getTextNode() CLASS THtmlNode

   IF ::htmlTagName == "_text_"
      RETURN Self
   ENDIF

   ::addNode( THtmlNode():new( Self, "_text_", , "" ) )

   RETURN ATail( ::htmlContent )

// assigns text to a text node of this node

METHOD _setTextNode( cText ) CLASS THtmlNode

   LOCAL oNode := ::_getTextNode()

   cText := LTrim( hb_ValToStr( cText ) )

   DO WHILE "<" $ cText
      cText := StrTran( cText, "<", "&lt;" )
   ENDDO

   DO WHILE ">" $ cText
      cText := StrTran( cText, ">", "&gt;" )
   ENDDO

   oNode:htmlContent := iif( cText == "", "&nbsp;", cText )

   RETURN Self

// called by "+" operator
// Creates a new node of the specified tag name and raises error if cTagName is invalid

METHOD pushNode( cTagName ) CLASS THtmlNode

   LOCAL oNode
   LOCAL cAttr := AllTrim( cTagName )
   LOCAL cName := CutStr( " ", @cAttr )

   IF ::isEmpty()
      RETURN ::error( "Cannot add HTML tag to: <" + ::htmlTagName + ">", ::className(), "+", EG_ARG, { cName } )
   ENDIF

   IF ! hb_HHasKey( t_hTagTypes, cName )
      IF Left( cName, 1 ) == "/" .AND. hb_HHasKey( t_hTagTypes, SubStr( cName,2 ) )
         IF ! Lower( SubStr( cName, 2 ) ) == Lower( ::htmlTagName )
            RETURN ::error( "Not a valid closing HTML tag for: <" + ::htmlTagName + ">", ::className(), "-", EG_ARG, { cName } )
         ENDIF
         RETURN Self:parent
      ENDIF
      RETURN ::error( "Invalid HTML tag", ::className(), "+", EG_ARG, { cName } )
   ENDIF

   IF LTrim( cAttr ) == ""
      cAttr := NIL
   ENDIF

   oNode := THtmlNode():new( Self, cName, cAttr )
   IF ! oNode:isOptional() .AND. ! oNode:isEmpty()
      oNode:htmlEndTagName := "/" + cName
   ENDIF
   ::addNode( oNode )

   RETURN oNode

// called by "-" operator
// returns the parent of this node and raises error if cName is an invalid closing tag

METHOD popNode( cName ) CLASS THtmlNode

   LOCAL endTag

   cName := Lower( LTrim( cName ) )

   IF Left( cName, 1 ) == "/"
      cName := SubStr( cName, 2 )
   ENDIF

   IF !( cName == Lower( ::htmlTagName ) )
      RETURN ::error( "Invalid closing HTML tag for: <" + ::htmlTagName + ">", ::className(), "-", EG_ARG, { cName } )
   ENDIF

   /* tfonrouge: 2010-05-25
      this allows to properly close the tags "tr,th,td" by simply using:
      node - ["tr","th","td"]
    */
   IF AScan( { "tr", "th", "td" }, cName ) > 0
      endTag := "</" + cName + ">"
      IF !Right( ::toString(), 3 + Len( cName ) ) == endTag
         ::addNode( THtmlNode():new( Self, "/" + cName, ,  ) )
      ENDIF
   ENDIF

   RETURN Self:parent

// Generic parsing function

STATIC FUNCTION CutStr( cCut, cString )

   LOCAL cLeftPart, i := At( cCut, cString )

   IF i > 0
      cLeftPart := Left( cString, i - 1 )
      cString   := SubStr( cString, i + Len( cCut ) )
   ELSE
      cLeftPart := cString
      cString   := ""
   ENDIF

   RETURN cLeftPart

FUNCTION THtmlInit( lInit )

   IF HB_ISLOGICAL( lInit ) .AND. ! lInit
      t_aHtmlAttr         := NIL
      t_hTagTypes         := NIL
      t_aHtmlAnsiEntities := NIL
      t_lInit := .F.
   ELSEIF ! t_lInit
      t_aHtmlAttr := Array( HTML_ATTR_COUNT )
      _Init_Html_AnsiCharacterEntities()
      _Init_Html_Attributes()
      _Init_Html_TagTypes()
      t_lInit := .T.
   ENDIF

   RETURN .T.

FUNCTION THtmlCleanup()

   RETURN THtmlInit( .F. )

FUNCTION THtmlTagType( cTagName )

   LOCAL aType

   IF t_hTagTypes == NIL
      THtmlInit()
   ENDIF

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      aType := t_hTagTypes[ cTagName ]
   RECOVER
      aType := t_hTagTypes[ "_text_" ]
   END SEQUENCE

   RETURN aType

FUNCTION THtmlIsValid( cTagName, cAttrName )

   LOCAL lRet := .T. , aValue

   IF t_hTagTypes == NIL
      THtmlInit()
   ENDIF

   BEGIN SEQUENCE WITH {| oErr | Break( oErr ) }
      aValue := t_hTagTypes[ cTagName ]
      IF cAttrName != NIL
         aValue := aValue[ 1 ]:exec()
         lRet   := ( AScan( aValue, {| a | Lower( a[ 1 ] ) == Lower( cAttrName ) } ) > 0 )
      ENDIF
   RECOVER
      lRet := .F.
   END SEQUENCE

   RETURN lRet

/*
  HTML Tag data are adopted for Harbour from Tidy.exe (www.sourceforge.net/tidy)
*/

STATIC PROCEDURE _Init_Html_TagTypes

   t_hTagTypes := { => }

   hb_HSetCaseMatch( t_hTagTypes, .F. )

   t_hTagTypes[ "_root_"     ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "_text_"     ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "!--"        ] := { NIL                         , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "a"          ] := { @THtmlAttr_A()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "abbr"       ] := { @THtmlAttr_ABBR()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "acronym"    ] := { @THtmlAttr_ACRONYM()        ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "address"    ] := { @THtmlAttr_ADDRESS()        ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "align"      ] := { NIL                         ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "applet"     ] := { @THtmlAttr_APPLET()         , hb_bitOr( CM_OBJECT, CM_IMG, CM_INLINE, CM_PARAM )          }
   t_hTagTypes[ "area"       ] := { @THtmlAttr_AREA()           , hb_bitOr( CM_BLOCK, CM_EMPTY )                              }
   t_hTagTypes[ "b"          ] := { @THtmlAttr_B()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "base"       ] := { @THtmlAttr_BASE()           , hb_bitOr( CM_HEAD, CM_EMPTY )                               }
   t_hTagTypes[ "basefont"   ] := { @THtmlAttr_BASEFONT()       , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "bdo"        ] := { @THtmlAttr_BDO()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "bgsound"    ] := { NIL                         , hb_bitOr( CM_HEAD, CM_EMPTY )                               }
   t_hTagTypes[ "big"        ] := { @THtmlAttr_BIG()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "blink"      ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "blockquote" ] := { @THtmlAttr_BLOCKQUOTE()     ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "body"       ] := { @THtmlAttr_BODY()           , hb_bitOr( CM_HTML, CM_OPT, CM_OMITST )                      }
   t_hTagTypes[ "br"         ] := { @THtmlAttr_BR()             , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "button"     ] := { @THtmlAttr_BUTTON()         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "caption"    ] := { @THtmlAttr_CAPTION()        ,         ( CM_TABLE )                                        }
   t_hTagTypes[ "center"     ] := { @THtmlAttr_CENTER()         ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "cite"       ] := { @THtmlAttr_CITE()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "code"       ] := { @THtmlAttr_CODE()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "col"        ] := { @THtmlAttr_COL()            , hb_bitOr( CM_TABLE, CM_EMPTY )                              }
   t_hTagTypes[ "colgroup"   ] := { @THtmlAttr_COLGROUP()       , hb_bitOr( CM_TABLE, CM_OPT )                                }
   t_hTagTypes[ "comment"    ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "dd"         ] := { @THtmlAttr_DD()             , hb_bitOr( CM_DEFLIST, CM_OPT, CM_NO_INDENT )                }
   t_hTagTypes[ "del"        ] := { @THtmlAttr_DEL()            , hb_bitOr( CM_INLINE, CM_BLOCK, CM_MIXED )                   }
   t_hTagTypes[ "dfn"        ] := { @THtmlAttr_DFN()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "dir"        ] := { @THtmlAttr_DIR()            , hb_bitOr( CM_BLOCK, CM_OBSOLETE )                           }
   t_hTagTypes[ "div"        ] := { @THtmlAttr_DIV()            ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "dl"         ] := { @THtmlAttr_DL()             ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "dt"         ] := { @THtmlAttr_DT()             , hb_bitOr( CM_DEFLIST, CM_OPT, CM_NO_INDENT )                }
   t_hTagTypes[ "em"         ] := { @THtmlAttr_EM()             ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "embed"      ] := { NIL                         , hb_bitOr( CM_INLINE, CM_IMG, CM_EMPTY )                     }
   t_hTagTypes[ "fieldset"   ] := { @THtmlAttr_FIELDSET()       ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "font"       ] := { @THtmlAttr_FONT()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "form"       ] := { @THtmlAttr_FORM()           ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "frame"      ] := { @THtmlAttr_FRAME()          , hb_bitOr( CM_FRAMES, CM_EMPTY )                             }
   t_hTagTypes[ "frameset"   ] := { @THtmlAttr_FRAMESET()       , hb_bitOr( CM_HTML, CM_FRAMES )                              }
   t_hTagTypes[ "h1"         ] := { @THtmlAttr_H1()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "h2"         ] := { @THtmlAttr_H2()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "h3"         ] := { @THtmlAttr_H3()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "h4"         ] := { @THtmlAttr_H4()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "h5"         ] := { @THtmlAttr_H5()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "h6"         ] := { @THtmlAttr_H6()             , hb_bitOr( CM_BLOCK, CM_HEADING )                            }
   t_hTagTypes[ "head"       ] := { @THtmlAttr_HEAD()           , hb_bitOr( CM_HTML, CM_OPT, CM_OMITST )                      }
   t_hTagTypes[ "hr"         ] := { @THtmlAttr_HR()             , hb_bitOr( CM_BLOCK, CM_EMPTY )                              }
   t_hTagTypes[ "html"       ] := { @THtmlAttr_HTML()           , hb_bitOr( CM_HTML, CM_OPT, CM_OMITST )                      }
   t_hTagTypes[ "i"          ] := { @THtmlAttr_I()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "iframe"     ] := { @THtmlAttr_IFRAME()         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "ilayer"     ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "img"        ] := { @THtmlAttr_IMG()            , hb_bitOr( CM_INLINE, CM_IMG, CM_EMPTY )                     }
   t_hTagTypes[ "input"      ] := { @THtmlAttr_INPUT()          , hb_bitOr( CM_INLINE, CM_IMG, CM_EMPTY )                     }
   t_hTagTypes[ "ins"        ] := { @THtmlAttr_INS()            , hb_bitOr( CM_INLINE, CM_BLOCK, CM_MIXED )                   }
   t_hTagTypes[ "isindex"    ] := { @THtmlAttr_ISINDEX()        , hb_bitOr( CM_BLOCK, CM_EMPTY )                              }
   t_hTagTypes[ "kbd"        ] := { @THtmlAttr_KBD()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "keygen"     ] := { NIL                         , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "label"      ] := { @THtmlAttr_LABEL()          ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "layer"      ] := { NIL                         ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "legend"     ] := { @THtmlAttr_LEGEND()         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "li"         ] := { @THtmlAttr_LI()             , hb_bitOr( CM_LIST, CM_OPT, CM_NO_INDENT )                   }
   t_hTagTypes[ "link"       ] := { @THtmlAttr_LINK()           , hb_bitOr( CM_HEAD, CM_EMPTY )                               }
   t_hTagTypes[ "listing"    ] := { @THtmlAttr_LISTING()        , hb_bitOr( CM_BLOCK, CM_OBSOLETE )                           }
   t_hTagTypes[ "map"        ] := { @THtmlAttr_MAP()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "marquee"    ] := { NIL                         , hb_bitOr( CM_INLINE, CM_OPT )                               }
   t_hTagTypes[ "menu"       ] := { @THtmlAttr_MENU()           , hb_bitOr( CM_BLOCK, CM_OBSOLETE )                           }
   t_hTagTypes[ "meta"       ] := { @THtmlAttr_META()           , hb_bitOr( CM_HEAD, CM_EMPTY )                               }
   t_hTagTypes[ "multicol"   ] := { NIL                         ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "nextid"     ] := { @THtmlAttr_NEXTID()         , hb_bitOr( CM_HEAD, CM_EMPTY )                               }
   t_hTagTypes[ "nobr"       ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "noembed"    ] := { NIL                         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "noframes"   ] := { @THtmlAttr_NOFRAMES()       , hb_bitOr( CM_BLOCK, CM_FRAMES )                             }
   t_hTagTypes[ "nolayer"    ] := { NIL                         , hb_bitOr( CM_BLOCK, CM_INLINE, CM_MIXED )                   }
   t_hTagTypes[ "nosave"     ] := { NIL                         ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "noscript"   ] := { @THtmlAttr_NOSCRIPT()       , hb_bitOr( CM_BLOCK, CM_INLINE, CM_MIXED )                   }
   t_hTagTypes[ "object"     ] := { @THtmlAttr_OBJECT()         , hb_bitOr( CM_OBJECT, CM_HEAD, CM_IMG, CM_INLINE, CM_PARAM ) }
   t_hTagTypes[ "ol"         ] := { @THtmlAttr_OL()             ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "optgroup"   ] := { @THtmlAttr_OPTGROUP()       , hb_bitOr( CM_FIELD, CM_OPT )                                }
   t_hTagTypes[ "option"     ] := { @THtmlAttr_OPTION()         , hb_bitOr( CM_FIELD, CM_OPT )                                }
   t_hTagTypes[ "p"          ] := { @THtmlAttr_P()              , hb_bitOr( CM_BLOCK, CM_OPT )                                }
   t_hTagTypes[ "param"      ] := { @THtmlAttr_PARAM()          , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "plaintext"  ] := { @THtmlAttr_PLAINTEXT()      , hb_bitOr( CM_BLOCK, CM_OBSOLETE )                           }
   t_hTagTypes[ "pre"        ] := { @THtmlAttr_PRE()            ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "q"          ] := { @THtmlAttr_Q()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "rb"         ] := { @THtmlAttr_RB()             ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "rbc"        ] := { @THtmlAttr_RBC()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "rp"         ] := { @THtmlAttr_RP()             ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "rt"         ] := { @THtmlAttr_RT()             ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "rtc"        ] := { @THtmlAttr_RTC()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "ruby"       ] := { @THtmlAttr_RUBY()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "s"          ] := { @THtmlAttr_S()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "samp"       ] := { @THtmlAttr_SAMP()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "script"     ] := { @THtmlAttr_SCRIPT()         , hb_bitOr( CM_HEAD, CM_MIXED, CM_BLOCK, CM_INLINE )          }
   t_hTagTypes[ "select"     ] := { @THtmlAttr_SELECT()         , hb_bitOr( CM_INLINE, CM_FIELD )                             }
   t_hTagTypes[ "server"     ] := { NIL                         , hb_bitOr( CM_HEAD, CM_MIXED, CM_BLOCK, CM_INLINE )          }
   t_hTagTypes[ "servlet"    ] := { NIL                         , hb_bitOr( CM_OBJECT, CM_IMG, CM_INLINE, CM_PARAM )          }
   t_hTagTypes[ "small"      ] := { @THtmlAttr_SMALL()          ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "spacer"     ] := { NIL                         , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "span"       ] := { @THtmlAttr_SPAN()           ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "strike"     ] := { @THtmlAttr_STRIKE()         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "strong"     ] := { @THtmlAttr_STRONG()         ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "style"      ] := { @THtmlAttr_STYLE()          ,         ( CM_HEAD )                                         }
   t_hTagTypes[ "sub"        ] := { @THtmlAttr_SUB()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "sup"        ] := { @THtmlAttr_SUP()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "table"      ] := { @THtmlAttr_TABLE()          ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "tbody"      ] := { @THtmlAttr_TBODY()          , hb_bitOr( CM_TABLE, CM_ROWGRP, CM_OPT )                     }
   t_hTagTypes[ "td"         ] := { @THtmlAttr_TD()             , hb_bitOr( CM_ROW, CM_OPT, CM_NO_INDENT )                    }
   t_hTagTypes[ "textarea"   ] := { @THtmlAttr_TEXTAREA()       , hb_bitOr( CM_INLINE, CM_FIELD )                             }
   t_hTagTypes[ "tfoot"      ] := { @THtmlAttr_TFOOT()          , hb_bitOr( CM_TABLE, CM_ROWGRP, CM_OPT )                     }
   t_hTagTypes[ "th"         ] := { @THtmlAttr_TH()             , hb_bitOr( CM_ROW, CM_OPT, CM_NO_INDENT )                    }
   t_hTagTypes[ "thead"      ] := { @THtmlAttr_THEAD()          , hb_bitOr( CM_TABLE, CM_ROWGRP, CM_OPT )                     }
   t_hTagTypes[ "title"      ] := { @THtmlAttr_TITLE()          ,         ( CM_HEAD )                                         }
   t_hTagTypes[ "tr"         ] := { @THtmlAttr_TR()             , hb_bitOr( CM_TABLE, CM_OPT )                                }
   t_hTagTypes[ "tt"         ] := { @THtmlAttr_TT()             ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "u"          ] := { @THtmlAttr_U()              ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "ul"         ] := { @THtmlAttr_UL()             ,         ( CM_BLOCK )                                        }
   t_hTagTypes[ "var"        ] := { @THtmlAttr_VAR()            ,         ( CM_INLINE )                                       }
   t_hTagTypes[ "wbr"        ] := { NIL                         , hb_bitOr( CM_INLINE, CM_EMPTY )                             }
   t_hTagTypes[ "xmp"        ] := { @THtmlAttr_XMP()            , hb_bitOr( CM_BLOCK, CM_OBSOLETE )                           }

   RETURN


/*
  HTML Tag attribute data are adopted for Harbour from Tidy.exe (www.sourceforge.net/tidy)
*/

STATIC PROCEDURE _Init_Html_Attributes

   // attribute    NAME                TYPE
   t_aHtmlAttr[ HTML_ATTR_ABBR             ] := { "abbr"             , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ACCEPT           ] := { "accept"           , HTML_ATTR_TYPE_XTYPE     }
   t_aHtmlAttr[ HTML_ATTR_ACCEPT_CHARSET   ] := { "accept-charset"   , HTML_ATTR_TYPE_CHARSET   }
   t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ] := { "accesskey"        , HTML_ATTR_TYPE_CHARACTER }
   t_aHtmlAttr[ HTML_ATTR_ACTION           ] := { "action"           , HTML_ATTR_TYPE_ACTION    }
   t_aHtmlAttr[ HTML_ATTR_ADD_DATE         ] := { "add_date"         , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ALIGN            ] := { "align"            , HTML_ATTR_TYPE_ALIGN     }
   t_aHtmlAttr[ HTML_ATTR_ALINK            ] := { "alink"            , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_ALT              ] := { "alt"              , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ARCHIVE          ] := { "archive"          , HTML_ATTR_TYPE_URLS      }
   t_aHtmlAttr[ HTML_ATTR_AXIS             ] := { "axis"             , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_BACKGROUND       ] := { "background"       , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ] := { "bgcolor"          , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_BGPROPERTIES     ] := { "bgproperties"     , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_BORDER           ] := { "border"           , HTML_ATTR_TYPE_BORDER    }
   t_aHtmlAttr[ HTML_ATTR_BORDERCOLOR      ] := { "bordercolor"      , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_BOTTOMMARGIN     ] := { "bottommargin"     , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_CELLPADDING      ] := { "cellpadding"      , HTML_ATTR_TYPE_LENGTH    }
   t_aHtmlAttr[ HTML_ATTR_CELLSPACING      ] := { "cellspacing"      , HTML_ATTR_TYPE_LENGTH    }
   t_aHtmlAttr[ HTML_ATTR_CHAR             ] := { "char"             , HTML_ATTR_TYPE_CHARACTER }
   t_aHtmlAttr[ HTML_ATTR_CHAROFF          ] := { "charoff"          , HTML_ATTR_TYPE_LENGTH    }
   t_aHtmlAttr[ HTML_ATTR_CHARSET          ] := { "charset"          , HTML_ATTR_TYPE_CHARSET   }
   t_aHtmlAttr[ HTML_ATTR_CHECKED          ] := { "checked"          , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_CITE             ] := { "cite"             , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_CLASS            ] := { "class"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_CLASSID          ] := { "classid"          , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_CLEAR            ] := { "clear"            , HTML_ATTR_TYPE_CLEAR     }
   t_aHtmlAttr[ HTML_ATTR_CODE             ] := { "code"             , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_CODEBASE         ] := { "codebase"         , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_CODETYPE         ] := { "codetype"         , HTML_ATTR_TYPE_XTYPE     }
   t_aHtmlAttr[ HTML_ATTR_COLOR            ] := { "color"            , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_COLS             ] := { "cols"             , HTML_ATTR_TYPE_COLS      }
   t_aHtmlAttr[ HTML_ATTR_COLSPAN          ] := { "colspan"          , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_COMPACT          ] := { "compact"          , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_CONTENT          ] := { "content"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_COORDS           ] := { "coords"           , HTML_ATTR_TYPE_COORDS    }
   t_aHtmlAttr[ HTML_ATTR_DATA             ] := { "data"             , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_DATAFLD          ] := { "datafld"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_DATAFORMATAS     ] := { "dataformatas"     , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_DATAPAGESIZE     ] := { "datapagesize"     , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_DATASRC          ] := { "datasrc"          , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_DATETIME         ] := { "datetime"         , HTML_ATTR_TYPE_DATE      }
   t_aHtmlAttr[ HTML_ATTR_DECLARE          ] := { "declare"          , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_DEFER            ] := { "defer"            , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_DIR              ] := { "dir"              , HTML_ATTR_TYPE_TEXTDIR   }
   t_aHtmlAttr[ HTML_ATTR_DISABLED         ] := { "disabled"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_ENCODING         ] := { "encoding"         , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ENCTYPE          ] := { "enctype"          , HTML_ATTR_TYPE_XTYPE     }
   t_aHtmlAttr[ HTML_ATTR_EVENT            ] := { "event"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_FACE             ] := { "face"             , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_FOR              ] := { "for"              , HTML_ATTR_TYPE_IDREF     }
   t_aHtmlAttr[ HTML_ATTR_FRAME            ] := { "frame"            , HTML_ATTR_TYPE_TFRAME    }
   t_aHtmlAttr[ HTML_ATTR_FRAMEBORDER      ] := { "frameborder"      , HTML_ATTR_TYPE_FBORDER   }
   t_aHtmlAttr[ HTML_ATTR_FRAMESPACING     ] := { "framespacing"     , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_GRIDX            ] := { "gridx"            , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_GRIDY            ] := { "gridy"            , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_HEADERS          ] := { "headers"          , HTML_ATTR_TYPE_IDREFS    }
   t_aHtmlAttr[ HTML_ATTR_HEIGHT           ] := { "height"           , HTML_ATTR_TYPE_LENGTH    }
   t_aHtmlAttr[ HTML_ATTR_HREF             ] := { "href"             , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_HREFLANG         ] := { "hreflang"         , HTML_ATTR_TYPE_LANG      }
   t_aHtmlAttr[ HTML_ATTR_HSPACE           ] := { "hspace"           , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_HTTP_EQUIV       ] := { "http-equiv"       , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ID               ] := { "id"               , HTML_ATTR_TYPE_IDDEF     }
   t_aHtmlAttr[ HTML_ATTR_ISMAP            ] := { "ismap"            , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_LABEL            ] := { "label"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_LANG             ] := { "lang"             , HTML_ATTR_TYPE_LANG      }
   t_aHtmlAttr[ HTML_ATTR_LANGUAGE         ] := { "language"         , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_LAST_MODIFIED    ] := { "last_modified"    , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_LAST_VISIT       ] := { "last_visit"       , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_LEFTMARGIN       ] := { "leftmargin"       , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_LINK             ] := { "link"             , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_LONGDESC         ] := { "longdesc"         , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_LOWSRC           ] := { "lowsrc"           , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_MARGINHEIGHT     ] := { "marginheight"     , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_MARGINWIDTH      ] := { "marginwidth"      , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_MAXLENGTH        ] := { "maxlength"        , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_MEDIA            ] := { "media"            , HTML_ATTR_TYPE_MEDIA     }
   t_aHtmlAttr[ HTML_ATTR_METHOD           ] := { "method"           , HTML_ATTR_TYPE_FSUBMIT   }
   t_aHtmlAttr[ HTML_ATTR_METHODS          ] := { "methods"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_MULTIPLE         ] := { "multiple"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_N                ] := { "n"                , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_NAME             ] := { "name"             , HTML_ATTR_TYPE_NAME      }
   t_aHtmlAttr[ HTML_ATTR_NOHREF           ] := { "nohref"           , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_NORESIZE         ] := { "noresize"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_NOSHADE          ] := { "noshade"          , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_NOWRAP           ] := { "nowrap"           , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_OBJECT           ] := { "object"           , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_ONAFTERUPDATE    ] := { "onafterupdate"    , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONBEFOREUNLOAD   ] := { "onbeforeunload"   , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONBEFOREUPDATE   ] := { "onbeforeupdate"   , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONBLUR           ] := { "onblur"           , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONCHANGE         ] := { "onchange"         , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONCLICK          ] := { "onclick"          , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONDATAAVAILABLE  ] := { "ondataavailable"  , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONDATASETCHANGED ] := { "ondatasetchanged" , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONDATASETCOMPLETE] := { "ondatasetcomplete", HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ] := { "ondblclick"       , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONERRORUPDATE    ] := { "onerrorupdate"    , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ] := { "onfocus"          , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ] := { "onkeydown"        , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ] := { "onkeypress"       , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ] := { "onkeyup"          , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONLOAD           ] := { "onload"           , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ] := { "onmousedown"      , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ] := { "onmousemove"      , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ] := { "onmouseout"       , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ] := { "onmouseover"      , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ] := { "onmouseup"        , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONRESET          ] := { "onreset"          , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONROWENTER       ] := { "onrowenter"       , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONROWEXIT        ] := { "onrowexit"        , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONSELECT         ] := { "onselect"         , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONSUBMIT         ] := { "onsubmit"         , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_ONUNLOAD         ] := { "onunload"         , HTML_ATTR_TYPE_SCRIPT    }
   t_aHtmlAttr[ HTML_ATTR_PROFILE          ] := { "profile"          , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_PROMPT           ] := { "prompt"           , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_RBSPAN           ] := { "rbspan"           , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_READONLY         ] := { "readonly"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_REL              ] := { "rel"              , HTML_ATTR_TYPE_LINKTYPES }
   t_aHtmlAttr[ HTML_ATTR_REV              ] := { "rev"              , HTML_ATTR_TYPE_LINKTYPES }
   t_aHtmlAttr[ HTML_ATTR_RIGHTMARGIN      ] := { "rightmargin"      , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_ROWS             ] := { "rows"             , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_ROWSPAN          ] := { "rowspan"          , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_RULES            ] := { "rules"            , HTML_ATTR_TYPE_TRULES    }
   t_aHtmlAttr[ HTML_ATTR_SCHEME           ] := { "scheme"           , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_SCOPE            ] := { "scope"            , HTML_ATTR_TYPE_SCOPE     }
   t_aHtmlAttr[ HTML_ATTR_SCROLLING        ] := { "scrolling"        , HTML_ATTR_TYPE_SCROLL    }
   t_aHtmlAttr[ HTML_ATTR_SDAFORM          ] := { "sdaform"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_SDAPREF          ] := { "sdapref"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_SDASUFF          ] := { "sdasuff"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_SELECTED         ] := { "selected"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_SHAPE            ] := { "shape"            , HTML_ATTR_TYPE_SHAPE     }
   t_aHtmlAttr[ HTML_ATTR_SHOWGRID         ] := { "showgrid"         , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_SHOWGRIDX        ] := { "showgridx"        , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_SHOWGRIDY        ] := { "showgridy"        , HTML_ATTR_TYPE_BOOL      }
   t_aHtmlAttr[ HTML_ATTR_SIZE             ] := { "size"             , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_SPAN             ] := { "span"             , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_SRC              ] := { "src"              , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_STANDBY          ] := { "standby"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_START            ] := { "start"            , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_STYLE            ] := { "style"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_SUMMARY          ] := { "summary"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_TABINDEX         ] := { "tabindex"         , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_TARGET           ] := { "target"           , HTML_ATTR_TYPE_TARGET    }
   t_aHtmlAttr[ HTML_ATTR_TEXT             ] := { "text"             , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_TITLE            ] := { "title"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_TOPMARGIN        ] := { "topmargin"        , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_TYPE             ] := { "type"             , HTML_ATTR_TYPE_TYPE      }
   t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ] := { "unknown!"         , HTML_ATTR_TYPE_UNKNOWN   }
   t_aHtmlAttr[ HTML_ATTR_URN              ] := { "urn"              , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_USEMAP           ] := { "usemap"           , HTML_ATTR_TYPE_URL       }
   t_aHtmlAttr[ HTML_ATTR_VALIGN           ] := { "valign"           , HTML_ATTR_TYPE_VALIGN    }
   t_aHtmlAttr[ HTML_ATTR_VALUE            ] := { "value"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_VALUETYPE        ] := { "valuetype"        , HTML_ATTR_TYPE_VTYPE     }
   t_aHtmlAttr[ HTML_ATTR_VERSION          ] := { "version"          , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_VLINK            ] := { "vlink"            , HTML_ATTR_TYPE_COLOR     }
   t_aHtmlAttr[ HTML_ATTR_VSPACE           ] := { "vspace"           , HTML_ATTR_TYPE_NUMBER    }
   t_aHtmlAttr[ HTML_ATTR_WIDTH            ] := { "width"            , HTML_ATTR_TYPE_LENGTH    }
   t_aHtmlAttr[ HTML_ATTR_WRAP             ] := { "wrap"             , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_XMLNS            ] := { "xmlns"            , HTML_ATTR_TYPE_PCDATA    }
   t_aHtmlAttr[ HTML_ATTR_XML_LANG         ] := { "xml:lang"         , HTML_ATTR_TYPE_LANG      }
   t_aHtmlAttr[ HTML_ATTR_XML_SPACE        ] := { "xml:space"        , HTML_ATTR_TYPE_PCDATA    }

   RETURN

STATIC FUNCTION THtmlAttr_A()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_CHARSET          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COORDS           ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HREF             ], ;
      t_aHtmlAttr[ HTML_ATTR_HREFLANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_METHODS          ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_REL              ], ;
      t_aHtmlAttr[ HTML_ATTR_REV              ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SHAPE            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TARGET           ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_URN              ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_ABBR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_ACRONYM()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_ADDRESS()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_APPLET()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_ALT              ], ;
      t_aHtmlAttr[ HTML_ATTR_ARCHIVE          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_CODE             ], ;
      t_aHtmlAttr[ HTML_ATTR_CODEBASE         ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_HSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_OBJECT           ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_AREA()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_ALT              ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COORDS           ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HREF             ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NOHREF           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SHAPE            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TARGET           ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_B()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BASE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_HREF             ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_TARGET           ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BASEFONT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_COLOR            ], ;
      t_aHtmlAttr[ HTML_ATTR_FACE             ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_SIZE             ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BDO()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BIG()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BLOCKQUOTE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CITE             ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BODY()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALINK            ], ;
      t_aHtmlAttr[ HTML_ATTR_BACKGROUND       ], ;
      t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_LINK             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONLOAD           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONUNLOAD         ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TEXT             ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VLINK            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLEAR            ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_BUTTON()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_CAPTION()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_CENTER()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_CITE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_CODE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_COL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SPAN             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_COLGROUP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SPAN             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DD()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DEL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CITE             ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DATETIME         ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DFN()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DIR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COMPACT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DIV()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COMPACT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_DT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_EM()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_FIELDSET()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_FONT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COLOR            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_FACE             ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_SIZE             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_FORM()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCEPT           ], ;
      t_aHtmlAttr[ HTML_ATTR_ACCEPT_CHARSET   ], ;
      t_aHtmlAttr[ HTML_ATTR_ACTION           ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ENCTYPE          ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_METHOD           ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONRESET          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONSUBMIT         ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDASUFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TARGET           ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_FRAME()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_FRAMEBORDER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LONGDESC         ], ;
      t_aHtmlAttr[ HTML_ATTR_MARGINHEIGHT     ], ;
      t_aHtmlAttr[ HTML_ATTR_MARGINWIDTH      ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_NORESIZE         ], ;
      t_aHtmlAttr[ HTML_ATTR_SCROLLING        ], ;
      t_aHtmlAttr[ HTML_ATTR_SRC              ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_FRAMESET()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COLS             ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONLOAD           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONUNLOAD         ], ;
      t_aHtmlAttr[ HTML_ATTR_ROWS             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H1()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H2()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H3()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H4()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H5()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_H6()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_HEAD()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_PROFILE          ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_HR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NOSHADE          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SIZE             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_HTML()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_VERSION          ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_I()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_IFRAME()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_FRAMEBORDER      ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LONGDESC         ], ;
      t_aHtmlAttr[ HTML_ATTR_MARGINHEIGHT     ], ;
      t_aHtmlAttr[ HTML_ATTR_MARGINWIDTH      ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_SCROLLING        ], ;
      t_aHtmlAttr[ HTML_ATTR_SRC              ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_IMG()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_ALT              ], ;
      t_aHtmlAttr[ HTML_ATTR_BORDER           ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_HSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ISMAP            ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_LONGDESC         ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SRC              ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_USEMAP           ], ;
      t_aHtmlAttr[ HTML_ATTR_VSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_INPUT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCEPT           ], ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_ALT              ], ;
      t_aHtmlAttr[ HTML_ATTR_CHECKED          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ISMAP            ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_MAXLENGTH        ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCHANGE         ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONSELECT         ], ;
      t_aHtmlAttr[ HTML_ATTR_READONLY         ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SIZE             ], ;
      t_aHtmlAttr[ HTML_ATTR_SRC              ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_USEMAP           ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_INS()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CITE             ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DATETIME         ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_ISINDEX()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_PROMPT           ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_KBD()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_LABEL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_FOR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_LEGEND()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_LI()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_LINK()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CHARSET          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HREF             ], ;
      t_aHtmlAttr[ HTML_ATTR_HREFLANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_MEDIA            ], ;
      t_aHtmlAttr[ HTML_ATTR_METHODS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_REL              ], ;
      t_aHtmlAttr[ HTML_ATTR_REV              ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TARGET           ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_URN              ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_LISTING()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_MAP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_MENU()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COMPACT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_META()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CONTENT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HTTP_EQUIV       ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_SCHEME           ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_NEXTID()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_N                ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_NOFRAMES()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_NOSCRIPT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_OBJECT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_ARCHIVE          ], ;
      t_aHtmlAttr[ HTML_ATTR_BORDER           ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASSID          ], ;
      t_aHtmlAttr[ HTML_ATTR_CODEBASE         ], ;
      t_aHtmlAttr[ HTML_ATTR_CODETYPE         ], ;
      t_aHtmlAttr[ HTML_ATTR_DATA             ], ;
      t_aHtmlAttr[ HTML_ATTR_DECLARE          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_HSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STANDBY          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_USEMAP           ], ;
      t_aHtmlAttr[ HTML_ATTR_VSPACE           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_OL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COMPACT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_START            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_OPTGROUP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LABEL            ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_OPTION()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LABEL            ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SELECTED         ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_P()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_PARAM()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALUETYPE        ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_PLAINTEXT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_PRE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_SPACE        ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_Q()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CITE             ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RB()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RBC()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_RBSPAN           ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RTC()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_RUBY()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_S()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SAMP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SCRIPT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CHARSET          ], ;
      t_aHtmlAttr[ HTML_ATTR_DEFER            ], ;
      t_aHtmlAttr[ HTML_ATTR_EVENT            ], ;
      t_aHtmlAttr[ HTML_ATTR_FOR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANGUAGE         ], ;
      t_aHtmlAttr[ HTML_ATTR_SRC              ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_SPACE        ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SELECT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_MULTIPLE         ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCHANGE         ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_SIZE             ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SMALL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SPAN()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_STRIKE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_STRONG()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_STYLE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_MEDIA            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_SPACE        ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SUB()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_SUP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TABLE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ], ;
      t_aHtmlAttr[ HTML_ATTR_BORDER           ], ;
      t_aHtmlAttr[ HTML_ATTR_CELLPADDING      ], ;
      t_aHtmlAttr[ HTML_ATTR_CELLSPACING      ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DATAPAGESIZE     ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_FRAME            ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_RULES            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_SUMMARY          ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TBODY()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TD()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ABBR             ], ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_AXIS             ], ;
      t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COLSPAN          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HEADERS          ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NOWRAP           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ROWSPAN          ], ;
      t_aHtmlAttr[ HTML_ATTR_SCOPE            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TEXTAREA()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ACCESSKEY        ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COLS             ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_DISABLED         ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NAME             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONBLUR           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCHANGE         ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONFOCUS          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONSELECT         ], ;
      t_aHtmlAttr[ HTML_ATTR_READONLY         ], ;
      t_aHtmlAttr[ HTML_ATTR_ROWS             ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TABINDEX         ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TFOOT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TH()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ABBR             ], ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_AXIS             ], ;
      t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COLSPAN          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_HEADERS          ], ;
      t_aHtmlAttr[ HTML_ATTR_HEIGHT           ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_NOWRAP           ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_ROWSPAN          ], ;
      t_aHtmlAttr[ HTML_ATTR_SCOPE            ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_WIDTH            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_THEAD()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TITLE()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_ALIGN            ], ;
      t_aHtmlAttr[ HTML_ATTR_BGCOLOR          ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAR             ], ;
      t_aHtmlAttr[ HTML_ATTR_CHAROFF          ], ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_VALIGN           ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_TT()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_U()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_UL()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_COMPACT          ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TYPE             ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_VAR()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_CLASS            ], ;
      t_aHtmlAttr[ HTML_ATTR_DIR              ], ;
      t_aHtmlAttr[ HTML_ATTR_ID               ], ;
      t_aHtmlAttr[ HTML_ATTR_LANG             ], ;
      t_aHtmlAttr[ HTML_ATTR_ONCLICK          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONDBLCLICK       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYDOWN        ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYPRESS       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONKEYUP          ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEDOWN      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEMOVE      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOUT       ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEOVER      ], ;
      t_aHtmlAttr[ HTML_ATTR_ONMOUSEUP        ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_STYLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_TITLE            ], ;
      t_aHtmlAttr[ HTML_ATTR_XML_LANG         ], ;
      t_aHtmlAttr[ HTML_ATTR_XMLNS            ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

STATIC FUNCTION THtmlAttr_XMP()

   RETURN { ;
      t_aHtmlAttr[ HTML_ATTR_SDAFORM          ], ;
      t_aHtmlAttr[ HTML_ATTR_SDAPREF          ], ;
      t_aHtmlAttr[ HTML_ATTR_UNKNOWN          ]  ;
      }

// Converts an HTML formatted text string to the ANSI character set

FUNCTION HtmlToAnsi( cHtmlText )

   LOCAL aEntity

   IF t_aHtmlAnsiEntities == NIL
      _Init_Html_AnsiCharacterEntities()
   ENDIF

   FOR EACH aEntity IN t_aHtmlAnsiEntities
      IF aEntity[ 2 ] $ cHtmlText
         cHtmlText := StrTran( cHtmlText, aEntity[ 2 ], aEntity[ 1 ] )
      ENDIF
   NEXT
   IF "&nbsp;" $ cHtmlText
      cHtmlText := StrTran( cHtmlText, "&nbsp;", " " )
   ENDIF

   RETURN cHtmlText

// Converts an HTML formatted text string to the OEM character set

FUNCTION HtmlToOem( cHtmlText )

   RETURN hb_AnsiToOem( HtmlToAnsi( cHtmlText ) )

// Inserts HTML character entities into an ANSI text string

FUNCTION AnsiToHtml( cAnsiText )

   LOCAL cHtmlText := ""
   LOCAL parser    := P_PARSER( cAnsiText )
   LOCAL nStart    := 1
   LOCAL aEntity, cEntity, cText, cChr, nEnd

   IF t_aHtmlAnsiEntities == NIL
      _Init_Html_AnsiCharacterEntities()
   ENDIF

   // Convert to Html but ignore all html character entities
   DO WHILE P_SEEK( parser, "&" ) > 0
      nEnd  := parser:p_pos
      cText := SubStr( parser:p_str, nStart, nEnd - nStart )

      DO WHILE ! ( ( cChr := P_NEXT( parser ) ) $ "; " ) .AND. ! Empty( cChr ) .AND. parser:p_pos != 0
      ENDDO

      SWITCH cChr
      CASE ";"
         // HTML character entity found
         nStart  := nEnd
         nEnd    := parser:p_pos + 1
         cEntity := SubStr( parser:p_str, nStart, nEnd - nStart )
         parser:p_end := parser:p_pos
         parser:p_pos ++
         EXIT
      CASE " "
         // "&" character found
         cHtmlText += cText
         nStart    := nEnd
         nEnd      := parser:p_pos + 1
         cText     := SubStr( parser:p_str, nStart, nEnd - nStart )
         nStart    := nEnd
         cHtmlText += "&amp;" + SubStr( cText, 2 )
         LOOP
         OTHERWISE
         cEntity := NIL
      ENDSWITCH

      IF cEntity != NIL
         nStart := parser:p_pos
         FOR EACH aEntity IN t_aHtmlAnsiEntities
            IF aEntity[ 1 ] $ cText
               cText := StrTran( cText, aEntity[ 1 ], aEntity[ 2 ] )
            ENDIF
         NEXT

         cHtmlText += cText + cEntity
      ENDIF
   ENDDO

   cText := SubStr( parser:p_str, nStart )
   FOR EACH aEntity IN t_aHtmlAnsiEntities
      IF aEntity[ 1 ] $ cText
         cText := StrTran( cText, aEntity[ 1 ], aEntity[ 2 ] )
      ENDIF
   NEXT
   cHtmlText += cText

   RETURN cHtmlText

// Inserts HTML character entities into an OEM text string

FUNCTION OemToHtml( cOemText )

   RETURN AnsiToHtml( hb_OemToAnsi( cOemText ) )

// This function returs the HTML character entities that are exchangeable between ANSI and OEM character sets

STATIC PROCEDURE _Init_Html_AnsiCharacterEntities

   t_aHtmlAnsiEntities := ;
      { ;
      { hb_BChar(  38 ), "&amp;"    }, ;      //  ampersand
      { hb_BChar(  60 ), "&lt;"     }, ;      //  less-than sign
      { hb_BChar(  62 ), "&gt;"     }, ;      //  greater-than sign
      { hb_BChar( 162 ), "&cent;"   }, ;      //  cent sign
      { hb_BChar( 163 ), "&pound;"  }, ;      //  pound sign
      { hb_BChar( 165 ), "&yen;"    }, ;      //  yen sign
      { hb_BChar( 166 ), "&brvbar;" }, ;      //  broken bar
      { hb_BChar( 167 ), "&sect;"   }, ;      //  section sign
      { hb_BChar( 169 ), "&copy;"   }, ;      //  copyright sign
      { hb_BChar( 174 ), "&reg;"    }, ;      //  registered sign
      { hb_BChar( 176 ), "&deg;"    }, ;      //  degree sign
      { hb_BChar( 191 ), "&iquest;" }, ;      //  inverted question mark
      { hb_BChar( 192 ), "&Agrave;" }, ;      //  Latin capital letter a with grave
      { hb_BChar( 193 ), "&Aacute;" }, ;      //  Latin capital letter a with acute
      { hb_BChar( 194 ), "&Acirc;"  }, ;      //  Latin capital letter a with circumflex
      { hb_BChar( 195 ), "&Atilde;" }, ;      //  Latin capital letter a with tilde
      { hb_BChar( 196 ), "&Auml;"   }, ;      //  Latin capital letter a with diaeresis
      { hb_BChar( 197 ), "&Aring;"  }, ;      //  Latin capital letter a with ring above
      { hb_BChar( 198 ), "&AElig;"  }, ;      //  Latin capital letter ae
      { hb_BChar( 199 ), "&Ccedil;" }, ;      //  Latin capital letter c with cedilla
      { hb_BChar( 200 ), "&Egrave;" }, ;      //  Latin capital letter e with grave
      { hb_BChar( 201 ), "&Eacute;" }, ;      //  Latin capital letter e with acute
      { hb_BChar( 202 ), "&Ecirc;"  }, ;      //  Latin capital letter e with circumflex
      { hb_BChar( 203 ), "&Euml;"   }, ;      //  Latin capital letter e with diaeresis
      { hb_BChar( 204 ), "&Igrave;" }, ;      //  Latin capital letter i with grave
      { hb_BChar( 205 ), "&Iacute;" }, ;      //  Latin capital letter i with acute
      { hb_BChar( 206 ), "&Icirc;"  }, ;      //  Latin capital letter i with circumflex
      { hb_BChar( 207 ), "&Iuml;"   }, ;      //  Latin capital letter i with diaeresis
      { hb_BChar( 208 ), "&ETH;"    }, ;      //  Latin capital letter eth
      { hb_BChar( 209 ), "&Ntilde;" }, ;      //  Latin capital letter n with tilde
      { hb_BChar( 210 ), "&Ograve;" }, ;      //  Latin capital letter o with grave
      { hb_BChar( 211 ), "&Oacute;" }, ;      //  Latin capital letter o with acute
      { hb_BChar( 212 ), "&Ocirc;"  }, ;      //  Latin capital letter o with circumflex
      { hb_BChar( 213 ), "&Otilde;" }, ;      //  Latin capital letter o with tilde
      { hb_BChar( 214 ), "&Ouml;"   }, ;      //  Latin capital letter o with diaeresis
      { hb_BChar( 216 ), "&Oslash;" }, ;      //  Latin capital letter o with stroke
      { hb_BChar( 217 ), "&Ugrave;" }, ;      //  Latin capital letter u with grave
      { hb_BChar( 218 ), "&Uacute;" }, ;      //  Latin capital letter u with acute
      { hb_BChar( 219 ), "&Ucirc;"  }, ;      //  Latin capital letter u with circumflex
      { hb_BChar( 220 ), "&Uuml;"   }, ;      //  Latin capital letter u with diaeresis
      { hb_BChar( 221 ), "&Yacute;" }, ;      //  Latin capital letter y with acute
      { hb_BChar( 222 ), "&THORN;"  }, ;      //  Latin capital letter thorn
      { hb_BChar( 223 ), "&szlig;"  }, ;      //  Latin small letter sharp s (German Eszett)
      { hb_BChar( 224 ), "&agrave;" }, ;      //  Latin small letter a with grave
      { hb_BChar( 225 ), "&aacute;" }, ;      //  Latin small letter a with acute
      { hb_BChar( 226 ), "&acirc;"  }, ;      //  Latin small letter a with circumflex
      { hb_BChar( 227 ), "&atilde;" }, ;      //  Latin small letter a with tilde
      { hb_BChar( 228 ), "&auml;"   }, ;      //  Latin small letter a with diaeresis
      { hb_BChar( 229 ), "&aring;"  }, ;      //  Latin small letter a with ring above
      { hb_BChar( 230 ), "&aelig;"  }, ;      //  Latin lowercase ligature ae
      { hb_BChar( 231 ), "&ccedil;" }, ;      //  Latin small letter c with cedilla
      { hb_BChar( 232 ), "&egrave;" }, ;      //  Latin small letter e with grave
      { hb_BChar( 233 ), "&eacute;" }, ;      //  Latin small letter e with acute
      { hb_BChar( 234 ), "&ecirc;"  }, ;      //  Latin small letter e with circumflex
      { hb_BChar( 235 ), "&euml;"   }, ;      //  Latin small letter e with diaeresis
      { hb_BChar( 236 ), "&igrave;" }, ;      //  Latin small letter i with grave
      { hb_BChar( 237 ), "&iacute;" }, ;      //  Latin small letter i with acute
      { hb_BChar( 238 ), "&icirc;"  }, ;      //  Latin small letter i with circumflex
      { hb_BChar( 239 ), "&iuml;"   }, ;      //  Latin small letter i with diaeresis
      { hb_BChar( 240 ), "&eth;"    }, ;      //  Latin small letter eth
      { hb_BChar( 241 ), "&ntilde;" }, ;      //  Latin small letter n with tilde
      { hb_BChar( 242 ), "&ograve;" }, ;      //  Latin small letter o with grave
      { hb_BChar( 243 ), "&oacute;" }, ;      //  Latin small letter o with acute
      { hb_BChar( 244 ), "&ocirc;"  }, ;      //  Latin small letter o with circumflex
      { hb_BChar( 245 ), "&otilde;" }, ;      //  Latin small letter o with tilde
      { hb_BChar( 246 ), "&ouml;"   }, ;      //  Latin small letter o with diaeresis
      { hb_BChar( 248 ), "&oslash;" }, ;      //  Latin small letter o with stroke
      { hb_BChar( 249 ), "&ugrave;" }, ;      //  Latin small letter u with grave
      { hb_BChar( 250 ), "&uacute;" }, ;      //  Latin small letter u with acute
      { hb_BChar( 251 ), "&ucirc;"  }, ;      //  Latin small letter u with circumflex
      { hb_BChar( 252 ), "&uuml;"   }, ;      //  Latin small letter u with diaeresis
      { hb_BChar( 253 ), "&yacute;" }, ;      //  Latin small letter y with acute
      { hb_BChar( 254 ), "&thorn;"  }, ;      //  Latin small letter thorn
      { hb_BChar( 255 ), "&yuml;"   }, ;      //  Latin small letter y with diaeresis
      { hb_BChar(  94 ), "&circ;"   }, ;      //  modifier letter circumflex accent
      { hb_BChar( 126 ), "&tilde;"  }  ;      //  small tilde
      }

   RETURN