<?xml version="1.0" encoding="UTF-8"?>
<part class="form">
  <style>
    <property name="Geometry">{308,132,1022,598}</property>
    <property name="Name">[sf_fatf.scr]</property>
    <property name="Caption">[Notas de Entrada]</property>
    <property name="AlwaysOnTop">.F.</property>
    <property name="AutoCenter">.T.</property>
    <property name="Font">
      <font name="Verdana" width="0" height="-13" weight="400"/>
    </property>
    <property name="FormType">[dlgModal]</property>
    <property name="Modal">.F.</property>
    <property name="ScopeVarObj">[Private]</property>
    <property name="lClipper">.T.</property>
    <property name="lExitOnEnter">.F.</property>
    <property name="lExitOnESC">.T.</property>
    <property name="FromStyle">[Center]</property>
    <property name="Clipsiblings">.F.</property>
    <property name="Clipchildren">.F.</property>
    <property name="TitleBar">.T.</property>
    <property name="StyleBorder">[3 - Sizable (Default)]</property>
    <property name="nBackColor">14215660</property>
    <property name="Icon">[]</property>
    <property name="Bitmap">[icon\tela.jpg]</property>
    <property name="NoIcon">.F.</property>
    <property name="SystemMenu">.T.</property>
    <property name="Minimizebox">.F.</property>
    <property name="Maximizebox">.T.</property>
    <property name="AbsAlignment">.T.</property>
    <property name="WindowState">[1 - Normal (Default)]</property>
    <property name="minHeight">-1</property>
    <property name="maxHeight">-1</property>
    <property name="minWidth">-1</property>
    <property name="maxWidth">-1</property>
    <property name="ScrollBars">[0 - None (Default)]</property>
    <property name="DSControl">.F.</property>
  </style>
  <method name="onDlgInit">
    <![CDATA[parameters oDlg

//skel VARIAVEL w_colsep  = chr(179)
//skel VARIAVEL w_headsep = chr(196)
//skel VARIAVEL w_browrel = .t.
//skel VARIAVEL w_chave = alias()
//skel VARIAVEL Z_SKIPBLK = .F.
//skel VARIAVEL z_nil = If(select("sccpfor")=0, (Abra_Arq("sccpfor"),dbSelectArea("sf_fatf")), "")
//skel VARIAVEL Z_REL = "Lst_exec('NFE05')"
//skel VARIAVEL zbPrtNf = {|| zalias:=alias(),z_recn:=recno(),Relat(z_REL,"nb"),DbCloseAll(),Abra_Arq("sccpfor"), Abra_Arq(zalias), dbgoto(z_recn) }
//skel VARIAVEL Z_blkfor = { |x_forn| Sccpfor->(if(select()=0,(,dbSelectArea("sf_fatf")),""),DbGoto(x_forn), cp_nome) }
//skel COMANDO DEPOIS Z_NIL = if(select("sccpfor")>0,sccpfor->(DbCloseArea()),"")
oContextMenu:=Hwg_ContextMenu()
hwg_Btn(oToolbar,5,5,54,54)
hwg_TbMt(oToolbar,' 22;tb_insert(D_OB);Ins-Inclui ;Ins-Inclui;add.jpg;;;;;Inclui;;;')
hwg_TbMt(oToolbar,' 65;tb_update(D_OB);A-Altera ;A-Altera;alterar.jpg;;;;;&A-Altera;;;')
hwg_TbMt(oToolbar,'  7;tb_del(D_ob);DEL-DELeta ;DEL-Deleta;deleta.jpg;;;;;Deleta;;;')
d_ob:lEditable = .t.
hwg_TbMt(oToolbar,' 80;tb_pesq(D_OB);P-Pesquisa ;P-Pesquisa na coluna do cursor;pesquisa.jpg;;;;;&P-Pesquisa;;;')
d_ob:lEditable = .t.
d_ob:lEditable = .t.
hwg_TbMt(oToolbar,' 79;tb_index(D_OB);O-Ordena ;O-Ordena a coluna do cursor;ordena.jpg;;;;;&O-Ordena;;;')
hwg_TbMt(oToolbar,' 73;lst_alias(D_OB);I-Imprime ;I-Imprime;impressora.jpg;;;;;&I-Imprime;;;')
hwg_Btn(oToolbar,10,544,70,24)
hwg_TbMt(oToolbar,' 32;doget(d_ob);Barra-Edita ;Barra - Edita;sembitmap;;;Lucida Bright;-11;Edita;;6;')
hwg_TbMt(oToolbar,' 13;doget(D_ob);Enter-Edita ;Enter - Edita;sembitmap;;;Lucida Bright;-11;Edita;;6;')
hwg_TbMt(oToolbar,' 61;doget(D_ob,,.t.);=-Repete_Edicao ;= - Repete_Edicao;sembitmap;;;Lucida Bright;-11;&=-Repete_Edicao;;6;')
hwg_TbMt(oToolbar,' 13;Eval(zbPrtNf);Enter-Imprime ;Enter - Imprime;sembitmap;;;Lucida Bright;-11;Imprime;;6;')
hwg_TbMt(oToolbar,' 84;tb_locate(D_oB);T-Busca_Trecho ;T-Pesquisa Trecho na coluna do cursor;sembitmap;;;Lucida Bright;-11;&T-Trecho;;6;')
hwg_TbMt(oToolbar,' 67;tb_locate(D_oB);C-Repete_Busca ;C-Repete Busca na coluna do cursor;sembitmap;;;Lucida Bright;-11;&C-Continua;;6;')
hwg_TbMt(oToolbar,' 69;tb_filter(d_ob,"Exp");E-Filtra_Expressao;E-Filtra Expressao;sembitmap;;;Lucida Bright;-11;&E-Filtra;;6;')
hwg_TbMt(oToolbar,' 70;tb_filter(d_ob);F-Filtra ;F-Filtra Cursor;sembitmap;;;Lucida Bright;-11;&F-Filtra;;6;')
SetDlgKey(oDlg,8,26,{|| (aBrowses[nBrwAtivo,2])->(moveRec(aBrowses[nBrwAtivo,1],"UP"))})
SetDlgKey(oDlg,8,28,{|| (aBrowses[nBrwAtivo,2])->(moveRec(aBrowses[nBrwAtivo,1],"DOWN"))})
Hwg_EndMenu()
]]>
  </method>
  <method name="onPaint">
    <![CDATA[Parameters oCtrl,hDC
oCtrl:bpaint:=NIL
D_oB:setFocus()]]>
  </method>
  <part class="status">
    <style>
      <property name="Geometry">{0,568,1022,30}</property>
      <property name="Name">[oDlgStatusBar]</property>
      <property name="aParts">{608,152,0}</property>
    </style>
  </part>
  <part class="browse">
    <style>
      <property name="Geometry">{10,69,1000,458}</property>
      <property name="Name">[D_oB]</property>
      <property name="Anchor">15</property>
      <property name="GridLinesSepColor">0</property>
      <property name="TabIndex">4</property>
    </style>
    <method name="onGetFocus">
      <![CDATA[nBrwAtivo:=1]]>
    </method>
    <method name="onInit">
      <![CDATA[hwg_TbFi(D_oB, 'Fornecedor;Eval(z_blkfor,PFFOR);C;@s20;20;N;')
hwg_TbFi(D_oB, 'Pedido;PFNUMPED;N;999999;  6;;')
hwg_TbFi(D_oB, 'Forn;PFFOR;N;999;4;;')
hwg_TbFi(D_oB, 'CFOP;PFCODOP;C;xxxxx;  5;;')
hwg_TbFi(D_oB, 'N.F.;PFNUM;N;999999999;9;S;')
hwg_TbFi(D_oB, 'ValCompra;PFVAL;N;99999.99;8;;')
hwg_TbFi(D_oB, 'DataEmis;PFDATAEMI;D;;  8;;')
hwg_TbFi(D_oB, 'ChaveNfe;fChaveNfe;C;@12;10;S;')
hwg_TbFi(D_oB, 'Data Ped;PFDATAPED;D;;  8;;')
hwg_TbFi(D_oB, 'Venc 1a;PFDATVENC;D;;  8;;')
hwg_TbFi(D_oB, 'DataCheg;PFDATACHE;D;;  8;;')
hwg_TbFi(D_oB, 'ValVenda;PFVALDIA;N;99999.99; 8;;')
hwg_TbFi(D_oB, 'Base ICMS;PFBASEICMS;N;99999.99; 8;;')
hwg_TbFi(D_oB, '%Desc;if(pfvaldia>0,(PFVALDIA-pfval)/pfvaldia*100,0);N;999.9;5;;')
hwg_TbFi(D_oB, '%ICMs;PFTAXAICMS;N;999.99;  8;;')
hwg_TbFi(D_oB, 'Tot ICMS;PFTOTICMS;N;99999.99; 8;;')
hwg_TbFi(D_oB, 'Serie e Sub;PFSERIESUB;C;xxx;  3;;')
hwg_TbFi(D_oB, 'ICM Ret;PFVALRET;N;999999.99; 9;;')
hwg_TbFi(D_oB, 'BaseRepasse;PFBASEREP;N;999999.99; 9;;')
hwg_TbFi(D_oB, 'Val Repasse;PFVALREP;N;999999999.99; 14;;')
hwg_TbFi(D_oB, 'Desconto;PFVALDES;N;999999999.99; 14;;')
hwg_TbFi(D_oB, 'Outros;PFOUTROS;N;999999999.99; 14;;')
hwg_TbFi(D_oB, 'ValTot;PFVALTOT;N;9999999999.99; 15;;')
hwg_TbFi(D_oB, '%IPI;PFTAXAIPI;N;999.99;  8;;')
hwg_TbFi(D_oB, 'Tot IPI;PFTOTIPI;N;999999999.99; 14;;')
hwg_TbFi(D_oB, 'TEnc;PFTIPOENC;N;99;  2;;')
hwg_TbFi(D_oB, 'Parcelas;PFNUMDUP;N;999;  3;;')
hwg_TbFi(D_oB, 'Interv;PFPERIODIC;N;999;  3;;')
hwg_TbFi(D_oB, 'Ind Corr;PFINDICE;N;99;  2;;')
hwg_TbFi(D_oB, 'Port;PFLOCAL;N;99;  2;;')
hwg_TbFi(D_oB, 'Sit;PFSITUACAO;N;99;  2;;')
hwg_TbFi(D_oB, 'Parc?;PFFGPARCEL;C;x;  1;;')
hwg_TbFi(D_oB, 'Vista?;PFFGVISTA;C;x;  1;;')
hwg_TbFi(D_oB, 'Cond;PFCONDICAO;N;999.99;  8;;')
hwg_TbFi(D_oB, 'ValPri;PFVALPRI;N;9999999999.99; 15;;')
hwg_TbFi(D_oB, '')
hwg_TbFi(D_oB, 'ICM entrada;PFICMISENT;N;9;  1;;')
hwg_TbFi(D_oB, 'Outras;PFICMOUTRO;N;9;  1;;')
hwg_TbFi(D_oB, 'Isencao IPI;PFIPIISENT;N;9;  1;;')
hwg_TbFi(D_oB, 'Outras IPI;PFIPIOUTRO;N;9;  1;;')
hwg_TbFi(D_oB, 'Ativid;PFATIVIDAD;C;@s6;  6;S;')
hwg_TbFi(D_oB, 'ISS;PFISS;N;9;  1;;')
hwg_TbFi(D_oB, 'Client;PFCLIENTE;N;99999;  5;;')
hwg_TbFi(D_oB, 'Fat?;FG_FAT;C;x;  1;;')
D_oB:bColorSel:= RGB(3,23,133)
D_oB:tColorSel:= RGB(255,255,255)
D_oB:Alias := alias()
D_oB:lDisableVScrollPos := .t.
D_oB:bKeyDown := {|self, wParam| (aBrowses[nBrwAtivo,2])->(hwg_oDlgKey(self, wparam,1)) , .T. }
D_oB:bOther:={|o,m,wp,lp| MessagesBrowse(o,m,wp,lp)}
D_oB:cargo:={.T.,.T.,"SF_FATF",.F.,.T.,{||.T.} }
sHwgKeyEdit:= 32
sHwgKeyEdit:= 61
d_ob:bEdit := {|D_oB| .t.}
AADD(aBrowses,{D_oB,D_oB:Alias,{||.f.},{|| .T.},})
]]>
    </method>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{410,0,483,47}</property>
      <property name="Name">[oLabel1]</property>
      <property name="Caption">[Notas de Entrada]</property>
      <property name="Justify">[Right]</property>
      <property name="font">
        <font name="Arial" width="0" height="-37" weight="700"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">5</property>
    </style>
  </part>
</part>
