<?xml version="1.0" encoding="UTF-8"?>
<part class="form">
  <style>
    <property name="Geometry">{404,64,808,486}</property>
    <property name="Name">[sccrdpc1_cx.tel]</property>
    <property name="Caption">[Recebimento de Titulo]</property>
    <property name="AlwaysOnTop">.F.</property>
    <property name="AutoCenter">.T.</property>
    <property name="Font">
      <font name="Arial" width="0" height="-21" weight="400"/>
    </property>
    <property name="FormType">[dlgModal]</property>
    <property name="Modal">.F.</property>
    <property name="ScopeVarObj">[Local]</property>
    <property name="lClipper">.T.</property>
    <property name="lExitOnEnter">.T.</property>
    <property name="lExitOnESC">.T.</property>
    <property name="Variables">{modus,aCbwCrFormaPg}</property>
    <property name="FromStyle">[Popup]</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">16777215</property>
    <property name="Icon">[]</property>
    <property name="Bitmap">[icon\tela_tel2.jpg]</property>
    <property name="NoIcon">.F.</property>
    <property name="SystemMenu">.F.</property>
    <property name="Minimizebox">.F.</property>
    <property name="Maximizebox">.F.</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="onFormInit">
    <![CDATA[parameters o, p1
modus:=p1]]>
  </method>
  <method name="onDlgInit">
    <![CDATA[if(modus<>NIL,SetWindowText( oDlg:handle, modus ),)
//skel VARIAVEL M_Cr_NUM_DOC := IF(DAY(CR_DT_LQD)=0, M_CR_NUM_DOC+1,M_CR_NUM_DOC)
//skel VARIAVEL M_CR_DT_DOC := IF(DAY(CR_DT_LQD)=0, S_dATUAL, M_CR_dT_DOC)
//skel VARIAVEL zBlkRec := {||m_CR_AREC:=if(m_CR_AREC=0,m_cr_saldo,m_CR_AREC),if(type("oCr_Arec")<>"U",oCr_Arec:Refresh(),), RefreshGetList()}
//skel VARIAVEL m_fcli := cr_cod_cli
//skel VARIAVEL wCrFormaPg := if(empty(wCrFormaPg),vOpcoes[1],wCrFormaPg)
//skel comando depois #TEXTO_FONTE
//skel       //alert('0 wCrFormaPg='+hb_valtoexp(wCrFormaPg) )
//skel       se valtype(wCrFormaPg)='N' entao wCrFormaPg:=vOpcoes[wCrFormaPg]
//skel       //alert('1 wCrFormaPg='+hb_valtoexp(wCrFormaPg) )
//skel       wSxConta := GetCtaTesou(left(wCrFormaPg,2))
//skel       //alert('2 wCrFormaPg='+hb_valtoexp(wCrFormaPg)+' wSxConta='+hb_valtoexp(wSxConta) )
//skel       put_var("cr_formapg",wCrFormaPg)
//skel       put_var("sx_conta",wSxConta)
//skel       if (m_CR_AREC<m_CR_SALDO.and.Alert("Ainda Existiria um saldo pendente de "+Str(m_CR_SALDO-m_CR_AREC,10,2)+" !;Mantenho o saldo pendente ?",{"1.Sim","2.Nao"},"B/W")==1)
//skel          put_var("cr_dt_lqd",Ctod(""))
//skel       endif
//skel       m_fValEs := if(m_fValEs=0, m_CR_AREC, m_fValEs)
//skel #FIM_TEXTO_FONTE

//skel VARIAVEL WCRFORMAPG:="ES-Especie "

aCbwCrFormaPg := vOpcoes
owCrFormaPg:aitems := aCbwCrFormaPg
owCrFormaPg:Requery() 
owCrFormaPg:lText := (ValType(wCrFormaPg)="C")
owCrFormaPg:SetValue( wCrFormaPg ) 
owCrFormaPg:Refresh() 

SET(5,1960) ]]>
  </method>
  <part class="line">
    <style>
      <property name="Geometry">{9,432,793,2}</property>
      <property name="Name">[oLine1]</property>
    </style>
  </part>
  <part class="group">
    <style>
      <property name="Geometry">{10,0,791,430}</property>
      <property name="Name">[oGroup1]</property>
      <property name="TabIndex">1</property>
    </style>
    <part class="editbox">
      <style>
        <property name="Geometry">{42,73,147,36}</property>
        <property name="Name">[oCR_NUM_PED]</property>
        <property name="varName">[m_CR_NUM_PED]</property>
        <property name="TextColor">25542</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[XXXXXXXXX]</property>
        <property name="nMaxLength">9</property>
        <property name="Border">.F.</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">1</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{42,46,147,26}</property>
        <property name="Name">[oSayCR_NUM_PED]</property>
        <property name="Caption">[Titulo/Parcela]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">2</property>
      </style>
    </part>
    <part class="datepicker">
      <style>
        <property name="Geometry">{204,73,171,36}</property>
        <property name="Name">[oCR_DT_EMIS]</property>
        <property name="varName">[m_CR_DT_EMIS]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">2</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{13,10,783,34}</property>
        <property name="Name">[oLabel1]</property>
        <property name="Caption">[Recebimento de Titulo]</property>
        <property name="Justify">[Center]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-24" weight="700"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">2</property>
      </style>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{204,46,171,26}</property>
        <property name="Name">[oSayCR_DT_EMIS]</property>
        <property name="Caption">[Data de Emissao]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">3</property>
      </style>
    </part>
    <part class="datepicker">
      <style>
        <property name="Geometry">{389,73,171,36}</property>
        <property name="Name">[oCR_DT_VENC]</property>
        <property name="varName">[m_CR_DT_VENC]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">3</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{389,46,171,26}</property>
        <property name="Name">[oSayCR_DT_VENC]</property>
        <property name="Caption">[Data de Vencimento]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">4</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{574,73,195,36}</property>
        <property name="Name">[oCR_VALOR]</property>
        <property name="varName">[m_CR_VALOR]</property>
        <property name="TextColor">25542</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[@e 999,999.99]</property>
        <property name="nMaxLength">10</property>
        <property name="Border">.F.</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">4</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{574,46,195,26}</property>
        <property name="Name">[oSayCR_VALOR]</property>
        <property name="Caption">[Valor da Compra]</property>
        <property name="Justify">[Center]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">5</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{204,133,171,36}</property>
        <property name="Name">[oCR_VAL_LQD]</property>
        <property name="varName">[m_CR_VAL_LQD]</property>
        <property name="TextColor">25542</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[@e 999,999.99]</property>
        <property name="nMaxLength">10</property>
        <property name="Border">.F.</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">5</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{204,106,171,26}</property>
        <property name="Name">[oSayCR_VAL_LQD]</property>
        <property name="Caption">[Valor Ja Adiantado]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">6</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{389,133,171,36}</property>
        <property name="Name">[oCR_JUROS]</property>
        <property name="varName">[m_CR_JUROS]</property>
        <property name="TextColor">25542</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[@e 99,999.99]</property>
        <property name="nMaxLength">9</property>
        <property name="Border">.F.</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">6</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{389,106,171,26}</property>
        <property name="Name">[oSayCR_JUROS]</property>
        <property name="Caption">[Juros a Cobrar]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">7</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{574,133,195,36}</property>
        <property name="Name">[oCR_SALDO]</property>
        <property name="varName">[m_CR_SALDO]</property>
        <property name="TextColor">25542</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[@e 999,999.99]</property>
        <property name="nMaxLength">10</property>
        <property name="Border">.F.</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">7</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .f.]]>
      </method>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{241,195,323,72}</property>
        <property name="Name">[oCR_AREC]</property>
        <property name="varName">[m_CR_AREC]</property>
        <property name="font">
          <font name="Futura Futuris C" width="0" height="-48" weight="700"/>
        </property>
        <property name="cPicture">[@e 999,999.99]</property>
        <property name="nMaxLength">10</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">8</property>
      </style>
      <method name="onLostFocus">
        <![CDATA[//
return (if(Day(m_cr_dt_lqd)=0,(m_cr_dt_lqd:=if(m_CR_AREC>0,s_datual,m_cr_dt_lqd)),m_cr_dt_lqd),RefreshGetList())]]>
      </method>
      <method name="onGetFocus">
        <![CDATA[//
return eVal(zBlkRec)]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{574,106,195,26}</property>
        <property name="Name">[oSayCR_SALDO]</property>
        <property name="Caption">[Saldo a Receber]</property>
        <property name="Justify">[Center]</property>
        <property name="TextColor">25542</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">8</property>
      </style>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{18,208,220,54}</property>
        <property name="Name">[oSayCR_AREC]</property>
        <property name="Caption">[Valor Recebido:]</property>
        <property name="Justify">[Right]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-29" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">9</property>
      </style>
    </part>
    <part class="datepicker">
      <style>
        <property name="Geometry">{573,218,195,36}</property>
        <property name="Name">[oCR_DT_LQD]</property>
        <property name="varName">[m_CR_DT_LQD]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">9</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
//return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{573,191,222,26}</property>
        <property name="Name">[oSayCR_DT_LQD]</property>
        <property name="Caption">[Data da Liquidacao]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">10</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{26,291,540,36}</property>
        <property name="Name">[oCR_OBS]</property>
        <property name="varName">[m_CR_OBS]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-24" weight="700"/>
        </property>
        <property name="cPicture">[XXXXXXXXXXXXXXX]</property>
        <property name="nMaxLength">15</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">10</property>
      </style>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{27,264,176,26}</property>
        <property name="Name">[oSayCR_OBS]</property>
        <property name="Caption">[Comentario]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">11</property>
      </style>
    </part>
    <part class="combobox">
      <style>
        <property name="Geometry">{573,291,195,36}</property>
        <property name="Name">[owCrFormaPg]</property>
        <property name="varName">[wCrFormaPg]</property>
        <property name="ColumnWidth">198</property>
        <property name="Items">{}</property>
        <property name="DisplayCount">7</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="lEdit">.T.</property>
        <property name="FormatText">[UPPERCASE]</property>
        <property name="TabIndex">11</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return (MyShowListbox())]]>
      </method>
      <method name="onInteractiveChange">
        <![CDATA[Parameters value,owCrFormaPg
XmlChecaComboBox(value,owCrFormaPg,aCbwCrFormaPg) ]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{573,264,222,26}</property>
        <property name="Name">[oSaywCrFormaPg]</property>
        <property name="Caption">[Forma de Recebimento]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">12</property>
      </style>
    </part>
    <part class="editbox">
      <style>
        <property name="Geometry">{477,359,87,36}</property>
        <property name="Name">[oCR_NUM_DOC]</property>
        <property name="varName">[m_CR_NUM_DOC]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="cPicture">[999999]</property>
        <property name="nMaxLength">6</property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">12</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
return .F.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{351,328,213,29}</property>
        <property name="Name">[oSayCR_NUM_DOC]</property>
        <property name="Caption">[Numero do Adiantamento]</property>
        <property name="Justify">[Right]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">13</property>
      </style>
    </part>
    <part class="datepicker">
      <style>
        <property name="Geometry">{573,357,195,36}</property>
        <property name="Name">[oCR_DT_DOC]</property>
        <property name="varName">[m_CR_DT_DOC]</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-21" weight="700"/>
        </property>
        <property name="3DLook">.T.</property>
        <property name="TabIndex">13</property>
      </style>
      <method name="onGetFocus">
        <![CDATA[//
//return .f.]]>
      </method>
    </part>
    <part class="label">
      <style>
        <property name="Geometry">{573,330,222,26}</property>
        <property name="Name">[oSayCR_DT_DOC]</property>
        <property name="Caption">[Data Adiantamento]</property>
        <property name="BackColor">16777215</property>
        <property name="font">
          <font name="Segoe UI Emoji" width="0" height="-16" weight="400"/>
        </property>
        <property name="Transparent">.T.</property>
        <property name="TabIndex">14</property>
      </style>
    </part>
  </part>
  <part class="buttonex">
    <style>
      <property name="Geometry">{760,437,40,40}</property>
      <property name="Name">[oButtonex1]</property>
      <property name="Id">[IDOK]</property>
      <property name="Caption">[&amp;Ok]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">4194304</property>
      <property name="font">
        <font name="Arial" width="0" height="-1" weight="700"/>
      </property>
      <property name="Bitmap">[icon\confirmar.jpg]</property>
      <property name="Icon">[icon\produto.ico]</property>
      <property name="ToolTip">[Confirmar Cadastro ou Alteracao]</property>
      <property name="TabIndex">25</property>
    </style>
  </part>
  <part class="buttonex">
    <style>
      <property name="Geometry">{718,437,40,40}</property>
      <property name="Name">[oButtonex2]</property>
      <property name="Id">[IDCANCEL]</property>
      <property name="Caption">[&amp;Cancelar]</property>
      <property name="Anchor">9</property>
      <property name="TextColor">4194304</property>
      <property name="font">
        <font name="Arial" width="0" height="-1" weight="400"/>
      </property>
      <property name="Bitmap">[icon\cancelar.jpg]</property>
      <property name="Icon">[icon\produto.ico]</property>
      <property name="ToolTip">[Sair ou Cancelar Alteracao]</property>
      <property name="TabIndex">26</property>
    </style>
  </part>
</part>
