Salut,
Il faut préciser dans le format, le nombre de caractères à prendre en compte pour lire la variable :

read(lint(1:4), '(I4)', end=101)FScvt(Lcvt)
read(lint(5:5), '(I1)', end=101)Pcvt(Lcvt)...