  &REFER(VTRLOG,DCTRSEL).
  Adresse = VSYNTF(MPHDER,UL).

  &CLEX(Adresse[UL,MPHDER]).
	&VAL.

	'ingnier' EUR	: FRM='Personne';TYPLOC=CONST;LEMME='fonction'.
		"	: FRM='nom_pers'.
		"	: FRM='num_pers'.
	'voiturer' E	: FRM='Voiture';TYPLOC=CONST;LEMME='type'.
		"	: FRM='type'.
		"	: FRM='type'.
	'cole' 0	: FRM='Ecole';TYPLOC=CONST;LEMME='nom_cole'.
		"	: FRM='nom_cole'.
		"	: FRM='nom_cole'.
	'parler'   0	: FRM = 'parle';VERIF=T.
		"	: FRM='langue'.
	'susceptible' 0	: FRM='accept';VERIF=T.
	'travailler' 0	: SEMA=SITUATION.
	'en' 0		: FRM='lieu'.
	'connatre' 0	: FRM='connaissance';VERIF=T.
	'trois' 0	: FRM='3'.
	'roue' 0	: FRM='quipement';VERIF=T.
	'tre' 0	: FRM='tre';VERIF=T.
		"	: FRM='attribut'.
	'avoir'     0   : FRM='avoir';VERIF=T.
	'cinq' 0	: FRM='5'.
	'enseigner' 0	: FRM='enseigner';VERIF=T.
	'prparer' 0	: FRM='prparer'; VERIF=T.
		"	: FRM='objet'.

  &FIN.

