SoloCodigo

Alguien puede enviarme el script necesario para una calculadora basica en power builder no se como hacer las funciones me sale error y deseo que la pantalla de resultado no pueda ser editado por el usuario es decir desde el teclado...por favor ayudenme. el codigo que cree es asi pero algo esta mal porfavor ayudenme
Variables de Instancia
boolean ib_inicio = false
decimal id_total
string is_signo

Funcion Ventana fw_inicio ();
if not ib_inicio then
   ib_inicio = true
   sle_pantalla.text = " "
end if

Funcion Ventana fw_calculo (string signo, string dato);
if id_total=0 then
   id_total=dec(dato)
else
   choose case signo
      case "+"
         id_total = id_total + dec(dato)
      case "-"
         id_total = id_total - dec(dato)
      case "*"
         id_total = id_total * dec(dato)
      case "/"
         id_total = id_total / dec(dato)
   end choose
end if
id_total = Round ( id_total, dec(em_decimal.text) )