Executer/convertir SQL Oracle en VBA
Bonjour,
l'intitulé de la discussion n'est pas très claire, veuillez m'en excuser.
Voilà,j'ai un script écrit en SQL (oracle sql)
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| create or replace PROCEDURE DEVIATION AS
DRILL_NAME VARCHAR(24);
DRILL_DEPTH NUMBER;
DRILL_MAX_DEPTH NUMBER;
DRILL_AZIMUT NUMBER;
DRILL_PENDAGE NUMBER;
DRILL_INC NUMBER;
DRILL_EASTING NUMBER;
DRILL_NORTHING NUMBER;
DRILL_TVD NUMBER;
SER_ID VARCHAR(16);
DRILL_AZIMUT_RAD NUMBER;
INSERT INTO temp_dev_d
SELECT HOLE_ID,
DEV_DEPTH,
AZIM,
PEN,
INC,
'S' || RPAD(PREFIXE,4,'_') || LPAD(TO_CHAR(NUMERO),4,'0') || NUMERO_BIS || 'DEVI+D' AS SERMINE_ID,
0
FROM
(select MaxDev.NOM_SONDAGE as HOLE_ID,DEV.zc + MaxDev.SHIFT_M AS DEV_DEPTH,
dev.AZIMUT AS AZIM,dev.pendage AS PEN,dev.pendage+90 AS INC,MaxDev.prefixe,MaxDev.numero,MaxDev.numero_bis
from geode.tbl_deviation DEV, |
et je dois le ré-écrire (ou le convertir) en VBA.
Comment faire?
ps: je suis débutante en VBA :oops:
Merci déjà
