Power builder formularios simples

“Año de la Integración Nacional y reconocimiento de Nuestra Diversidad”

ALUMNO:

PROFESOR: juan

2012
2012

FORMULARIOS POWER BUILDER

INTEGER N1,N2,RPTA,SUMA,RESTA,MULTI,DIVIDEn1=integer(sle_1.text)
n2=integer(sle_2.text)
SUMA=N1 + N2
sle_3.text=string(suma)

n1=integer(sle_1.text)
n2=integer(sle_2.text)
RESTA=N1 - N2
sle_3.text=string(RESTA)n1=integer(sle_1.text)
n2=integer(sle_2.text)
MULTI=N1 * N2
sle_3.text=string(MULTI)

n1=integer(sle_1.text)
n2=integer(sle_2.text)
DIVIDE=N1 / N2
sle_3.text=string(DIVIDE)

INTEGER n1,n2,n3,puntos,promn1=integer(sle_6.text)
n2=integer(sle_7.text)
n3=integer(sle_8.text)
puntos=n1 + n2 +n3
sle_1.text=string(puntos)
PROM=puntos/3
sle_2.text=string(prom)

choose case prom
case 0 to 10sle_3.text="REPROBADO"
case 11 to 20
st_3.text="APROBADO"
end choose

choose case prom
case 0 to 09
sle_4.text="malo"
case 10 to 12
sle_4.text="pesimo"
case 13 to 15
st_4.text="regular"
case16 to 18
st_4.text="bueno"
case 19 to 20
st_4.text ="exelente"
end choose

DDPLB_1.TEXT SUELDO
integer bonif,essalud,fonavi,cts
choose case string (ddplb_1.text)
case"gerente "sle_3.text="4000"
bonif=integer(sle_3.text)*0.2
sle_7.text=string(bonif)
case"director"
sle_3.text="3000"
bonif=integer(sle_3.text)*0.3
sle_7.text=string(bonif)
case"secretaria"sle_3.text="1000"
bonif=integer(sle_3.text)*0.1
sle_7.text=string(bonif)
end choose
essalud=integer(sle_3.text)*0.11
sle_4.text=string(essalud)

fonavi=integer(sle_3.text)*0.05sle_5.text=string(fonavi)

cts=integer(sle_3.text)*0.04
sle_6.text=string(cts)

DDPLB_2.TEXT :SEXO

Integer sexo
choose case string(ddplb_2.text)
case "masculino"
sexo=integer(sle_3.text)*0.08sle_9.text=string(sexo)
case femenino
"sexo=integer(sle_3.text)*0.05 sle_9.text=string(sexo)
end choose

DDPLB_3.TEXT TURNO

integer turno
choose case(ddplb_3.text)
case"mañana "...