--- rpl/src/instructions_t1.c	2018/05/30 09:27:37	1.67
+++ rpl/src/instructions_t1.c	2018/12/21 13:38:30	1.68
@@ -60,10 +60,10 @@ instruction_type(struct_processus *s_eta
 				"       %s, %s, %s, %s, %s,\n"
 				"       %s, %s, %s, %s, %s,\n"
 				"       %s, %s, %s, %s,\n"
-				"       %s, %s, %s\n",
+				"       %s, %s, %s, %s\n",
 				d_INT, d_REL, d_CPL, d_VIN, d_VRL, d_VCX, d_MIN, d_MRL, d_MCX,
 				d_BIN, d_NOM, d_CHN, d_LST, d_ALG, d_RPN, d_FCH, d_SLB, d_SCK,
-				d_PRC, d_TAB, d_SQL, d_MTX, d_SPH);
+				d_PRC, d_TAB, d_SQL, d_MTX, d_SPH, d_REC);
 		printf("->  1: %s\n\n", d_INT);
 
 		if ((*s_etat_processus).langue == 'F')
@@ -89,6 +89,7 @@ instruction_type(struct_processus *s_eta
 			printf("    17 : connecteur SQL\n");
 			printf("    18 : mutex\n");
 			printf("    19 : sémaphore\n");
+			printf("    20 : enregistrement\n");
 		}
 		else
 		{
@@ -113,6 +114,7 @@ instruction_type(struct_processus *s_eta
 			printf("    17 : SQL connector\n");
 			printf("    18 : mutex\n");
 			printf("    19 : semaphore\n");
+			printf("    20 : record\n");
 		}
 
 		return;
@@ -229,10 +231,14 @@ instruction_type(struct_processus *s_eta
 	{
 		(*((integer8 *) (*s_objet_resultat).objet)) = 19;
 	}
-	else if ((*s_objet_argument).type == EXT)
+	else if ((*s_objet_argument).type == REC)
 	{
 		(*((integer8 *) (*s_objet_resultat).objet)) = 20;
 	}
+	else if ((*s_objet_argument).type == EXT)
+	{
+		(*((integer8 *) (*s_objet_resultat).objet)) = 21;
+	}
 	else
 	{
 		/*