Power Builder - Completar campo

Hola Amigos

Tengo una duda no se como puedo realizar que una campo numerico se complete con ceros ejemplo:

tengo una caja de texto que debo introducir un numero este campo tiene una longitud de 7 caracteres, lo que deseo es que en ese campo yo llene solo 78 (un ejemplo) y debe aparecer 0000078, para no estar digitando los ceros que esto se realice automaticamente esperare su respuesta y hasta otra oportunidad gracias.

EL CAMPO ES NUMERICO NO SE PUEDE
SI EL CAMPO ES UN STRING

string ls_s
li_s = dw_1.object.campo[dw_1.Getrow()]

ls_s = string(integer(li), '0000000')
dw_1.object.campo[dw_1.Getrow()] = ls

GRACIAS ME AYUDARA PERO COMO PUEDO HACER TAMBIEN SI ES QUE LA CAJA DE TEXTO NO PERTENECE A UN DATAWINDOW SI UNA CAJA DE TEXTO NORMAL?

AYUDA PLEASE

de la misma manera
string ls_s
li_s =sle_1.nombre.tx
ls_s = string(integer(li), '0000000')
sle_1.nombre.tx = ls