SX_ORCAF;("Fornecedores da Cotacao "+Alltrim(sx_orc_d->cp_desc));sys_tbbrow; 10; 2;20;79;padrao;;
:SKEL
VARIAVEL w_colsep = chr(179)
VARIAVEL w_headsep = chr(196)
VARIAVEL zIdCotacao = sx_orc_d->IdCotacao
VARIAVEL znil = OrdScope(0, Str(zIdCotacao,6))
VARIAVEL znil = OrdScope(1, Str(zIdCotacao,6))
comando saida = OrdScope(0)
comando saida = OrdScope(1)
:TBMT
 22;tb_insert(D_OB);Ins-Inclui ; 
 13;if(sx_orc_d->pitens="S",SxOrcProdutos(D_OB,zIdCotacao,IdForn),tb_update(w_Dob));Enter-Produtos ; 
 65;tb_update(D_ob);A-Altera ;
  7;tb_del(D_ob);DEL-DELeta ;
 32;doget(D_OB);Barra-Edita ;
 80;tb_pesq(D_OB);P-Pesquisa ;
 70;tb_filter(d_ob);F-Filtra ;
:TBFI
Data;DATA;D;;  8;;
Fantasia;CP_FANTASI;C;@S15; 15;;
Fone;CP_FONE;C;@S15;15;;
Contato;CP_CONTATO;C;@S25; 15;;
*;FTIPOENC;N;9;  1;;
Div;CP_DIVISAO;N;999;  3;;
Forma Pag;CP_FORMAPG;C;@S15; 12;;
Subd;CP_SUBDIV;C;@S5;  5;;
Pz_Entrega;CP_PZENTRE;C;@S40; 40;;
Transp;FTRANSP;N;9999;  4;;
s;CR_SITUACA;C;x;  1;;
Forn;CP_COD_FOR;N;9999;  4;;
Raz_Social;CP_NOME;C;@S35; 35;;
Assunto;CP_DESC;C;@S40; 40;;
Observacoes Complementares;CP_DESC2;C;@S40; 40;;
Bco;BANCO;C;xxx;  3;;
IdForn;IdForn;N;999999;  6;;
Cotacao;IdCotacao;N;999999;  6;;