gonna have to build an array, then do a mid(right)) combo function
When I did it, the list was static, you will have to populate an array with a loop to count lines.
I can help a little more if you wanna private, but others may have easier recommendations
//shared stringVar array outcom := makearray(" "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," ");
shared stringVar array outcom := makearray(" "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," ");
local numbervar x;
local numbervar y;
local numbervar z;
local numbervar w;
local numbervar wx;
shared numbervar cntlines;
shared stringvar array xstr;
shared stringvar newstring;
//shared stringVar array comments := makearray(" "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," ");
shared stringVar array comments := makearray(" "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," "," ");
shared stringvar array incom;
comments[1] := {%engineeringComments}; // A
comments[2] := {%trafficEngineeringComments}; // b
comments[3] := {%waterUtilityComments}; // c
comments[4] := {%zoningComment}; // d
comments[5] := {%fireDepartmentComments}; // e
comments[6] := {%engineeringMappingComments}; // f
comments[7] := {%engineeringMappingComments-CON}; // g
comments[8] := {%realEstateComments}; // h
comments[9] := {%landmarksCommissionComments}; // i
comments[10] := {%urbanDesignCommissionComments}; // j
comments[11] := {%recyclingCoordinatorComments}; // k
comments[12] := {%policeComments}; // l
comments[13] := {%parksComments}; // m
comments[14] := {%transitComments}; // n
comments[15] := {%assessorComments}; // o
comments[16] := {%planningComments}; // p
comments[17] := {%planCommissionHearing}; // q
comments[18] := {%commonCouncilHearing}; // r
comments[19] := {%assessorComments-CON}; // s
comments[20] := {%architecturalReviewComments};//t
comments[21] := {%ligthingReviewComments}; //u
w := ubound(comments);
for wx := 1 to 21 do
(
newstring := "";
incom := split(comments[wx],chr(13));
xstr := split(comments[wx],chr(13));
y:= ubound(incom);
z := cntlines;
for x := 1 to y do
if len(incom[x]) > 1 then
( xstr[x] := totext(z,0,"","");
newstring := newstring + replicatestring(" ",5 - len(xstr[x])) + xstr[x] + ". " + replace(incom[x],chr(10),' ') + chr(13);
cntlines := cntlines + 1;
z := z + 1);
outcom[wx] := newstring
);