Developer - como substraer cadenas ?

Como puedo sustraer letras de una caja de texo para generar una curp en forms builer developer ayuda si suipera dar clase bien mi maestro.. debo ingresar datos,,, para generar la curp y luego guardar los datos
necesito crear un curp
Forms Builer Developer

Man lo subtaje asi
NP:=SUBSTR(:PRODUC.NOMPRO,1,3);
NP es un variable varchar
PRODUC es mi bloque de control
NOMPRO el campo al que le aplico la substraccion
1,3 empieza de la pocision 1 de izquierda a derecha hasta llegar al 3er caracter