Função auxiliar – GetLastQuery()

Após a abertura do cursor, no alias especificado, a função GetLastQuery() retorna um array, com 5 elementos, onde estão disponíveis as seguintes informações sobre a query executada.

[1] cAlias – Alias usado para abrir o cursor.
[2] cQuery – Query executada.
[3] aCampos – Array de campos com critério de conversão especificados.
[4] lNoParser – Caso verdadeiro (.T.), não foi utilizada a função ChangeQuery() na string original.
[5] nTimeSpend – Tempo, em segundos, utilizado para abertura do cursor.

BeginSql alias 'E2TEMP'   
    column E2_EMISSAO as Date, E2_VALOR as Numeric(tam_cp,2)   
    column  QEK_SKLDOC As Logical          %noparser%   
    SELECT SE2.E2_PREFIXO,
        SE2.E2_NUM, 
        SE2.E2_FORNECE, 
        SE2.E2_LOJA,
        SE2.E2_VALOR, 
        SE2.D_E_L_E_T_ DEL1, 
        QEK.D_E_L_E_T_ DEL2 , 
        QEK.QEK_SKLDOC, 
        SE2.R_E_C_N_O_ SE2RECNO    
    FROM %table:SE2% SE2,%table:qeK% QEK           
    WHERE SE2.E2_FILIAL= %xfilial:SE2% 
    AND qek.%notDel%  
    AND SE2.E2_PREFIXO&lt;&gt; %exp:cPrefixo% 
    AND SE2.E2_NUM&lt;&gt; %exp:(cAlias)-&gt;M0_CODIGO% 
    AND SE2.E2_NUM&lt;&gt;45        
    AND SE2.E2_FORNECE=%exp:Space(Len(SE2-&gt;E2_FORNECE))% 
    AND SE2.E2_EMISSAO&lt;&gt;%exp:MV_PAR06% 
    AND SE2.E2_LOJA&lt;&gt;%exp:MV_PAR05% 
    AND SE2.E2_VALOR&lt;&gt;%exp:MV_PAR04% 
    AND qek.QEK_SKLDOC&lt;&gt;%exp:MV_PAR03%   
    AND SE2.%notDel%   
    ORDER BY %Order:SE2,1% 
EndSql

BeginSql alias 'E2TEMP'

column E2_EMISSAO as Date, E2_VALOR as Numeric(tam_cp,2)

column QEK_SKLDOC As Logical %noparser%

SELECT SE2.E2_PREFIXO,

SE2.E2_NUM,

SE2.E2_FORNECE,

SE2.E2_LOJA,

SE2.E2_VALOR,

SE2.D_E_L_E_T_ DEL1,

QEK.D_E_L_E_T_ DEL2 ,

QEK.QEK_SKLDOC,

SE2.R_E_C_N_O_ SE2RECNO

FROM %table:SE2% SE2,%table:qeK% QEK

WHERE SE2.E2_FILIAL= %xfilial:SE2%

AND qek.%notDel%

AND SE2.E2_PREFIXO<> %exp:cPrefixo%

AND SE2.E2_NUM<> %exp:(cAlias)->M0_CODIGO%

AND SE2.E2_NUM<>45

AND SE2.E2_FORNECE=%exp:Space(Len(SE2->E2_FORNECE))%

AND SE2.E2_EMISSAO<>%exp:MV_PAR06%

AND SE2.E2_LOJA<>%exp:MV_PAR05%

AND SE2.E2_VALOR<>%exp:MV_PAR04%

AND qek.QEK_SKLDOC<>%exp:MV_PAR03%

AND SE2.%notDel%

ORDER BY %Order:SE2,1%

EndSql

————————————————————–

Código-fonte gerado pelo pré-compilador (PPO) 
__execSql('E2TEMP'
,' SELECT SE2.E2_PREFIXO
,SE2.E2_NUM
, SE2.E2_FORNECE
, SE2.E2_LOJA
,SE2.E2_VALOR
, SE2.D_E_L_E_T_ DEL1
, QEK.D_E_L_E_T_ DEL2 
, QEK.QEK_SKLDOC
, SE2.R_E_C_N_O_ SE2RECNO 
FROM '+RetSqlName('SE2')+' SE2
, '+RetSqlName('QEK')+' QEK 
WHERE SE2.E2_FILIAL= '' +xFilial ('SE2')+ '' 
AND qek.D_E_L_E_T_= ' ' 
and SE2.E2_PREFIXO&lt;&gt; '+___SQLGetValue(CPREFIXO)+' 
AND SE2.E2_NUM&lt;&gt; '+___SQLGetValue((CALIAS) -&gt;M0_CODIGO)+ ' 
AND SE2.E2_NUM&lt;&gt;45 
AND SE2.E2_FORNECE= '+___SQLGetValue(SPACE(LEN(SE2-&gt;E2_FORNECE)))+' 
AND SE2.E2_EMISSAO&lt;&gt; '+___SQLGetValue(MV_PAR06)+ ' 
AND SE2.E2_LOJA&lt;&gt; '+___SQLGetValue(MV_PAR05)+' 
AND SE2.E2_VALOR&lt;&gt; '+___SQLGetValue(MV_PAR04)+' 
AND qek.QEK_SKLDOC&lt;&gt; ' +___SQLGetValue(MV_PAR03)+' And SE2.D_E_L_E_T_= ' ' 
ORDER BY '+ SqlOrder(SE2-&gt;(IndexKey(1))),{{'E2_EMISSAO','D',8,0}, {'E2_VALOR','N',tam_cp,2},{'QEK_SKLDOC','L',1,0}},.T.)

Código-fonte gerado pelo pré-compilador (PPO)

__execSql('E2TEMP'

,' SELECT SE2.E2_PREFIXO

,SE2.E2_NUM

, SE2.E2_FORNECE

, SE2.E2_LOJA

,SE2.E2_VALOR

, SE2.D_E_L_E_T_ DEL1

, QEK.D_E_L_E_T_ DEL2

, QEK.QEK_SKLDOC

, SE2.R_E_C_N_O_ SE2RECNO

FROM '+RetSqlName('SE2')+' SE2

, '+RetSqlName('QEK')+' QEK

WHERE SE2.E2_FILIAL= '' +xFilial ('SE2')+ ''

AND qek.D_E_L_E_T_= ' '

and SE2.E2_PREFIXO<> '+___SQLGetValue(CPREFIXO)+'

AND SE2.E2_NUM<> '+___SQLGetValue((CALIAS) ->M0_CODIGO)+ '

AND SE2.E2_NUM<>45

AND SE2.E2_FORNECE= '+___SQLGetValue(SPACE(LEN(SE2->E2_FORNECE)))+'

AND SE2.E2_EMISSAO<> '+___SQLGetValue(MV_PAR06)+ '

AND SE2.E2_LOJA<> '+___SQLGetValue(MV_PAR05)+'

AND SE2.E2_VALOR<> '+___SQLGetValue(MV_PAR04)+'

AND qek.QEK_SKLDOC<> ' +___SQLGetValue(MV_PAR03)+' And SE2.D_E_L_E_T_= ' '

ORDER BY '+ SqlOrder(SE2->(IndexKey(1))),{{'E2_EMISSAO','D',8,0}, {'E2_VALOR','N',tam_cp,2},{'QEK_SKLDOC','L',1,0}},.T.)

Relacionado

GetLastQuery

Função auxiliar – GetLastQuery()