Incio em 20/12/2023 11:52:28
psDDFChamada=2, psFileDDS=dd_files/xecomm_FaleComUsuario.dda, psTagDDS=Padrao_11, psLogin=33, piTimeLogin=1703083897343, psAncestrais=1, psIrmasTias=, piSss=3
psOOpLogin=-1, sRoot=1, psTDoc=, psMnemTDoc=xecomm_FaleComUsuario, psCliPasta=xecomm, ppChaveSalva_1=
plMobile=0, plEchoJson=0, plEchoUtf8=0
GET -> key => value = sCliPasta => xecomm
GET -> key => value = pCiaLogin => 0
GET -> key => value = iCompany => 12
GET -> key => value = sDDFChamada => 2
GET -> key => value = sFileDDS => dd_files/xecomm_FaleComUsuario.dda
GET -> key => value = sTagDDS => Padrao_11
GET -> key => value = sLogin => 33
GET -> key => value = fLogin => 1
GET -> key => value = sTDoc => 
GET -> key => value = sMnemTDoc => xecomm_FaleComUsuario
GET -> key => value = sAncestrais => 1
GET -> key => value = sIrmasTias => 
GET -> key => value = sId => 1
GET -> key => value = spOOp => -1
GET -> key => value = sRoot => 1
GET -> key => value = iDesenvolvedor => 0
GET -> key => value = iGlobalKeyUser => 0
GET -> key => value = iTimeLogin => 1703083897343
GET -> key => value = iSss => 3
al_Get_fsLoad_include.php-inicio
fsLoadTag
fsLoadBloco
fsLoadFTag
fsLoadFBloco
al_Get_fsLoad_include.php-fim-sTxt=<Padrao_1>   
   sTagMnemTDoc     = xecomm_FaleComUsuario
   sTagTit          = Tit1
   sTagCpoTit       = CpoTit1
   sTagCpo          = Cpo1
   sTagSql          = Sql1
   sTagSqlSum       = SqlSum1
   sTagMainTable    = xecomm_FaleComUsuario
   sTagMenu         = Menu1
   sTagNr0          = Nr02
   sTagTipoNr0      = TipoNr02
   sTagToolsBar     = Incluir,Pesquisar
   sTagRAc          = false
   sTagPesquisar    = Pesquisar1
   sTagCursorOn     = 0
   sTagEntrarNaFicha   = true
   sTagDbToVars     = DbToVars1
   sTagVarsDef      = VarsDefault1
   sTagScript       = ScriptForm1
   sTagVarsToServer = VarsToServer1
   sTagVarsToDb     = VarsToDb1
   sTagServerVal    = ServerValids1
   sTagTitulo       = TelaTit1
   sLabelsAlign     = Right
</Padrao_1>
<Padrao_11>   
   sTagMnemTDoc     = xecomm_FaleComUsuario
   sTagTit          = Tit1
   sTagCpoTit       = CpoTit1
   sTagCpo          = Cpo1
   sTagSql          = Sql1
   sTagSqlSum       = SqlSum1
   sTagMainTable    = xecomm_FaleComUsuario
   sTagMenu         = Menu1
   sTagNr0          = Nr02
   sTagTipoNr0      = TipoNr02
   sTagToolsBar     = Incluir,Pesquisar
   sTagRAc          = false
   sTagPesquisar    = Pesquisar1
   sTagCursorOn     = 0
   sTagEntrarNaFicha   = true
   sTagDbToVars     = DbToVars1
   sTagVarsDef      = VarsDefault1
   sTagScript       = ScriptForm11
   sTagVarsToServer = VarsToServer1
   sTagVarsToDb     = VarsToDb1
   sTagServerVal    = ServerValids1
   sTagTitulo       = TelaTit1
   sLabelsAlign     = Right
</Padrao_11>
<Padrao_2>   
   sTagMnemTDoc     = xecomm_FaleComUsuario
   sTagTit          = Tit2
   sTagCpoTit       = CpoTit2
   sTagCpo          = Cpo2
   sTagSql          = Sql1
   sTagSqlSum       = SqlSum1
   sTagMainTable    = xecomm_FaleComUsuario
   sTagMenu         = Menu1
   sTagNr0          = Nr02
   sTagTipoNr0      = TipoNr02
   sTagToolsBar     = Incluir,Pesquisar
   sTagRAc          = false
   sTagPesquisar    = Pesquisar1
   sTagCursorOn     = 0
   sTagEntrarNaFicha   = true
   sTagDbToVars     = DbToVars1
   sTagVarsDef      = VarsDefault1
   sTagScript       = ScriptForm1
   sTagVarsToServer = VarsToServer1
   sTagVarsToDb     = VarsToDb1
   sTagServerVal    = ServerValids1
   sTagTitulo       = TelaTit1
   sLabelsAlign     = Right
</Padrao_2>
<Tit1>Radar Comunicados</Tit1>
<Tit2>Radar Comunicados (Dev)</Tit2>
<CpoTit1>
   -s-20
</CpoTit1>
<Cpo1>
   ''
   $aLin[strtoupper('pPId')]   
</Cpo1>
<CpoTit2>
   pPId-s-20
   Msg-s-20
</CpoTit2>
<Cpo2>
   $aLin[strtoupper('pPId')]
   substr($aLin[strtoupper('sMsg')],0,100)
   $aLin[strtoupper('pPId')]   
</Cpo2>
<Sql1>
   select a.pPId,
          a.sMsg
    from xecomm_FaleComUsuario a
    where a.lExc = 0 
      and a.iVer = a.iVAt
      and a.pPId=1   -- o 1o comunicado
    order by a.pPId desc
</Sql1>
<Menu1>
</Menu1>
<Pesquisar1>
   ( upper(a.sMsg) like upper('%{p0}%'))
</Pesquisar1>
<Nr01>alert("Qtux-Dialog\n\nNada a relacionar ...")</Nr01>
<Nr02>oGrid.flGridInc()</Nr02>
<TipoNr01>0</TipoNr01>
<TipoNr02>1</TipoNr02>
<TelaTit1>
   Mensagem
</TelaTit1>
<DbToVars1>
   select a.tInc,
          a.iVer,
          a.iVAt,
          a.sMsg,
          b.sCoringa
   from   xecomm_FaleComUsuario a,
          CUP                   b
   where  a.pPId = {pId}
     and  a.iVer = {a.iVer}
     and  a.pInc = b.pPId
     and  b.iVer = b.iVAt
</DbToVars1>
<VarsDefault1>
   sVerVAt = {iVer+'/'+iVAt}
   sRastro = {sVerVAt+', '+sCoringa+', '+tInc}
   mMsg    = {sMsg}
</VarsDefault1>
<ScriptForm1>
   ;
   ; mMsg-60-23-1000 ; colspan=true; xditable=false
   ;
   ;
   ;
   <input type='button'   value='Li e entendi' onclick=flxecommFaleComUsuarioLiEntendi('{this}')> ;; colspan=true; 
</ScriptForm1>
<ScriptForm11>
   ;
   ; mMsg-60-23-1000 ; colspan=true; xditable=false
   ;
   ;
   ;
</ScriptForm11>
<VarsToServer1>
   sMsg   = mMsg
</VarsToServer1>
<VarsToServer2>
   sMsg   = mMsg
</VarsToServer2>
<VarsToDb1>
   sDDFTabela = xecomm_FaleComUsuario
   sMsg
</VarsToDb1>
sDDSTxt=   sTagMnemTDoc     = xecomm_FaleComUsuario
   sTagTit          = Tit1
   sTagCpoTit       = CpoTit1
   sTagCpo          = Cpo1
   sTagSql          = Sql1
   sTagSqlSum       = SqlSum1
   sTagMainTable    = xecomm_FaleComUsuario
   sTagMenu         = Menu1
   sTagNr0          = Nr02
   sTagTipoNr0      = TipoNr02
   sTagToolsBar     = Incluir,Pesquisar
   sTagRAc          = false
   sTagPesquisar    = Pesquisar1
   sTagCursorOn     = 0
   sTagEntrarNaFicha   = true
   sTagDbToVars     = DbToVars1
   sTagVarsDef      = VarsDefault1
   sTagScript       = ScriptForm11
   sTagVarsToServer = VarsToServer1
   sTagVarsToDb     = VarsToDb1
   sTagServerVal    = ServerValids1
   sTagTitulo       = TelaTit1
   sLabelsAlign     = Right
pChaveAtual_1=0, pChaveAtual_2=0, psDDFChamada=2
tela edicao
lAlt=1
RAcs ERP - Inicio - iDesenvolvedor=0, iGlobalKeyUser=0
sUser=sysdba, ghBase=Resource id #45
psQry=select current_transaction from rdb$database
durao 0, iDb=1
fhDBConnect - sUser=sysdba, Transaction ID=3515480 , hBase=Resource id #45, hTr=Resource id #47, ghBase=Resource id #45
sSqlRAc=select pOOp,a.lEdiAlt
                           from sysRAcLinhas a,
                                sysRAcCapa   b
                           where a.pRacCapa = b.pPId
                             and b.jTipo=3
                             and sPar1 = 'dd_files/xecomm_FaleComUsuario.dda'
                             and sPar2 = 'Padrao_11'
                             --and a.lEdiAlt=1
                             and a.iVer=a.iVAt
                             and b.iVer=b.iVAt
                             and a.lExc=0
                             and b.lExc=0
hBase=Resource id #47
psQry=select pOOp,a.lEdiAlt from sysRAcLinhas a,sysRAcCapa b where a.pRacCapa=b.pPId and b.jTipo=3 and sPar1='dd_files/xecomm_FaleComUsuario.dda' and sPar2='Padrao_11' and a.iVer=a.iVAt and b.iVer=b.iVAt and a.lExc=0 and b.lExc=0
durao 0, iDb=0
iTmpRAc=0
flDBDisconnect - phBase=Resource id #47, ghBase=Resource id #45
RAcs ERP - Fim
psDDFChamada=2, lAlt=1
dentro do if
sUser=sysdba, ghBase=Resource id #67
psQry=select current_transaction from rdb$database
durao 0, iDb=1
fhDBConnect - sUser=sysdba, Transaction ID=3515482 , hBase=Resource id #67, hTr=Resource id #69, ghBase=Resource id #67
flDBDisconnect - phBase=Resource id #69, ghBase=Resource id #67
sVTS=   sMsg   = mMsg, sTagVarsToServer=VarsToServer1
sTit=   Mensagem
s=2~dd_files/xecomm_FaleComUsuario.dda~Padrao_11~1~   Mensagem~tInc=2021-11-10 21:08:04
iVer=3
iVAt=3
sMsg=O Radar de Oportunidades agradece a todos que acreditaram no nosso servio, trata-se de um trabalho pioneiro que envolve o uso de vrias tecnologias diferentes.\n\nNo somos ecommerce, nem fazemos vendas de nenhuma espcie. Somos um portal facilitador de comrcio eletrnico, um elo entre fornecedores e consumidores, entre a compra e a venda de mercadorias. \n\nO usurio desse portal deve ter em mente que as informaes, sobretudo os preos, no so informaes em tempo real. Elas podem mudar ao longo do dia. O que apresentamos so sugestes de oportunidade. \n\n fundamental checar as informaes no marketplace de origem, clicando na imagem dos produtos, s assim o usurio poder validar de fato a oportunidade e tomar alguma deciso comercial.\n\nEstamos preparando novos recursos que vo estar disponveis em breve.\nAinda temos metas para alcanar na verso beta.\n\nForte abs
sCoringa=Fredy Billwiller
sVerVAt={iVer+'/'+iVAt}
sRastro={sVerVAt+', '+sCoringa+', '+tInc}
mMsg={sMsg}
~   ;
   ; mMsg-60-23-1000 ; colspan=true; xditable=false
   ;
   ;
   ;~   sMsg   = mMsg~Right~~~1~~1~~ScriptForm11~~
 0-psDDFChamada=2
 1-psFileDDS=dd_files/xecomm_FaleComUsuario.dda
 2-psTagDDS=Padrao_11
 3-psId=1
 4-sTit=   Mensagem
 5-sVars=tInc=2021-11-10 21:08:04
iVer=3
iVAt=3
sMsg=O Radar de Oportunidades agradece a todos que acreditaram no nosso servio, trata-se de um trabalho pioneiro que envolve o uso de vrias tecnologias diferentes.\n\nNo somos ecommerce, nem fazemos vendas de nenhuma espcie. Somos um portal facilitador de comrcio eletrnico, um elo entre fornecedores e consumidores, entre a compra e a venda de mercadorias. \n\nO usurio desse portal deve ter em mente que as informaes, sobretudo os preos, no so informaes em tempo real. Elas podem mudar ao longo do dia. O que apresentamos so sugestes de oportunidade. \n\n fundamental checar as informaes no marketplace de origem, clicando na imagem dos produtos, s assim o usurio poder validar de fato a oportunidade e tomar alguma deciso comercial.\n\nEstamos preparando novos recursos que vo estar disponveis em breve.\nAinda temos metas para alcanar na verso beta.\n\nForte abs
sCoringa=Fredy Billwiller
sVerVAt={iVer+'/'+iVAt}
sRastro={sVerVAt+', '+sCoringa+', '+tInc}
mMsg={sMsg}

 6-sScr=   ;
   ; mMsg-60-23-1000 ; colspan=true; xditable=false
   ;
   ;
   ;
 7-sVTS=   sMsg   = mMsg
 8-sLblAli=Right
 9-sIncSeq=
10-sAltSeq=
11-lAlt=1
12-sTagSubGrid=
13-lPodeAlterar=1
14-sSOAMarcados=
15-sRetTagScript=ScriptForm11
16-sTagSubGridRange=
17-sTagBtnTela=
--//--
Encerrado em 20/12/2023 11:52:29