[stackoverflow] [progress Openedge Abl] Convert The Decimal Value To Get The Split Binary...

[Yulia Ftr]

I have to make a program which has the output like this :

def var vbit as logical extent 64 initial "false".
def var x as char form "x(16)" /* to store the decimal input */

Input : 2220010000000000
convert the value into:

22=00100010
20=00100000
01=00000001
00=00000000
00=00000000
00=00000000
00=00000000


then if the binary is sorted,the output will be:

123456789012345678901234
00100010001000000000000100000000000000000000000000000000


from this binary, change the vbit [x] like on the image.enter image description here

Thanks a lot for the answer.

Continue reading...