INSERT INTO PRESU(PROMCOD,PRECOD,PRETIP,PRETIPGI,PREFECI,PREEJE,PREDES,PRETIPPRE) VALUES 
SELECT '" + 
						objSQL.TratarCadena(sCodigoPromocionDestino) + "," +
						"PRECOD," + 
						"PRETIP," + 
						"PRETIPGI," + 
						"PREFECI," +	
						"PREEJE," + 
						"PREDES," +
						"PRETIPPRE " +
					"FROM PRESU " +
					"WHERE" +  objSQL.TratarCadena("PromCod",sCodigoPresupuestoOrigen) 