ARR_PLAN;Planos de Pagamento;sys_tbbrow; 8; 0;23;79;arrpadrao;;
:TBMT
 13;ProcessaParcelasDoPlanoEscolhido(nRow);Enter-Confirma_Plano ;
:TBFI
Pl;vPlanos[nrow,1];N;999;  3;;
Descricao;vPlanos[nrow,2];C;@S35; 30;;
     Valor  x Parcelas;Transform(vPlanos[nrow,3]/vPlanos[nrow,4],'@e 999,999.99')+'    x '+Str(vPlanos[nrow,4],5);C;@S25;25;;
Arred;vPlanos[nrow,9];N;9999.99; 7;;
%;vPlanos[nrow,7];N;9999.99; 7;;
Abat;vPlanos[nrow,6];N;9999.99; 7;;
TAC;vPlanos[nrow,8];N;9999.99; 7;;
**;vPlanos[nrow,5];N;9999.99; 7;;
*;if(vPlanos[nrow,5]>0,'*','');C;!; 1;;