00001 CHARACTER(LEN=FA%JPXNOM) CLACTI 00002 CHARACTER(LEN=FA%JPXNOM) CLNOMA 00003 CHARACTER(LEN=132) CLMESS 00004 CHARACTER(LEN=6) CLNSPR 00005 LOGICAL LLFATA