Cita:
Empezado por luisgutierrezb
Bueno no pones como tienes la instruccion una vez que la "pegas" en delphi, por las comillas por ejemplo, ahora, tienes parametros declarados?
|
Si te refieres a cómo la incluyo en el TADOQuery, así la pongo...
Código Delphi
[-]with adoqryCntrl do
begin
wsSQL := 'Select HT1_FECHA, HT1_HORA, E2_CTRL_PAC, CASE WHEN HT1_SUBSECUENTE = 0 THEN ''No'' ELSE ''Sí'' END As PrimeraVez,'+
'CASE WHEN HT1_ACUDE_SOLO = 0 THEN ''No'' ELSE ''Sí'' END As AcudeSolo, C12_PARIENTE_ID, E2A_NOMB_FAM, HT1_ORPRE_PAC,'+
'HT1_ORPRE_FAM, HT1_ORPRE_OTRO, HT1_ORPRE_FOLLETO, HT1_REFINST_PAC, HT1_REFINST_FAM, HT1_REFINST_OTRO,'+
'HT1_REFINST_FOLLETO, HT1_EDUSALUD_PAC,HT1_EDUSALUD_FAM, HT1_EDUSALUD_OTRO, HT1_EDUSALUD_FOLLETO, '+
'HT1_ENFERMERA_EC_ID, HTI_TURNO_EC, HT1_ENFERMERA_EL_ID, HT1_TURNO_EL, HT1_OPERADOR, C54_GRUPO_ID, '+
'C54_GRUPO_ETAPA_ID, HT1_HojaObservacion from HT1_APC where (HT1_ALTA = 0) ORDER BY HT1_FECHA;';
Close;
SQL.Clear;
SQL.Add(wsSQL);
Open;
end;
Y no, no utilizo parámetros.