CP_DIVIS;Classificacao das Despesas;sys_tbbrow; 8;10;20;72;padrao;;
:SKEL
VARIAVEL zBlkDiv = _CreateBlock( 'DbCloseAll(),AjustDiv(),Abra_arq("cp_divis")' )
:TBMT
 13;doget(D_ob);Enter-Edita ;
  7;tb_del(D_ob);DEL-DELeta ;
 47;Eval(zBlkDiv);/-Ajusta_Divisoes ;
 32;tb_cons();Barra-Exibe ;
 65;tb_update(D_OB);A-Altera ;
 22;tb_insert(D_OB);Ins-Inclui ;
 80;tb_pesq(D_OB);P-Pesquisa ;
 79;tb_index(D_OB);O-Ordena ;
 73;lst_alias(D_OB);I-Imprime ;
 70;tb_filter(d_ob);F-Filtra ;
 69;tb_filter(d_ob,"Exp");E-Filtra_Expressao ;
:TBFI
Divisao;cp_divisao;N;999; 7;;
Descricao;DESC;C;@s35; 30;;
Apos DRE?;apos_Dre;C;X; 9;;