[TRNSYS-users] inquire in TRNSYS17

[Arno Dentel]

Dear Hermann,

 

have you tried to use  the TRNSYS function getLUfileName(fileID)?

 

Kind regards,

Arno

 

 

 

7.4.2.13. function getLUfileName (i) 

 

A character function that returns the name of the file corresponding to the
logical unit i. If the file logical unit number has not been assigned, it
returns an error message. 

Example Usage 

INTEGER LU 

CHARACTER (len=maxLabelLength) fileName 

... 

fileName = getLUfileName(LU)

 

____________________________________

Arno Dentel - MEng, Dipl.-Ing.(FH)

Forschungsgebiet Gebäudesysteme 

 

ieg - Institut für Energie und Gebäude

Georg-Simon-Ohm-Hochschule 

für angewandte Wissenschaften - 

Fachhochschule Nürnberg

 

Keßlerplatz 12

90489 Nürnberg

 

Fon: +49 – 911 – 5880 1846

Fax: +49 – 911 – 5880 5846

 

E-Mail: arno.dentel at ohm-hochschule.de

Web:     <http://www.ieg.ohm-hochschule.de/> www.ieg.ohm-hochschule.de

 

P Be green - please print only when necessary.

 

Von: trnsys-users-bounces at cae.wisc.edu
[mailto:trnsys-users-bounces at cae.wisc.edu] Im Auftrag von Hermann
Schranzhofer
Gesendet: Montag, 25. Juli 2011 12:41
An: trnsys-users at cae.wisc.edu
Betreff: [TRNSYS-users] inquire in TRNSYS17

 

Dear all,

 

we have some TRNSYS 16.1 Types and we want to use them with TRNSYS 17. Some
of them use the INQUIRE command to get the filename of a data file. The
syntax is:

INQUIRE(fileID, EXIST=flag_exist, OPENED=flag_open,NAME=file_name).

 

This works fine with TRNSYS 16.1 but not with TRNSYS 17. Debugging the code
shows that the INQUIRE command returns an empty character array for
file_name.

 

I also did a small example (see attachment).

 

Can anyone help me?

 

Thanks and best regards,

Hermann Schranzhofer. 

 

_______________________________________________________________

DI Dr. mont. Hermann Schranzhofer
Institut fuer Waermetechnik / Institute of Thermal Engineering
TU Graz / Graz University of Technology
Inffeldgasse 25 / B, A-8010 Graz

Tel.: +43 316 873 7314
mobil: +43 664 60 873 7314
Fax : +43 316 873 7305
http://www.iwt.tugraz.at/
_______________________________________________________________

 

 

 

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.onebuilding.org/pipermail/trnsys-users-onebuilding.org/attachments/20110725/8c664104/attachment-0005.htm>