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 37 38 39 40 41
| PROC SQL;
CREATE TABLE WORK.Base_Perimetre AS SELECT DISTINCT
CC0_TREF_PERIMETRE_JOUR.SIREN
FROM OCC_REF.CC0_TREF_PERIMETRE_JOUR AS CC0_TREF_PERIMETRE_JOUR
WHERE CC0_TREF_PERIMETRE_JOUR.NOM_GROUPE = "STAT MARINE" ;
QUIT;
proc sql noprint ;
select SIREN format=$quote25. into :liste separated by ' ' from WORK.Base_Perimetre;
quit;
%put &SIREN;
PROC SQL;
CREATE TABLE WORK.TEST AS SELECT
BASE_COTIS1.ID_ENTREPRISE,
BASE_COTIS1.SIREN,
BASE_COTIS1.CONTRAT,
BASE_COTIS1.AA_ASSURANCE,
BASE_COTIS1.COLLEGE,
BASE_COTIS1.IND_ANI,
BASE_COTIS1.ASSUREUR,
BASE_COTIS1.CRISQ2,
BASE_COTIS1.CRISQ3,
BASE_COTIS1.CDR_IND_CTR_RESP,
BASE_COTIS1.CDR_LIB_TYPE_GAR,
BASE_COTIS1.CDR_NIV_GAR_DET,
BASE_COTIS1.T1_MT_BRUT,
BASE_COTIS1.T2_MT_BRUT,
BASE_COTIS1.T3_MT_BRUT,
BASE_COTIS1.T4_MT_BRUT,
BASE_COTIS1.T5_MT_BRUT
FROM WORK.BASE_COTIS1 AS BASE_COTIS1
WHERE BASE_COTIS1.SIREN in (&SIREN) ;
QUIT; |
Partager