libsim Versione 7.1.11
|
◆ csv_record_addfield_int()
Add a field from an The field will be quoted if necessary.
Definizione alla linea 656 del file file_utilities.F90. 657 IF (this%record(i) == this%csep) THEN ! , fine campo
658 EXIT
659 ELSE ! carattere normale, elimina "trailing blanks"
660 CALL add_char(this%record(i), .true., field)
661 cycle
662 ENDIF
663 ENDIF
664 ENDIF
665 ENDIF
666ENDDO
667
|