ARR_NOT;Pedidos a Receber;sys_tbbrow; 5; 7;20;57;arr_not;;
:TBMT
 13;slped(nrow,"SP_MOVFN");Enter-Seleciona ;
 82;pf_entr(nrow,D_oB);R-Confirma_Entrada ;
 69;pf_etiq(nrow,"E");E-Etiquetas ;
 73;pf_espimport(nrow,d_ob);I-Importa_Espelho ;
 65;atped(nrow,D_oB,0);A-Atualiza_Dic ; 
  7;dlped(nrow,D_oB,.t.);Del-Cancela ;
 22;novo_ped(D_OB,"SP_MOVFN");Ins-Cria_Vazio ;
:TBFI
Fornecedor;v_ped[1,nrow];C;@s20; 20;;
Ped;substr(v_ped[2,nrow],if(s_e_4forn="S",6,5),if(s_e_4forn="S",3,4));C;@s4;  4;;
Data       Hora;v_ped[3,nrow];C;@s17; 17;;
