Internet
#='INTERNET'
Llamada
TYPE(#)='N'
Minibar
#='P"
E-Mail
#='EMAIL'
#=CHR(16) or #=CHR(18)
Call
#='J'
Fax
#='FAX'
Nuevo cargo
#='A' or #='B'
Peliculas
#='MOVIE'
CARGO INTERNET
# = "HTL"
CALL
!EMPTY(#)  and #<>'<' and #<>'-'