ARR_NOT;Pedidos a Consignar;sys_tbbrow; 5; 7;20;57;arr_not;;
:TBMT
 22;novo_ped(D_OB,"SP_MOVFC");Ins-Cria Pedido;
 13;pf_entrConsig(nrow,D_oB);Enter-Consigna ;
 69;pf_etiq(nrow,"P");E-Etiquetas ;
  7;dlped(nrow,D_oB,.t.);Del-Cancela ;
:TBFI
Fornecedor;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;;
