INSERT INTO PRESU(PROMCOD,PRECOD,PRETIP,PRETIPGI,PREFECI,PREEJE,PREDES,PRETIPPRE) 
SELECT 'MALD',PRECOD,PRETIP,PRETIPGI,PREFECI,PREEJE,PREDES,PRETIPPRE FROM PRESU WHERE PROMCOD = '##09'; 



SELECT PROMCOD FROM PROMOCIO WHERE PROMCOD NOT IN (SELECT PROMCOD FROM PRESU);


SELECT * FROM PRESUSUB WHERE PROMCOD = 'ECU1';


INSERT INTO PRESUSUB (PROMCOD,PRECOD,PARCOD,CONTPAR,PARDESSUB,SPARFECI,SPARFECF,SPARUNI,SPARPRE,SPARCTEMP,SPARCTEJE,SPARCTA,SPARIVAT) 
SELECT 'ECU1',PRECOD,PARCOD,CONTPAR,PARDESSUB,SPARFECI,SPARFECF,0,0,SPARCTEMP,SPARCTEJE,SPARCTA,SPARIVAT FROM PRESUSUB WHERE PROMCOD = '##09'; 



INSERT INTO PRESU1 (PROMCOD,PRECOD,PARCOD,PARDES,PARPER,PARACT,PARNVTO,PARDIA,PARFECI,PARCTEMP,PARCTAEJE,PARCTA,PARIVAT,PARIMP,PARCALTIP,PARCALVAL) 
SELECT '0090',PRECOD,PARCOD,PARDES,PARPER,PARACT,PARNVTO,PARDIA,PARFECI,PARCTEMP,PARCTAEJE,PARCTA,PARIVAT,ROUND(PARCALVAL * "  + nValorCosto + ",2)," +
					"PARCALTIP," +
					"PARCALVAL " +
					"FROM PRESU1 " +
					"WHERE" +  objSQL.TratarCadena("PROMCOD",sCodigoPresupuestoOrigen) + 
					"AND" + objSQL.TratarCadena("PARCALTIP","sCosto")  