<?xml version="1.0" encoding="UTF-8"?>
<part class="form">
  <style>
    <property name="Geometry">{301,170,440,468}</property>
    <property name="Name">[SYS_LSTF.scr]</property>
    <property name="Caption">[Modelos de Relatorios]</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="NoIcon">.F.</property>
    <property name="SystemMenu">.T.</property>
    <property name="Minimizebox">.T.</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
oContextMenu:=Hwg_ContextMenu()
hwg_Btn(oToolbar,5,5,28,28)
hwg_TbMt(oToolbar,'22;tb_insert(D_OB);Ins-Inclui Form;INS - Inclui;smNew;')
hwg_TbMt(oToolbar,'65;tb_update(D_OB);A-Altera Form;A - Altera Form;smOk;')
hwg_TbMt(oToolbar,'7;tb_del(D_oB);Del-Exclui;DEL - Deleta;smTrash;')
hwg_TbMt(oToolbar,'0;;;espaco;espaco;')
hwg_TbMt(oToolbar,'0;aBrowses[nBrwAtivo,1]:top();Primeira;Primeira;smFirst;')
hwg_TbMt(oToolbar,'0;aBrowses[nBrwAtivo,1]:pageUp();Volta_Pag;Volta_Pag;smPrev;')
hwg_TbMt(oToolbar,'0;aBrowses[nBrwAtivo,1]:pageDown();Avanca_Pag;Avanca_Pag;smNext;')
hwg_TbMt(oToolbar,'0;aBrowses[nBrwAtivo,1]:bottom();Ultima;Ultima;smLast;')
hwg_TbMt(oToolbar,'0;;;espaco;espaco;')
hwg_TbMt(oToolbar,'0;;;espaco;espaco;')
hwg_TbMt(oToolbar,'73;import_lst();I-Importa Form;I - Importa Form;_I;')
hwg_TbMt(oToolbar,'69;export_lst();E-Exporta Form;E - Exporta Form;_E;')
hwg_TbMt(oToolbar,'13;rel_expand();Enter-Executa Form;Enter - Executa Form;_Enter;')
hwg_TbMt(oToolbar,'0;;;espaco;espaco;')
hwg_TbMt(oToolbar,'27;hwg_oDlgKey(oDlg, 27, nBrwAtivo);Saida;Saida;smExit3;')
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="panel">
    <style>
      <property name="Geometry">{0,0,440,38}</property>
      <property name="Name">[oToolbar]</property>
      <property name="Anchor">11</property>
    </style>
  </part>
  <part class="status">
    <style>
      <property name="Geometry">{0,438,440,30}</property>
      <property name="Name">[oStatus1]</property>
      <property name="aParts">{352,88,0}</property>
    </style>
  </part>
  <part class="browse">
    <style>
      <property name="Geometry">{5,38,430,400}</property>
      <property name="Name">[D_oB]</property>
      <property name="bfirst">[{|| DbSeek(w_chave) }]</property>
      <property name="bwhile">[{|| .not.eval(w_block)}]</property>
      <property name="TabIndex">13</property>
    </style>
    <method name="onGetFocus">
      <![CDATA[nBrwAtivo:=1]]>
    </method>
    <method name="onInit">
      <![CDATA[D_oB:bColorSel:= RGB(3,23,133)
D_oB:tColorSel:= RGB(255,255,255)
D_oB:bKeyDown := {|self, wParam| (aBrowses[nBrwAtivo,2])->(hwg_oDlgKey(self, wparam,1)) , .T. }
hwg_TbFi(D_oB, 'Descricao;FDESC;C;; 30;S;')
hwg_TbFi(D_oB, 'Relat;FFORM;C;;  8;S;')
hwg_TbFi(D_oB, 'Arquivo;FFILE;C;;  8;S;')
D_oB:Alias := alias()
D_oB:bOther:= {|o,m,wp,lp| MessagesBrowse(o,m,wp,lp)}
D_oB:cargo := {.T.,.T.,"SYS_LIST",.F.,.T.,{||.T.} }
d_ob:bEdit := {|D_oB| .t.}
AADD(aBrowses,{D_oB,D_oB:Alias,{||.f.},{|| .T.},})]]>
    </method>
    <method name="onSize">
      <![CDATA[Parameters oCtrl,x,y 
oCtrl:move(,,x-25,y-75) ]]>
    </method>
  </part>
</part>
