switch (
            i = 0, r = DescriptionReturn(0,value2,Totact2 ,value3,Totact3,value4,Totact4,value5 ,Totact5,value6,Totact6 ,value7,Totact7,value8,Totact8,value9,Totact9,value10,Totact10,value11,Totact11,value12,Totact12,value13,Totact13,value14,Totact14,value15,Totact15), 
            Rtrim(r) <> "",r,
            rtrim(r) = "", "LOAN INTEREST",
            i = 9, r = DescriptionReturn(9, value2,Totact2 ,value3,Totact3,value4,Totact4,value5 ,Totact5,value6,Totact6 ,value7,Totact7,value8,Totact8,value9,Totact9,value10,Totact10,value11,Totact11,value12,Totact12,value13,Totact13,value14,Totact14,value15,Totact15),
            Rtrim(r) = " ", "GAIN LOSS",
             i<>0 or i<>9, r =  DescriptionReturn(i,value2,Totact2 ,value3,Totact3,value4,Totact4,value5 ,Totact5,value6,Totact6 ,value7,Totact7,value8,Totact8,value9,Totact9,value10,Totact10,value11,Totact11,value12,Totact12,value13,Totact13,value14,Totact14,value15,Totact15) 
)