Can't you bump the size of the integer field? 10 and 20 byte integer
fields are supported.
afaik the ss_ prefixed procedures are supposed to work with xlsx (which is
what i am building, not xls) and the hssf_ are for .xls.
(am i mistaken?)
I don't know though... here's the procedure from the service program -
You can see both the hssf_ and the ss_ prefixed functions have identical
interface... row & col are both int(5:0) only allowing for a max of
32767.
Ehhh it's a poser (for me), guess i'll chew on it for awhile.
Thanks,
John
*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
* ss_cellName(): Convert POI y,x coordinates into a cell name
* (example: 0,0 becomes A1, 110,24 becomes Y111)
*
* peRow = row number (A=0, B=1, etc)
* peCol = column number
*
* Returns the alphanumeric cellname
*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
P ss_cellName B EXPORT
D ss_cellName PI 10A varying
D peRow 5I 0 value
D peCol 5I 0 value
D dsAlphabet ds qualified static
D whole 26A
inz('ABCDEFGHIJKLMNOPQRSTUVWXYZ')
D letter 1A dim(26) overlay(whole)
D wwRem s 5I 0
D wwCN s 10A varying
/free
peRow+=1;
peCol+=1;
wwCN = '';
dou peCol = 0;
wwRem = %rem(peCol: 26);
peCol = %div(peCol: 26);
if (wwRem = 0);
wwRem = 26;
peCol -= 1;
endif;
wwCN = dsAlphabet.letter(wwRem) + wwCN;
enddo;
wwCN = wwCN + %char(peRow);
return wwCN;
/end-free
P E
P hssf_cellName B EXPORT
D hssf_cellName PI 10A varying
D r 5I 0 value
D c 5I 0 value
c return ss_cellName(r: c)
P E
<br />
The information in this email is confidential and may be legally privileged.
It is intended solely for the addressee. Access to this email by anyone else is
unauthorized. If you are not the intended recipient, any disclosure, copying,
distribution or any action taken or omitted to be taken in reliance on it, is
prohibited and may be unlawful.
As an Amazon Associate we earn from qualifying purchases.