Intel® Software Network

I am trying to pass an double precision allocated array to a FORTRAN COM server method.  The code I started with form Compaq Fortran worked fine.  However, I can't get this functionality to work at all with 10.1.   If I try to specify the arguments of the method as assumed-shape, passed by reference, real*8 I get the following errors from the generated code:  Any ideas on why this error occurs?

 

Error 1  Error: This derived type name has not been declared.   [FOR_DIMS_INFO] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 161 
Error 2  Error: This derived type name has not been declared.   [FOR_DIMS_INFO] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 171 
Error 3  Error: This name must be the name of a variable with a derived type (structure type)   [DA$X] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 192 
Error 4  Error: This name must be the name of a variable with a derived type (structure type)   [DA$X] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 193 
Error 5  Error: This name must be the name of a variable with a derived type (structure type)   [DA$X] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 194 
Error 6  Error: This name does not have a type, and must have an explicit type.   [FOR_DESCRIPTOR_ARRAY_DEFINED] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 
Error 7  Error: This name does not have a type, and must have an explicit type.   [FOR_DESCRIPTOR_ARRAY_NODEALLOC] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 
Error 8  Error: This name does not have a type, and must have an explicit type.   [FOR_DESCRIPTOR_ARRAY_CONTIGUOUS] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 
Warning 9  Warning: This argument's data type is incompatible with this intrinsic procedure; procedure assumed EXTERNAL.   [IOR] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 
Error 10  Error: This name does not have a type, and must have an explicit type.   [IOR] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 
Warning 11  Warning: This argument's data type is incompatible with this intrinsic procedure; procedure assumed EXTERNAL.   [IOR] C:\eSimulation\Projects\DAESolver\openDae\Generated\iMixer.f90 196 

It looks as if the real problem is the missing declaration for FOR_DIMS_INFO.  I don't recognize that - where did it come from?

---

Steve

Doctor Fortran: intel.com/software/drfortran

It's in the "do not edit" interface code that is generated from the hierarchy file.  It happens when I try to declare that the argument is an array.  No errors if the argument is a scalar.

 

I think at this point I would advise you to submit an issue to Intel Support and attach a ZIP of your project.  Please mention that you were referred from the forum.

---

Steve

Doctor Fortran: intel.com/software/drfortran

Already submitted with original cvf project and 10.1 project .  But no answer back yet.

Thanks.

 

How long does it usually take to get a reply back (or at least an update indicating that someone has actually looked at the problem).

 

Usually within a day.  I'm not sure what went wrong here and will give a nudge.

---

Steve

Doctor Fortran: intel.com/software/drfortran