Olá ! eu estou realizando um insert into em uma tabela temporária mas não estou conseguindo êxito, estou tentando da seguinte forma
User Function GetQuerys(aValores,linicio,nOp)
local cPerg := "COCKPIT "
local _cQuery := " "
local cAlias := " "
local aFields2 := {}
Default aValores := {}
Default nOp := 0
pergunte(cPerg,.F.)
if TCIsConnected()
nConnect := TCGetConn()
lCloseConnect := .F.
else
nConnect := TCLink()
lCloseConnect := .T.
endif
aAdd(aFields2, {"TMAFil" ,"C" ,2 ,0})aAdd(aFields2, {"TMAPed" ,"C" ,6 ,0})aAdd(aFields2, {"TMACli" ,"C" ,6 ,0})aAdd(aFields2, {"TMALoj" ,"C" ,2 ,0})aAdd(aFields2, {"TMAEmi" ,"C" ,10 ,0})aadd(aFields2, {"TMAChK" ,"N" ,1 ,0})
oTable := FWTemporaryTable():New( "TMAIN", aFields2)oTable:Create()
cAlias := oTable:GetAlias()cTableName := oTable:GetRealName()
// Tabela main -------------------------------------------------------------------------------------------------------------------cQuerySQL := ""cQuerySQL +=" INSERT INTO " + cTableName + " (TMAFil, TMAPed, TMACli, TMALoj, TMAEmi, TMAChK) values ( "cQuerySQL +=" (SELECT C5FILIAL, C5_NUM, C5_CLIENTE, C5_LOJACLI, C5_EMISSAO"cQuerySQL +=" FROM "+RetSqlName("SC5")+" SC5 "cQuerySQL +=" WHERE SC5.C5_FILIAL = '"+XFILIAL("SC5")+"' AND SC5.D_E_L_E_T = ' ' AND SC5.C5_PEDPAG ='1'"cQuerySQL +=" AND SC5.C5_EMISSAO BETWEEN '"+DTOS(MV_PAR01)+"' AND '"+DTOS(MV_PAR02)+"'),1)"
if TCSqlExec(cQuerySQL) < 0 ConOut("Ops:", TCSqlError())
endif
Porem eu tenho o seguinte erro:
alguém pode me ajudar ?
