ARR_PED;Pedidos a Fornecedores;sys_tbbrow; 5; 7;20;57;arr_ped;;
:TBMT
 13;slped(nrow,"SP_MOVFA");Enter-Altera ;
 69;pf_etiq(nrow,"P",.f.);E-Etiquetas ;
 22;novo_ped(D_OB);Ins-Novo Pedido;
  7;dlped(nrow,D_oB,.t.);Del-Cancela ;
 68;copia_ped(nrow,D_oB);D-Duplica_Pedido ;
:TBFI
Fabricante;v_ped[1,nrow];C;@s20; 20;;
Ped;substr(v_ped[2,nrow],5,4);C;@s4;  4;;
Data       Hora;v_ped[3,nrow];C;@s17; 17;;
