libsim  Versione 7.2.4

◆ csv_record_addfield_int()

subroutine csv_record_addfield_int ( type(csv_record), intent(inout)  this,
integer, intent(in)  field,
character(len=*), intent(in), optional  form,
logical, intent(in), optional  force_quote 
)

Add a field from an INTEGER variable to the csv record this.

The field will be quoted if necessary.

Parametri
[in,out]thisobject where to add field
[in]fieldfield to be added
[in]formoptional format
[in]force_quoteif provided and .TRUE. , the field will be quoted even if not necessary

Definizione alla linea 660 del file file_utilities.F90.

661  cycle
662  ENDIF
663  ENDIF
664  ENDIF
665  ENDIF
666 ENDDO
667 
668 this%cursor = min(i, SIZE(this%record) + 1)
669 IF (PRESENT(flen)) flen = ofcursor ! restituisco la lunghezza
670 IF (PRESENT(field)) THEN ! controllo overflow di field
671  IF (ofcursor > len(field)) THEN

Generated with Doxygen.