Bom dia, estou fazendo uma chamada em um relatório e não estou sabendo como colocar a Query feita no SQL no meu código ADVPL, quem puder me ajudar, desde já fico muito grata, estarei deixando a chamada logo a baixo:
select RBFILIAL, RB_MAT, RA_NOME
case
when RB_GRAUPAR = 'F' then 'Filho(a)'
when RB_GRAUPAR = 'C' then 'Cônjuge'
when RB_GRAUPAR = 'E' then 'Enteado'
when RB_GRAUPAR = 'P' then 'Pai/Mãe'
when RB_GRAUPAR = 'O' then 'Agregado/Outros'
end as Parentesco, RB_NOME as NomeDependente, RB_SEXO as SexoDependente, convert(varchar(10), cast(RB_DTNASC AS date),103)as NascimentoDependente, FLOOR(DATEDIFF(DAY, RB_DTNASC, GETDATE())/ 365.25) as Idade
from SRB010
INNER JOIN SRA010 ON RA_FILIAL = RB_FILIAL AND RA_MAT = RB_MAT AND SRA010.D_E_L_E_T= '' AND RASITFOLH <> 'D' AND RA_CATFUNC NOT IN ('A','P')
where SRB010.D_E_L_E_T <> '*'
ORDER BY 1,2
Olha Agnes Assista esses 2 Videos, já vao te ajudar bastante :
https://www.youtube.com/watch?v=pbVBEhUDHeU
https://www.youtube.com/watch?v=5rhEghH-GOg
Exemplo de codigo :
BeginSql Alias cAliasProd
SELECT PW_CPF,PW_NOME,;
PY_DATAE, PY_ENTRADA,;
PW_POSNOM1,;
PY_PLVEICU, PY_PLCAVAL,;
PY_DATAS, PY_SAIDA
FROM %Table:SPY%
LEFT JOIN %Table:SPW% ON PY_VISITA = PW_VISITA AND %Table:SPW%.%NotDel%; WHERE PY_FILIAL = %xFilial:SPY%
AND %Table:SPY%.%NotDel%
AND PW_CPF = %Exp:cCpfVal%
EndSQL
static function PrintReport(oReport)
BEGIN REPORT QUERY oSRB
beginsql alias "QRYZZ1"
SELECT RBFILIAL, RB_MAT, RA_NOME, RB_GRAUPAR, RB_NOME, RB_SEXO, RB_DTNASC
FROM %table:SRB% RB
INNER JOIN SRA010 RA ON RA_FILIAL = RB_FILIAL AND
RA_MAT = RB_MAT AND
RB.D_E_L_E_T= '' AND
RASITFOLH <> 'D' AND
RA_CATFUNC NOT IN ('A','P') WHERE RA.D_E_L_E_T <> '*' ORDER BY 1,2
endsql
END REPORT QUERY oSRB
oSRB:Print(.T.)
return