libsim Versione 7.1.11
|
◆ csv_record_addfield_csv_record()
Add a full csv_record object to the csv record this. The object to be added must have been generated through csv_record_addfield calls (csv encoding mode). Both csv_record objects this and record must use the same delimiter and quoting characters, otherwise the operation will silently fail.
Definizione alla linea 749 del file file_utilities.F90. 750
751CHARACTER(len=32) :: cfield
752INTEGER :: lier
753
754CALL csv_record_getfield(this, field=cfield, ier=ier)
755IF (c_e(cfield) .AND. len_trim(cfield) /= 0) THEN
756 READ(cfield, '(F32.0)', iostat=lier) field
757 IF (lier /= 0) THEN
758 field = rmiss
759 IF (.NOT.PRESENT(ier)) THEN
760 CALL l4f_log(l4f_error, &
761 'in csv_record_getfield, invalid real field: '//trim(cfield))
|