OK I finally did it, Its a ver long grammar, but in case someone is interested write me at [email protected] and I'll send you the rest of the grammar. Its in spanish but is something. It looks like:

<DB>::= 'DATABASE' 'id' ',' 'id' ',' 'id' ',' 'id' <inicio>

<inicio> ::= 'GLOBALS' <declaraciones> 'END' 'GLOBALS' <funciones>
<inicio> ::= <funciones>

<funciones>::= <funciones> <funcion>
<funciones>::= <funcion>

<funcion> ::= 'FUNCTION' 'id' '('<lst_identif>')' <acciones> 'END' 'FUNCTION'
<funcion> ::= 'FUNCTION' 'id' '(' ')' <acciones> 'END' 'FUNCTION'
<funcion> ::= 'MAIN' <acciones> 'END' 'MAIN'
<funcion> ::= 'FUNCTION' 'id' '('<lst_identif>')' <acciones> <sentencias> 'END' 'FUNCTION'
<funcion> ::= 'FUNCTION' 'id' '(' ')' <acciones> <sentencias> 'END' 'FUNCTION'
<funcion> ::= 'MAIN' <acciones> <sentencias> 'END' 'MAIN'
<funcion> ::= <form>
I parsed it using GOLD PARSER.