&REFER(VTRLOG,DCTRSEL). Adresse = VSYNTF(MPHDER,UL). &CLEX(Adresse[UL,MPHDER]). &VAL. 'ingénier' 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'. 'connaître' 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. 'préparer' 0 : FRM='préparer'; VERIF=T. " : FRM='objet'. &FIN.