파워빌더(PowerBuilder) - 2진수 문자열을 10진수 숫자로 변환

2진수 문자열을 10진수 정수로 변환합니다.

 

Return Type : string

Function Name :  gf_bin2dec

Argument Type : string   Argument Name : as_bin

 

int li_cnt

long ll_len, ll_dec

char lch_char[]

 

ll_len = len(as_bin)

 

lch_char = as_bin

 

for li_cnt = 1 to ll_len

  if lch_char[li_cnt] = '0' or lch_char[li_cnt] = '1' then

    ll_dec = ll_dec + (long(lch_char[li_cnt]) * (2 ^ (ll_len - li_cnt)))

  else

    return -1

  end if

next

 

return ll_dec

예) 

gf_bin2dec(‘10101010’)

 

->  170을 반환합니다.