Operator not applicable to this operand type
ADOCommand.CommandText:= ´Insert into CTB_Programas(CD_PROGRAMA, AN_PROGRAMA_CRIACAO, AN_PROGRAMA_INATIVACAO, SG_PROGRAMA, ´+
´NM_PROGRAMA, DT_PROGRAMA_CRIACAO, CD_UNIDADE_ORCAMENTARIA, DS_PROGRAMA_OBJETIVO, DS_PROGRAMA_PUBLICO_ALVO, ´+
´SB_PROGRAMA_TIPO, DT_PROGRAMA_INICIO, DT_PROGRAMA_FIM, SB_PROGRAMA_NATUREZA, VL_PROGRAMA, SN_PROGRAMA_MULTISSETORIAL) ´+
´Values (´´´+inttostr(adoProgramas.FieldByName(´CD_PROGRAMA´).asInteger) + ´´´, ´´´ +
+inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_CRIACAO´).asInteger) + ´´´, ´´´ +[b:77814f35d2]//ERRO AQUI[/b:77814f35d2]
+inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_INATIVACAO´).asInteger) + ´´´, ´´´ +
+(adoProgramas.FieldByName(´SG_PROGRAMA´).asString) + ´´´, ´´´ +
+Nome + ´´´, ´´´ +
+datetostr(adoProgramas.FieldByName(´DT_PROGRAMA_CRIACAO´).AsDateTime) + ´´´, ´´´ +
+inttostr(adoProgramas.FieldByName(´CD_UNIDADE_ORCAMENTARIA´).asInteger) + ´´´, ´´´ +
+(adoProgramas.FieldByName(´DS_PROGRAMA_OBJETIVO´).asString) + ´´´, ´´´ +
+(adoProgramas.FieldByName(´DS_PROGRAMA_PUBLICO_ALVO´).asString) + ´´´, ´´´ +
+(adoProgramas.FieldByName(´SB_PROGRAMA_TIPO´).asString) + ´´´, ´´´ +
+datetostr(adoProgramas.FieldByName(´DT_PROGRAMA_INICIO´).AsDateTime) + ´´´, ´´´ +
+datetostr(adoProgramas.FieldByName(´DT_PROGRAMA_FIM´).AsDateTime) + ´´´, ´´´ +
+(adoProgramas.FieldByName(´SB_PROGRAMA_NATUREZA´).asString) + ´´´, ´´´ +
+floattostr(adoProgramas.FieldByName(´VL_PROGRAMA´).asFloat) + ´´´, ´´´ +
+BoolToStr(adoProgramas.FieldByName(´SN_PROGRAMA_MULTISSETORIAL´).AsBoolean) + ´´´, ´´´ +
´)´;
TA DANDO ESTE ERRO!!!!
:( :o :shock: :?
Alguém sabe o q eh q eu fiz de errado?!?!?!??!
DESDE JÁ AGRADEÇO!!!!
Diegus
Curtidas 0
Respostas
Michelli88
13/09/2005
+ +inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_CRIACAO´).asInteger) + ´´´, ´´´ +//ERRO AQUI +inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_INATIVACAO´).asInteger) + ´´´, ´´´ + +(adoProgramas.FieldByName(´SG_PROGRAMA´).asString) + ´´´, ´´´ +
te + de mais ai... heheh
olha la direito ta assim:
++inttostr(adoProgramas.FieldByName(´AN_PR
GOSTEI 0
Diegus
13/09/2005
+ +inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_CRIACAO´).asInteger) + ´´´, ´´´ +//ERRO AQUI +inttostr(adoProgramas.FieldByName(´AN_PROGRAMA_INATIVACAO´).asInteger) + ´´´, ´´´ + +(adoProgramas.FieldByName(´SG_PROGRAMA´).asString) + ´´´, ´´´ +
++inttostr(adoProgramas.FieldByName(´AN_PR
Vlw Michelli!!! Eu ja tinha visto o vacilin que eu tinha dado... brigadão mesmo assim!!!
GOSTEI 0