<?xml version="1.0" encoding="UTF-8"?>
<part class="form">
  <style>
    <property name="Geometry">{165,71,1093,598}</property>
    <property name="Name">[sccpconc.scr]</property>
    <property name="Caption">[Titulos a Pagar]</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="Variables">{modus,osoSaywSxConta}</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 zbPrtConferente := {||z_recno:=recno(),Relat('lst_exec("CONCILIA")',"nb",,"X"),eVal(zbOpenAll)}
//skel VARIAVEL zNil:=concilia->(select('sccrcli')=0.and.(abra_arq('sccrcli'),.t.), select('cp_subd')=0.and.(Abra('0NOIDX',r_siga,'cp_subd', 'cp_subd', 'cp_subd', 'cp_subdiv'),.t.), select('cp_divis')=0.and.(ABRA ("0NOIDX",r_siga,"cp_divis","CP_DIVIS"),.t.))
//skel variavel zbAction:={|bFunction|D_oB:Active:=.f.,zRecnOs:=Recno(),eVal(bFunction),DbGoTo(zRecnOs),D_oB:Active:=.t.,DobRefresh()}
d_ob:lEditable = .t.
oContextMenu:=Hwg_ContextMenu()
hwg_Btn(oToolbar,5,5,64,64)
hwg_TbMt(oToolbar,'81;eVal(zbAction,{||cp_concilia(d_oB,"QuitacaoDetalhada")}) ;Q-Quita ;Q-Efetua Quitacao do Titulo;alterar.ico;;;;;&Q-Quita;;;')
hwg_TbMt(oToolbar,'65;if(day(cp_dt_lqd)=0,eVal(zbAction,{||tb_update(D_OB)}),Mensagem("Titulo Ja Liquidado! Alteracao nao Permitida!",1) );A-Altera ;A-Altera;alterar.ico;;;;;&A-Altera;;;')
hwg_TbMt(oToolbar,'7;tb_del(d_ob);Del-Apaga ;Del-Deleta;deletar.ico;;;;;Deleta;;;')
hwg_TbMt(oToolbar,'80;tb_pesq(D_OB);P-Pesquisa ;P-Pesquisa na coluna do cursor;pesquisa.ico;;;;;&P-Pesquisa;;;')
hwg_TbMt(oToolbar,'79;tb_index(D_ob);O-Ordena ;O-Ordena a coluna do cursor;ordenar.ico;;;;;&O-Ordena;;;')
hwg_TbMt(oToolbar,'73;eVal(zbPrtConferente);I-Imprime ;I-Imprime;impressora.ico;;;;;&I-Imprime;;;')
hwg_Btn(oToolbar,10,544,120,24)
hwg_TbMt(oToolbar,'13;eVal(zbAction,{||cp_concilia(d_oB,"QuitDtAtual")});Enter-ConfirmaQuitacao;Enter - Quita titulo com valor do vencimento e data atual;sembitmap;;;Lucida Bright;-11;Enter-QuitDtAtual;;6;')
hwg_TbMt(oToolbar,'-1;eVal(zbAction,{||cp_concilia(d_oB,"QuitDtVenc")});F2-QuitacaoVencimento ;F2 - Quita titulo com valor e data do vencimento;sembitmap;;;Lucida Bright;-11;F2-QuitDtVenc;;6;')
hwg_TbMt(oToolbar,'-2;eVal(zbAction,{||cp_concilia(D_oB, "GetSxConta")});F3-Conta ;F3-Mudar Conta Usada Para Pagamentos;sembitmap;;;Lucida Bright;-11;F3-MudarConta;;6;')
hwg_TbMt(oToolbar,'-3;eVal(zbAction,{||cp_confere(d_ob)});F4-Confere/DesMarca ;F4- Confere/DesMarca titulo, confirmando autenticidade do mesmo;sembitmap;;;Lucida Bright;-11;F4-Confere;;6;')
hwg_Btn(oToolbar,,,70,24)
hwg_TbMt(oToolbar,'32;doget(D_ob);Barra-Edita ;Barra - 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,'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-Continua_Busca ;C-Repete Busca na coluna do cursor;sembitmap;;;Lucida Bright;-11;&C-Continua;;6;')
hwg_TbMt(oToolbar,'70;tb_filter(d_ob);F-Filtra ;F-Filtra Cursor;sembitmap;;;Lucida Bright;-11;&F-Filtra;;6;')
hwg_TbMt(oToolbar,'72;brw2html();H-HTML_Excel ;H-Gera listagem em padrao HTML/EXCEL;sembitmap;;;Lucida Bright;-11;&H-Excel;;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()

odlg:MAXIMIZE()


//-- oVendas:RmChart_GrafPizza(oContainerFpag, 'Pizza_FormasPag')
// oVendas:RmChart_GrafPizza(oContainerCFOPs, 'Pizza_GrupoCfops')
// oVendas:RmChart_GrafPizza(oContainerFpag, 'Donnut_FormasPag')
//-- oVendas:RmChart_GrafPizza(oContainerCFOPs, 'Donnut_GrupoCfops')

ofValQuitado:Hide()
oLabel5:Hide()
]]>
  </method>
  <method name="onPaint">
    <![CDATA[Parameters oCtrl,hDC
oCtrl:bpaint:=NIL
D_oB:setFocus()]]>
  </method>
  <part class="status">
    <style>
      <property name="Geometry">{0,568,1093,30}</property>
      <property name="Name">[oDlgStatusBar]</property>
      <property name="aParts">{608,152,0}</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{830,143,251,18}</property>
      <property name="Name">[oLabel7]</property>
      <property name="Caption">[Resumo por Fornecedores]</property>
      <property name="Justify">[Right]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">16711680</property>
      <property name="BackColor">16777215</property>
      <property name="font">
        <font name="Futura Light" width="0" height="-13" weight="300"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">2</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{830,387,251,18}</property>
      <property name="Name">[oLabel8]</property>
      <property name="Caption">[Resumo por Centros de Custo]</property>
      <property name="Justify">[Right]</property>
      <property name="Anchor">12</property>
      <property name="TextColor">16711680</property>
      <property name="BackColor">16777215</property>
      <property name="font">
        <font name="Futura Light" width="0" height="-13" weight="300"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">2</property>
    </style>
  </part>
  <part class="browse">
    <style>
      <property name="Geometry">{10,77,813,423}</property>
      <property name="Name">[D_oB]</property>
      <property name="Anchor">15</property>
      <property name="font">
        <font name="Lucida Sans Unicode" width="0" height="-16" weight="400"/>
      </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, '*;Cp_Status;C;x;1;S;')
hwg_TbFi(D_oB, 'Forn;Cp_Cod_For;N;9999;4;S;')
hwg_TbFi(D_oB, 'Fantasia;if(left(cp_num_ped,2)="NC",sccrcli->(DbGoTo(concilia->cp_cod_for),cr_nome),Substr(fantforn(CP_COD_FOR),6));P;@s10; 10;N;')
hwg_TbFi(D_oB, 'Comentario;CP_DESC;C;@s14;14;S;')
hwg_TbFi(D_oB, 'Dt Emis;CP_DT_EMIS;D;99.99.99;8;N;')
hwg_TbFi(D_oB, 'Valor;CP_VALOR;N;999999.99;9;S;')
hwg_TbFi(D_oB, 'Dt Venc;CP_DT_VENC;D;99.99.99;8;N;')
hwg_TbFi(D_oB, 'Dt Lqd;CP_DT_LQD;D;99.99.99;8;S;')
hwg_TbFi(D_oB, 'Val Lqd;CP_VAL_LQD;N;9999999.99; 10;S;')
hwg_TbFi(D_oB, 'Saldo;if(day(cp_dt_lqd)=0.and.cp_valor>cp_adiant,cp_valor-CP_Adiant,0);P;99999999.99;11;N;')
hwg_TbFi(D_oB, 'Div;CP_DIVISAO;N;999;3;S;')
hwg_TbFi(D_oB, 'C.Custo;cp_divis->(DbGoTo(concilia->cp_divisao),Desc);P;@S15;15;;')
hwg_TbFi(D_oB, 'SubDiv;CP_SubDiv;C;99999;5;S;')
hwg_TbFi(D_oB, 'Descricao;cp_subd->(if(DbSeek(concilia->cp_subdiv),Desc,"Diversos"));P;@S15;15;;')
hwg_TbFi(D_oB, '?;FG_LIB;C;x;1;S;')
hwg_TbFi(D_oB, 'Conta;Sx_CONTA;N;999;3;S;')
hwg_TbFi(D_oB, 'Gr;GRUPO;N;9;2;S;')
hwg_TbFi(D_oB, 'Pc;CT_NPARC;N;999;3;S;')
hwg_TbFi(D_oB, 'ValParc;CT_VALOR;N;999999.99;9;S;')
hwg_TbFi(D_oB, 'Pz;CT_PRAZO;N;999;3;S;')
hwg_TbFi(D_oB, 'Dt_Primeira;CT_DTBASE;D;99.99.9999;10;S;')
hwg_TbFi(D_oB, 'CtForn;SX_CODFOR;N;9999;4;S;')

hwg_TbFi(D_oB, 'Lj;Floja;N;99;2;S;')
hwg_TbFi(D_oB, 'Pt;CP_LOCAL;N;999;3;S;')
hwg_TbFi(D_oB, 'S;CP_SITUACA;N;1;1;S;')
hwg_TbFi(D_oB, 'Duplic;CP_DUPLIC;C;xxxxxxxxx; 10;N;')
hwg_TbFi(D_oB, 'Cod Ped;CP_NUM_PED;C;xxxxxxxx;  8;N;')
hwg_TbFi(D_oB, '%TxVendor;CP_txVndor;N;99.99;9;S;')
hwg_TbFi(D_oB, 'DscVencto;CP_DscVenc;N;999999.99;9;S;')
hwg_TbFi(D_oB, 'Acesso;rec_del();N;;7;N;')
hwg_TbFi(D_oB, 'Dt Ref;CP_DT_REF;D;99.99.99;8;N;')
hwg_TbFi(D_oB, 'Tl;CP_TIP_LQD;C;x;2;S;')
D_oB:bColorSel:= RGB(3,23,233)
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.,"SCCPPED",.F.,.T.,{||.T.} }
d_ob:bEdit := {|D_oB| nKey:=13,if(cp_status<>"S",Mensagem("Titulo ainda nao conferido!",1),doget(D_ob))}
sHwgKeyEdit:= 61
AADD(aBrowses,{D_oB,D_oB:Alias,{||.f.},{|| .T.},})
]]>
    </method>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{575,1,298,37}</property>
      <property name="Name">[oLabel1]</property>
      <property name="Caption">[Selecao de Titulos]</property>
      <property name="Justify">[Right]</property>
      <property name="font">
        <font name="Arial" width="0" height="-32" weight="700"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">5</property>
    </style>
  </part>
  <part class="browse">
    <style>
      <property name="Geometry">{830,162,251,226}</property>
      <property name="Name">[oBrwForns]</property>
      <property name="Anchor">13</property>
      <property name="font">
        <font name="Futura-Medium" width="0" height="-13" weight="500"/>
      </property>
      <property name="GridLinesSepColor">0</property>
      <property name="TabIndex">5</property>
    </style>
    <method name="onGetFocus">
      <![CDATA[nBrwAtivo:=1]]>
    </method>
    <method name="onLostFocus">
      <![CDATA[nBrwAtivo:=1]]>
    </method>
    <method name="onInit">
      <![CDATA[oBrwForns:bColorSel:= RGB(3,23,133)
oBrwForns:tColorSel:= RGB(255,255,255)
DBSELECTAREA( '_forns' ) 
oBrwForns:ALIAS := Alias()
oBrwForns:lEditable := .f.

hwg_TbFi(oBrwForns, 'Saldo;cp_valor-cp_adiant;P;@E 999999,999.99;13;N;;')
hwg_TbFi(oBrwForns, 'Fornecedor;cp_nome;C;@S20;20;N;;')
hwg_TbFi(oBrwForns, 'Principal;cp_valor;N;@E 999999,999.99;13;N;;')
hwg_TbFi(oBrwForns, 'Cod;Cp_Cod_For;N;999999;6;N;;')

oBrwForns:bKeyDown := {|self, wParam| (aBrowses[nBrwAtivo,2])->(hwg_oDlgKey(self, wparam,1)) , .T. }
oBrwForns:bOther:={|o,m,wp,lp| MessagesBrowse(o,m,wp,lp)}
oBrwForns:cargo:={.T.,.T.,"_forns",.F.,.T.,{||.T.} }
AADD(aBrowses,{oBrwForns,oBrwForns:Alias,{||.f.},{|| .T.},})

DbSelectArea( 'concilia' )


]]>
    </method>
  </part>
  <part class="browse">
    <style>
      <property name="Geometry">{830,406,251,153}</property>
      <property name="Name">[oBrwCCust]</property>
      <property name="Anchor">12</property>
      <property name="font">
        <font name="Futura-Medium" width="0" height="-13" weight="500"/>
      </property>
      <property name="GridLinesSepColor">0</property>
      <property name="TabIndex">6</property>
    </style>
    <method name="onGetFocus">
      <![CDATA[nBrwAtivo:=3
]]>
    </method>
    <method name="onLostFocus">
      <![CDATA[nBrwAtivo:=1]]>
    </method>
    <method name="onInit">
      <![CDATA[oBrwCCust:bColorSel:= RGB(3,23,133)
oBrwCCust:tColorSel:= RGB(255,255,255)
DBSELECTAREA( '_ccust') 
oBrwCCust:ALIAS := Alias()
oBrwCCust:lEditable := .f.

hwg_TbFi(oBrwCCust, 'Saldo;cp_valor-cp_adiant;P;@E 999999,999.99;13;N;;')
hwg_TbFi(oBrwCCust, 'Centro Custo;desc;C;@S20;20;N;;')
hwg_TbFi(oBrwCCust, 'Principal;cp_valor;N;@E 999999,999.99;13;N;;')
hwg_TbFi(oBrwCCust, 'Cod;Cp_Divisao;N;999999;6;N;;')

oBrwCCust:bKeyDown := {|self, wParam| (aBrowses[nBrwAtivo,2])->(hwg_oDlgKey(self, wparam,1)) , .T. }
oBrwCCust:bOther:={|o,m,wp,lp| MessagesBrowse(o,m,wp,lp)}
oBrwCCust:cargo:={.T.,.T.,"_forns",.F.,.T.,{||.T.} }
AADD(aBrowses,{oBrwCCust,oBrwCCust:Alias,{||.f.},{|| .T.},})

DbSelectArea( 'concilia' )



]]>
    </method>
  </part>
  <part class="editbox">
    <style>
      <property name="Geometry">{899,24,182,36}</property>
      <property name="Name">[owPrincipal]</property>
      <property name="varName">[wPrincipal]</property>
      <property name="Anchor">9</property>
      <property name="Transparent">.T.</property>
      <property name="font">
        <font name="Verdana" width="0" height="-24" weight="700"/>
      </property>
      <property name="cPicture">[@e 999,999.99]</property>
      <property name="Border">.F.</property>
      <property name="TabIndex">10</property>
    </style>
  </part>
  <part class="editbox">
    <style>
      <property name="Geometry">{956,77,125,23}</property>
      <property name="Name">[owAdiantamentos]</property>
      <property name="varName">[wAdiantamentos]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">255</property>
      <property name="Transparent">.T.</property>
      <property name="font">
        <font name="Verdana" width="0" height="-16" weight="700"/>
      </property>
      <property name="cPicture">[@e 999,999.99]</property>
      <property name="Border">.F.</property>
      <property name="TabIndex">10</property>
    </style>
  </part>
  <part class="editbox">
    <style>
      <property name="Geometry">{956,107,125,23}</property>
      <property name="Name">[ofValQuitado]</property>
      <property name="varName">[m_fValQuitado]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">255</property>
      <property name="Transparent">.T.</property>
      <property name="font">
        <font name="Verdana" width="0" height="-16" weight="700"/>
      </property>
      <property name="cPicture">[@e 999,999.99]</property>
      <property name="Border">.F.</property>
      <property name="TabIndex">10</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{932,1,149,21}</property>
      <property name="Name">[oLabel4]</property>
      <property name="Caption">[Valor do Principal]</property>
      <property name="Justify">[Right]</property>
      <property name="Anchor">9</property>
      <property name="font">
        <font name="Verdana" width="0" height="-16" weight="400"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">11</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{836,77,115,19}</property>
      <property name="Name">[oLabel6]</property>
      <property name="Caption">[Adiantamentos]</property>
      <property name="Justify">[Right]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">255</property>
      <property name="font">
        <font name="Verdana" width="0" height="-13" weight="400"/>
      </property>
      <property name="TabIndex">11</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{836,107,115,19}</property>
      <property name="Name">[oLabel5]</property>
      <property name="Caption">[Selecionados]</property>
      <property name="Justify">[Right]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">255</property>
      <property name="font">
        <font name="Verdana" width="0" height="-13" weight="400"/>
      </property>
      <property name="TabIndex">11</property>
    </style>
  </part>
  <part class="editbox">
    <style>
      <property name="Geometry">{835,44,25,24}</property>
      <property name="Name">[owSxGrupo]</property>
      <property name="varName">[wSxGrupo]</property>
      <property name="font">
        <font name="Arial" width="0" height="-21" weight="700"/>
      </property>
      <property name="cPicture">[9]</property>
      <property name="nMaxLength">5</property>
      <property name="3DLook">.T.</property>
      <property name="TabIndex">16</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{795,44,39,19}</property>
      <property name="Name">[oLabel2]</property>
      <property name="Caption">[Grupo]</property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">17</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{458,22,111,47}</property>
      <property name="Name">[oLabel3]</property>
      <property name="Caption">[Conta Tesouraria]</property>
      <property name="Justify">[Right]</property>
      <property name="font">
        <font name="Arial" width="0" height="-19" weight="700"/>
      </property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">17</property>
    </style>
  </part>
  <part class="label">
    <style>
      <property name="Geometry">{593,44,191,24}</property>
      <property name="Name">[osoSaywSxConta]</property>
      <property name="Caption">[...]</property>
      <property name="font">
        <font name="Arial" width="0" height="-16" weight="700"/>
      </property>
      <property name="Border">.T.</property>
      <property name="Transparent">.T.</property>
      <property name="TabIndex">17</property>
    </style>
  </part>
</part>
