EXECUTE "SET-THOUS ."
EXECUTE "SET-DEC ,"
EXECUTE "DATE.FORMAT"
OPEN "","CIVILAIDANT" TO F.CIVILAIDANT ELSE STOP
EXECUTE 'SELECT CIVILAIDANT AVEC 17 # "" AND AVEC 26 # "" AND AVEC 36 >= "13880" OR = ""'
W_Fin = "F"
LOOP
READNEXT W_Cle ELSE W_Fin = "V"
WHILE W_Fin = "F"
READ ENR_CIVILAIDANT FROM F.CIVILAIDANT, W_Cle THEN
	AnneeNIR = ENR_CIVILAIDANT<17>[3,2]
	AnneeNais = OCONV(ENR_CIVILAIDANT<26>,"D4/")[9,2]
	IF AnneeNIR # AnneeNais THEN
		PRINT W_Cle:" ":ENR_CIVILAIDANT<2>:" ":ENR_CIVILAIDANT<3>:
		PRINT "DDN : ":OCONV(ENR_CIVILAIDANT<26>,"D4/"):" - NIR : ":ENR_CIVILAIDANT<17>
	END
END
REPEAT
STOP
