Есть ли способ вложить один из них (Crystal Reports)

Мне нужно использовать эти две формулы для одного поля. Может ли кто-нибудь помочь мне объединить их?

stringvar input := {tbl.col};
stringvar output := '';
numbervar i;

input := Trim(input);

for i := 1 to Length(input) Step 1 do 
if not(input[i] in [Chr(13),Chr(10)]) then 
   output := output + input[i];output;

if right({tbl.col},1) = "]" then
   left({tbl.col},instr({tbl.col},"[")-1)
else 
   {tbl.col};

Любые предложения, если я хочу сначала использовать этот код, а затем удалить пробелы/разрывы строк? // массив строковых переменных x := split({Police.Narrative},"]"); // числовая переменная i; // числовая переменная j := ubound(x); //строковая переменная y := ""; //для i := 1 to j-1 do( //y := y + trim(extractstring(x[i],"","["))+"; " //); //если len(y) > 2, то //left(y, len(y)-2);