CT_RCNTL;RCs Eletronicas;sys_tbbrow; 5;25;21;69;ct_rcntl;;
:TBMT
 13;doget(D_ob);Enter-Edita Campo;
 76;do_rcrx(D_oB,"L");L-Lanca Rc na Cob;
 82;do_rcrx(D_oB,"R");R-Retira Rc da Cob;
 73;do_rcrx(D_oB,"I");I-Imprime RC;
 80;tb_pesq(D_OB);P-Pesquisa Chave;
 79;TB_INDEX(D_OB);O-Ordena ;
:TBFI
Fl;FVENDEDOR;C;xx;  2;;
Data;DATA_RX;D;;  8;;
No.Filial;NUMERORC_F;N;999999;  9;;
No.Matriz;NUMERORC_M;N;999999;  9;;
*;FGIMPRESSA;C;x;  1;;
