[TRNSYS-users] query about creating the new components

mahdi shahrestani mahdishahrestani at yahoo.com
Fri May 28 09:24:54 PDT 2010



Stefan
 
Many thanks for your reply.
That is a good point. I should have a look to make sure about the compiler and also compatible version. 
 
About the Trnsys 17, I could not compare it because I start with 17 and I have not had any experiences on the previous versions.
 
Totally I am a bit upset due to lack of ability in evaluation of pressure drop especially in hydraulic systems and also air distribution.  
 
Many thanks for your valuable response 
Mehdi

----- Original Message ----
From: "thiemann.stefan at vdi.de" <thiemann.stefan at vdi.de>
To: mahdi shahrestani <mahdishahrestani at yahoo.com>
Sent: Fri, May 28, 2010 4:43:48 PM
Subject: Re: [TRNSYS-users] query about creating the new components

-------------
Okay,

I indeed think this is the answer to your problem. I guessed you are
using trnsys 16.
According to the manual Trnsys 16 can only be used with Compaq Visual
Fortran 6.6b (and 6.6c, but this is not recommended).
I dont know if the use of 6.6 is possible, but I know, that using 6.1
I got some error messages like you.
>From these fact I conclude that you use the wrong compiler!!!
You should carefully read the manual of Trnsys 17 which compiler
should be used. I guess it should be a newer one from Intel... like
Intel visual fortran 10 or 11...
Using the correct compiler should be the solution!
How is Trnsys 17 compared to Trnsys 16? I guess it is more
comfortable..

Stefan
 
Many thanks for your swift reply.
It is strange, I followed the steps that you mentioned but when the
CVF comes up automatically and I press F7 only some errors appears
without any thing else. (same as before)
 
Two other things that I want to confirm, first I have Trnsys 17 which
is installed on C\Trnsys 17 ( you was mentioned that it should be on
C\Program files\Trnasys) and the second I have CVF 6.6 ( you was
mentioned CVF6.6b) which is installed on C\Program file\. Do you
thing these two could be the reason. I think it is not reasonable. 
 
Your effort would be highly appreciated
Mehdi 



----- Original Message ----
From: "thiemann.stefan at vdi.de" <thiemann.stefan at vdi.de>
To: mahdi shahrestani <mahdishahrestani at yahoo.com>
Sent: Fri, May 28, 2010 2:27:30 PM
Subject: Re: [TRNSYS-users] query about creating the new components

Hi,

I dont know what you exactly did but you should regard some points:
-use compaq visual fortran 6.6 b
-At the beginning it is quite useful to use only the fortran workspace
which was created by the "export as fortran" function.
-Just start wiht one input and one output as you did and try:
Out(1)=2*Input1 or something like this

Just trying this should work at once.

For the beginning you can even try like this:
In the simulation studio open a new component, export and save it,
press F7. This should create an empty dll.

For the correct function of all components Trnsys should be installed
in the folder:
C:\Programs\Trnsys_16_1
and your compiler files should be saved in:
C:\Programme\Trnsys16_1\Compilers\Cvf66

If you have special questions dont hesitate to ask


Stefan

-------------
Hello everybody
 
I have a problem in creating the new components.
Regarding to item 1.8 of first chapter (getting start) I followed the
procedure to making new component but there is some thing wrong.
 
1-First I installed the Compaq visual basic in my system.
2-in simulation studio I made a new component setting one input, one
output and one parameter.
3-I saved it on studio/Performa and then exported it as FORTRAN and
save it on my project folder.
4- After appearing a dialog box automatically Compaq visual FORTRAN
comes up.
5- I set the equation output=input*mult on the source FORTRAN file.
6- After setting the “Release DLL” I pushed the F7 to make the DLL
 
But the problem is instead of generation of DLL lots of error comes up
(30 errors, 0 warnings).
I am sure that I followed the steps right according to mentioned
instruction in pages 1-65 to 1-70 but the new component is not
generated 
The list of errors has been mentioned below.
 
I was wondering if you could give me an instruction to solve it.
 
Regards
Mehdi Shahrestani
 
 
 
 
 
 
--------------------Configuration: Type201Lib - Win32
Release--------------------
C:\Trnsys17\MyProjects\type201.for(44): Could not find the file
TrnsysConstants.mod.
C:\Trnsys17\MyProjects\type201.for(45): Could not find the file
TrnsysFunctions.mod.
C:\Trnsys17\MyProjects\type201.for(47): Could not find the file
TrnsysData.mod.
Compiling Fortran...
C:\Trnsys17\MyProjects\type201.for
C:\Trnsys17\MyProjects\type201.for(44) : Error: Error in opening the
Library module file.   [TRNSYSCONSTANTS]
      Use TrnsysConstants
----------^
C:\Trnsys17\MyProjects\type201.for(45) : Error: Error in opening the
Library module file.   [TRNSYSFUNCTIONS]
      Use TrnsysFunctions
----------^
C:\Trnsys17\MyProjects\type201.for(47) : Error: Error in opening the
Library module file.   [TRNSYSDATA]
      Use TrnsysData, Only:LastCallofSimulation,
ConvergenceReached,
----------^
C:\Trnsys17\MyProjects\type201.for(77) : Error: This name does not
have a type, and must have an explicit type.   [GETSIMULATIONTIME]
      Time=getSimulationTime()
-----------^
C:\Trnsys17\MyProjects\type201.for(78) : Error: This name does not
have a type, and must have an explicit type.  
[GETSIMULATIONTIMESTEP]
      Timestep=getSimulationTimeStep()
---------------^
C:\Trnsys17\MyProjects\type201.for(83) : Error: Conflicting attributes
or multiple declaration of name.   [VERSIONSIGNINGTIME]
      If(VersionSigningTime) Then
---------^
C:\Trnsys17\MyProjects\type201.for(83) : Error: A logical data type is
required in this context.   [VERSIONSIGNINGTIME]
      If(VersionSigningTime) Then
---------^
C:\Trnsys17\MyProjects\type201.for(91) : Error: Conflicting attributes
or multiple declaration of name.   [LASTCALLOFSIMULATION]
      If(LastCallofSimulation) Then
---------^
C:\Trnsys17\MyProjects\type201.for(91) : Error: A logical data type is
required in this context.   [LASTCALLOFSIMULATION]
      If(LastCallofSimulation) Then
---------^
C:\Trnsys17\MyProjects\type201.for(98) : Error: Conflicting attributes
or multiple declaration of name.   [CONVERGENCEREACHED]
      If(ConvergenceReached) Then
---------^
C:\Trnsys17\MyProjects\type201.for(98) : Error: A logical data type is
required in this context.   [CONVERGENCEREACHED]
      If(ConvergenceReached) Then
---------^
C:\Trnsys17\MyProjects\type201.for(105) : Error: Conflicting
attributes or multiple declaration of name.  
[FIRSTCALLOFSIMULATION]
      If(FirstCallofSimulation) Then
---------^
C:\Trnsys17\MyProjects\type201.for(105) : Error: A logical data type
is required in this context.   [FIRSTCALLOFSIMULATION]
      If(FirstCallofSimulation) Then
---------^
C:\Trnsys17\MyProjects\type201.for(123) : Error: Conflicting
attributes or multiple declaration of name.   [FIRSTTIMESTEP]
      If (FirstTimestep) Then
----------^
C:\Trnsys17\MyProjects\type201.for(123) : Error: A logical data type
is required in this context.   [FIRSTTIMESTEP]
      If (FirstTimestep) Then
----------^
C:\Trnsys17\MyProjects\type201.for(125) : Error: This name does not
have a type, and must have an explicit type.   [GETPARAMETERVALUE]
      mult = getParameterValue(1)
-------------^
C:\Trnsys17\MyProjects\type201.for(127) : Error: This name does not
have a type, and must have an explicit type.   [GETINPUTVALUE]
      iput = GetInputValue(1)
-------------^
C:\Trnsys17\MyProjects\type201.for(156) : Error: Conflicting
attributes or multiple declaration of name.   [REREADPARAMETERS]
      If(ReReadParameters) Then
---------^
C:\Trnsys17\MyProjects\type201.for(156) : Error: A logical data type
is required in this context.   [REREADPARAMETERS]
      If(ReReadParameters) Then
---------^
C:\Trnsys17\MyProjects\type201.for(171) : Error: This name does not
have a type, and must have an explicit type.   [ERRORFOUND]
      If(ErrorFound()) Return
---------^
C:\Trnsys17\MyProjects\type201.for(171) : Error: A logical data type
is required in this context.   [ERRORFOUND]
      If(ErrorFound()) Return
---------^
C:\Trnsys17\MyProjects\type201.for(205) : Error: This name does not
have a type, and must have an explicit type.   [OPUT]
 oput=iput*mult
--------^
C:\Trnsys17\MyProjects\type201.for(47) : Error: Name in only-list does
not exist.   [LASTCALLOFSIMULATION]
      Use TrnsysData, Only:LastCallofSimulation,
ConvergenceReached,
---------------------------^
C:\Trnsys17\MyProjects\type201.for(47) : Error: Name in only-list does
not exist.   [CONVERGENCEREACHED]
      Use TrnsysData, Only:LastCallofSimulation,
ConvergenceReached,
-------------------------------------------------^
C:\Trnsys17\MyProjects\type201.for(48) : Error: Name in only-list does
not exist.   [FIRSTCALLOFSIMULATION]
     1FirstCallofSimulation, FirstTimestep, ReReadParameters, 
------^
C:\Trnsys17\MyProjects\type201.for(48) : Error: Name in only-list does
not exist.   [FIRSTTIMESTEP]
     1FirstCallofSimulation, FirstTimestep, ReReadParameters, 
-----------------------------^
C:\Trnsys17\MyProjects\type201.for(48) : Error: Name in only-list does
not exist.   [REREADPARAMETERS]
     1FirstCallofSimulation, FirstTimestep, ReReadParameters, 
--------------------------------------------^
C:\Trnsys17\MyProjects\type201.for(49) : Error: Name in only-list does
not exist.   [VERSIONSIGNINGTIME]
     1VersionSigningTime, CurrentUnit, CurrentType
------^
C:\Trnsys17\MyProjects\type201.for(49) : Error: Name in only-list does
not exist.   [CURRENTUNIT]
     1VersionSigningTime, CurrentUnit, CurrentType
--------------------------^
C:\Trnsys17\MyProjects\type201.for(49) : Error: Name in only-list does
not exist.   [CURRENTTYPE]
     1VersionSigningTime, CurrentUnit, CurrentType
---------------------------------------^
(229) : Severe: Too many errors, exiting
Error executing df.exe.
 
type201.dll - 30 error(s), 0 warning(s)


      

_______________________________________________
TRNSYS-users mailing list
TRNSYS-users at cae.wisc.edu
https://www-old.cae.wisc.edu/mailman/listinfo/trnsys-users


      




More information about the TRNSYS-users mailing list