Hi KurtBremser, my code for building formulas are: data loan(drop=_q_capitale cap_res_baloon baloon i rata interesse interesse_form rata_form i_form cap_res_baloon_form q_capitale_form _q_capitale_form); set str; format q_cap_res q_cap_ammto q_capitale 10.2; length q_capitale_form interesse_form q_cap_res_form q_cap_ammto_form cap_res_baloon_form _q_capitale_form $32000; retain _q_capitale _q_capitale_form; retain cap_res_baloon 0; if &baloon=0 then baloon=&capitale; else baloon=&capitale-((&capitale*&baloon)/100); i=&tasso/(&periodo_num*100); i_form=cats('x/',(&periodo_num*100)); if num_prog=1 then do; q_capitale=&capitale; q_capitale_form=compress(&capitale); rata=mort(baloon,.,i,&per_tot); rata_form=cats('(mort(',baloon,',.,',i_form,',',&per_tot,'))'); interesse=baloon*i; interesse_form=cats('(',baloon,'*',i_form,')'); q_cap_res=q_capitale-(rata-interesse); q_cap_res_form=cats('(',q_capitale_form,'-(',rata_form,'-',interesse_form,'))'); q_cap_ammto=rata-interesse; q_cap_ammto_form=cats('(',rata_form,'-',interesse_form,')'); end; else do; q_capitale=_q_capitale; q_capitale_form=_q_capitale_form; rata=mort(baloon,.,i,&per_tot); rata_form=cats('(mort(',baloon,',.,',i_form,',',&per_tot,'))'); cap_res_baloon=q_capitale-(&baloon*&capitale/100); cap_res_baloon_form=cats('(',q_capitale_form,'-',&baloon*&capitale/100,')'); if &baloon=0 then do; interesse=q_capitale*i; interesse_form=cats('(',q_capitale_form,'*',i_form,')'); end; else do; interesse=cap_res_baloon*i; interesse_form=cats('(',cap_res_baloon_form,'*',i_form,')'); end; q_cap_res=q_capitale-(rata-interesse); q_cap_res_form=cats('(',q_capitale_form,'-(',rata_form,'-',interesse_form,'))'); q_cap_ammto=q_capitale-q_cap_res; q_cap_ammto_form=cats('(',rata_form,'-',interesse_form,')'); end; if num_prog=&per_tot and &baloon^=0 then do; q_cap_ammto=(q_capitale-q_cap_res)+(&capitale*&baloon/100); q_cap_ammto_form=cats('(',q_capitale_form,'-',q_cap_res_form,')','+(',&capitale*&baloon/100); q_cap_res=0; q_cap_res_form="0"; end; _q_capitale=q_cap_res; _q_capitale_form=q_cap_res_form; run;
... View more