<?xml version="1.0" encoding="UTF-8"?>
<part class="form">
  <style>
    <property name="Geometry">{308,132,1022,598}</property>
    <property name="Name">[sp_movf.scr]</property>
    <property name="Caption">[Produtos do Pedido]</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 COMANDO ANTES abra_arq("sccpfab")
//skel COMANDO ANTES DbSelectArea("SP_MOVF")
//skel COMANDO DEPOIS sccpfab->(DbCloseArea())
//skel VARIAVEL zbPrtPedido:= {||z_recno:=Recno(), Relat('lst_exec("SP_MOVF")',"nb",,"X"), eVal(zbOpenAll) }

d_ob:lEditable = .t.
oContextMenu:=Hwg_ContextMenu()
hwg_Btn(oToolbar,5,5,54,54)
hwg_TbMt(oToolbar,'22;ins_prd(D_oB,"P",.T.,.t.);Ins-Inclui ;Ins-Inclui;add.jpg;;;;;Inclui;;;')
hwg_TbMt(oToolbar,'80;tb_pesq(D_OB);P-Pesquisa ;P-Pesquisa na coluna do cursor;pesquisa.jpg;;;;;&P-Pesquisa;;;')
hwg_TbMt(oToolbar,'79;tb_index(D_OB);O-Ordena ;O-Ordena a coluna do cursor;ordena.jpg;;;;;&O-Ordena;;;')
hwg_TbMt(oToolbar,'73;eVal(zbPrtPedido);I-Imprime ;I-Imprime;impressora.jpg;;;;;&I-Imprime;;;')

hwg_Btn(oToolbar,10,544-32,90,24)
hwg_TbMt(oToolbar,'13;pf_DoGet(D_oB,"P");Enter-Altera ;Enter - Altera;sembitmap;;;Lucida Bright;-11;Altera;;6;')
hwg_TbMt(oToolbar,'86;pfvalor(D_oB);V-Valor_Pedido ;V - Valor_Pedido;sembitmap;;;Lucida Bright;-11;&V-Valor_Pedido;;6;')
hwg_TbMt(oToolbar,'93;disp_sdse(pcod);]-Demanda ;] - Demanda;sembitmap;;;Lucida Bright;-11;&]-Demanda;;6;')
hwg_TbMt(oToolbar,'65;ALTProd();A-Altera_Prod ;A - Altera_Prod;sembitmap;;;Lucida Bright;-11;&A-Altera_Prod;;6;')
hwg_TbMt(oToolbar,'83;rep_movf();S-Sugestoes ;S - Sugestoes;sembitmap;;;Lucida Bright;-11;&S-Sugestoes;;6;')
hwg_TbMt(oToolbar,'66;pf_ean(nrow,d_ob);B-Cod_Barras ;B - Cod_Barras;sembitmap;;;Lucida Bright;-11;&B-Cod_Barras;;6;')
hwg_Btn(oToolbar,10,544,90,24)
hwg_TbMt(oToolbar,'67;checadic(pcod);C-Dic_Consulta ;C - Dic_Consulta;sembitmap;;;Lucida Bright;-11;&C-Dic_Consulta;;6;')
hwg_TbMt(oToolbar,'69;dispent(pcod);E-Entradas ;E - Entradas;sembitmap;;;Lucida Bright;-11;&E-Entradas;;6;')
hwg_TbMt(oToolbar,'32;pf_reserv(D_oB);Barra-Falta_No_Forn ;Barra - Falta_No_Forn;sembitmap;;;Lucida Bright;-11;Falta_No_Forn;;6;')
hwg_TbMt(oToolbar,'68;pf_madeira(d_ob);D-Desmembra ;D - Desmembra;sembitmap;;;Lucida Bright;-11;&D-Desmembra;;6;')
hwg_TbMt(oToolbar,'84;edit_txt(r_siga+"ped\"+w_pedido+".txt",0,7,23,73);T-Texto_Observacoes ;T - Texto_Observacoes;sembitmap;;;Lucida Bright;-11;&T-Texto_Observacoes;;6;')
hwg_TbMt(oToolbar,'76;lestmax(d_ob);L-Excessos ;L - Excessos;sembitmap;;;Lucida Bright;-11;&L-Excessos;;6;')
hwg_TbMt(oToolbar,'70;CiBrow("VB_FALTA",,"VB_FALT1") ;F-Faltas_do_Dia ;F - Faltas_do_Dia;sembitmap;;;Lucida Bright;-11;&F-Faltas_do_Dia;;6;')
hwg_Btn(oToolbar,,,110,24)
hwg_TbMt(oToolbar,'82;RedefineCfops(D_OB);R-Redefine_CFOPs ;R - Redefine CFOPs e CSTs;sembitmap;;;Lucida Bright;-11;&R-Redefine_CFOPs;;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()

Prd_dados("REFRESH")]]>
  </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,327}</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="onPosChange">
      <![CDATA[Prd_dados()]]>
    </method>
    <method name="onInit">
      <![CDATA[hwg_TbFi(D_oB, 'Cod;PCOD;N;99999;5;N;')
hwg_TbFi(D_oB, 'Desc;PDESC;C;@S28; 28;N;')
hwg_TbFi(D_oB, 'Pedida;unid_Fech;N;9999;4;S;')
hwg_TbFi(D_oB, 'Frc;pitens;N;999;3;N;')
hwg_TbFi(D_oB, 'PrUnVen;pvluvenda;N;9999.99;7;S;')
hwg_TbFi(D_oB, 'PrUnFab;pvluven3;N;9999.99;7;S;')
hwg_TbFi(D_oB, 'Cfop;pCfop;C;9999;4;S;')
hwg_TbFi(D_oB, 'Grade;Grade;C;@S!6;6;S;')
hwg_TbFi(D_oB, 'Receb;mqatend;N;9999;  4;S;')
hwg_TbFi(D_oB, 'falta;unid_Fech-mqatend;P;9999;4;N;')
hwg_TbFi(D_oB, 'PrTotVen;MVALor;N;99999.99;8;S;')
hwg_TbFi(D_oB, 'PrTotFab;MVALor3;N;99999.99;8;S;')
hwg_TbFi(D_oB, 'Cod Dic;Pdic;N;99999999;8;N;')
hwg_TbFi(D_oB, 'eMIN;pemin;N;9999.99;7;S;')
hwg_TbFi(D_oB, 'eMAX;pemax;N;9999.99;7;S;')
hwg_TbFi(D_oB, 'm30d;pemincl*30;P;9999.99;7;N;')
hwg_TbFi(D_oB, 'MedMes;pmedia;N;9999.99;7;N;')
hwg_TbFi(D_oB, 'UndVen;unid_Fech*pitens;P;999999;6;N;')
hwg_TbFi(D_oB, 'Cf;pcategoria;C;xxx;3;S;')
hwg_TbFi(D_oB, 'Cfop;pCfop;C;9999;4;S;')
hwg_TbFi(D_oB, 'CstIcm;Cst_Icms;C;xxx;6;S;')
hwg_TbFi(D_oB, 'CstPIS;Cst_Pis;C;xxx;6;S;')
hwg_TbFi(D_oB, 'CstCOF;Cst_Cofins;C;xxx;6;S;')
hwg_TbFi(D_oB, 'Base_ICM;mBaseIcms;N;9999.99;8;S;')
hwg_TbFi(D_oB, '%ICMs;mTaxaIcms;N;99.99;5;S;')
hwg_TbFi(D_oB, 'Tot_ICM;mTotIcms;N;9999.99;8;S;')
hwg_TbFi(D_oB, 'BaseST;mBaseRetid;N;9999.99;8;S;')
hwg_TbFi(D_oB, '%ST;mTaxaST;N;99.99;5;S;')
hwg_TbFi(D_oB, 'ICM_ST;mIcmRetido;N;9999.99;8;S;')
hwg_TbFi(D_oB, '*;pnegpos;C;x;1;S;')
hwg_TbFi(D_oB, 'BasePIS;vl_bc_pis;N;9999.99;8;S;')
hwg_TbFi(D_oB, '%PIS;aliq_pis;N;99.99;5;S;')
hwg_TbFi(D_oB, 'Tot_PIS;vl_pis;N;9999.99;8;S;')
hwg_TbFi(D_oB, 'BaseCOF;vlbccofins;N;9999.99;8;S;')
hwg_TbFi(D_oB, '%COF;aliqcofins;N;99.99;5;S;')
hwg_TbFi(D_oB, 'Tot_COF;vl_cofins;N;9999.99;8;S;')
hwg_TbFi(D_oB, '%Liq;PdescComp;N;999.99;6;S;')
hwg_TbFi(D_oB, '%Distr;PdescDist;N;999.99;6;S;')
hwg_TbFi(D_oB, '%Repas;prepasse;N;999.99;6;S;')
hwg_TbFi(D_oB, '%IPI;pipient;N;999.99;6;S;')
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.,"SP_MOVF",.F.,.T.,{||.T.} }
d_ob:bEdit := {|D_oB| nKey:=13,pf_DoGet(D_oB,"P")}
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">[Produtos do Pedido]</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 class="label">
    <style>
      <property name="Geometry">{642,405,368,132}</property>
      <property name="Name">[oPrdDados]</property>
      <property name="Caption">[Informacoes Complementares do Produto]</property>
      <property name="Anchor">12</property>
      <property name="TabIndex">5</property>
    </style>
  </part>
</part>
