1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
   |  
sqlplus -s /nolog >/dev/null <<-EOF
connect $SCHEMA/$SCHEMAPW
 
set trimspool on
spool ./update_tables.log
 
whenever sqlerror exit 1;
 
DECLARE
 
CURSOR c_SAG_DATA IS
SELECT * FROM SAG_DATA_TEMP;
 
BEGIN
 
	FOR j IN c_SAG_DATA LOOP
 
	update document doc SET (doc.nda,doc.noip) =(SELECT j.nda,j.nip_actif
	from radiologie rad
	where rad.id_document_lie = doc.id_document
	and CONCAT(rad.ID_DEMANDE, rad.ID_EXAMEN) = j.s_aphp_reference_acte_rados);
 
	update radiologie rad SET (rad.uh_demandeuse,rad.nip) = (SELECT j.code_uh_demande,j.nip_actif
	WHERE CONCAT(rad.ID_DEMANDE, rad.ID_EXAMEN) = j.s_aphp_reference_acte_rados);
 
	END LOOP;
END;
COMMIT;
 
 
spool off
exit
EOF
 
echo "FIN"  | 
Partager