Progress - conversion de decimal a binario

existe alguna funcion para convertir de decimal a binario y reciprocamente.
existe algo que te devuelva el resto de la division como el mod en c?

gracias...

Hola Victor, el operador que debes de utilizar paa el remanente de una división es MODULO, este operador te deja el resultado del remanente que se tiene al realizar una división:

Por ejemplo:

DEF VAR a AS DEC.

a = 12 MODULO 5.

DISPLAY a.

El resultado que te arroja es 2, que es precisamente el remanente al realizar la división. No confundir con .4 que sería la parte decimal del remanente.

En cuanto a la función de conversión de binario, no conozco ninguna, pudieras ser más especifico en cuanto a tu problematica con el binario para ver si existe una alternativa.

Saludos.

Gracias Miguel ya lo hice y si funciono.

Anexo lo que hice por si te sirve posteriormente....
Saludos.

ASSIGN iNumero = ASC(flnoriginal:SCREEN-VALUE IN FRAME DEFAULT-FRAME).

DO i = 1 TO 7:
ASSIGN binario[i] = iNumero MODULO 2.
IF binario[i] = 1 THEN
ASSIGN iNumero = (iNumero / 2) - 1.
ELSE
ASSIGN iNumero = (iNumero / 2).

END.

: )

Buenas señores
Esos temas de conversiones son bastantes delicados y a mí me perece que no se comprende lo suficiente con dar a entender que los procesos son identicamente a este otro o decir que es precisamente lo conqtrario a este otro método.
Señores es una crítica constructiva y quiero se ponga e npráctica.
Yo necesito esta información para dominar muy bien estos temas.
Les pido por favor que me envíen esta iformación a mi correo [email protected]
Muchas grasias y suerte.