OpenEdge 10.2A - Is it possible to displaying DOS Characters (Chr(219) █ ) on Windows in a...

In some of our browses, we want to use old dos character chr(219) █ in order to create a field like a progress bar or a bar-chart.

Our codes and database use codepage-1254.

Setting I


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857","1254"),100).


Also we have used startup parameters as:

-cpinternal IBM857


and result is:

ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ

Setting II


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857","1254"),100).


Also we have used startup parameters as:

-cprcodein 1254 -cpinternal IBM857


and result is:

ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ

Setting III


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857","1254"),100).


Also we have used startup parameters as:

-cprcodein 1254


and result is:

êêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêê

Setting IV


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857"),100).


Also we have used startup parameters as:

-cpinternal IBM857


and result is: ››››››››››››››››››››››››››››››››››

Setting V


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857"),100).


Also we have used startup parameters as:

-cprcodein 1254 -cpinternal IBM857


and result is: ››››››››››››››››››››››››››››››››››

Setting VI


We have tried to create field value as:

myTable.myValue=fill(chr(219,"IBM857")),100).


Also we have used startup parameters as:

-cprcodein 1254


and result is: êêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêêê

As a result,


we want to produce an output as follows:

██████████████████████████████████████

Continue reading...