Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.

EntryPointNotFoundException

Fongwan_S_
Beginner
283 Views
Hello guys, Please can someone help me figure out how to deal with this exception: EntryPointNotFoundException: Unable to find an entry point named 'INITIA' in DLL 'wrm.DLL'. Thanks
0 Kudos
3 Replies
Steven_L_Intel1
Employee
283 Views

Is wrm.dll supposed to have a procedure named INITIA? The error you describe is usually one that comes from Visual Basic. If you are trying to call a Fortran procedure named INIITIA it will need to contain a directive to specify exactly that name and that it uses the STDCALL calling convention. We provide two sample applications with Visual Basic calling Fortran that you could look at.

If you would like more help here, show us how INITIA is declared in the source where it is called and also the source of the actual routine (just the declarations part). Remember that the Fortran routine also needs an ATTRIBUTES DLLEXPORT directive.

0 Kudos
Fongwan_S_
Beginner
283 Views

Hello Steve,

I actually saw the examples provided but still a little bit confused. Here is how i declared "INITIA" and other subroutines in the module. See attached the program from which the wrm.dll was created:

 

 Public Function INITIA(ByVal i As Integer) As Integer
        (ByVal NSOIL As Double, ByVal BDENS As Double, ByVal ORGMA As Double, _
      ByVal CLAY As Double, ByVal SAND As Double, ByVal SILT As Double, ByVal WTCF As Double, _
      ByVal CEC As Double, ByVal DWBA As Double, ByVal PSIZE As Double, ByVal FC As Double, _
      ByVal WP As Double, ByVal SAT As Double, ByVal STAB As Double, ByVal WDCLAY As Double, _
      ByVal MG As Double, ByVal FE As Double, ByVal AL As Double, ByVal COND As Double, ByVal CA As Double, _
      ByVal NA As Double, ByVal CECNH4 As Double, ByVal VFSAND As Double, ByVal SPSURF As Double, _
      ByVal CACO3 As Double, ByVal TOTPOR As Double, ByVal VOLCF As Double, ByVal CFCORR As Double, _
      ByVal EACORR As Double, ByVal EFFPOR As Double, ByVal WFCP As Double, ByVal RSWR As Double, _
      ByVal KONDS As Double, ByVal PORFAC As Double, ByVal WISCHM As Double, ByVal NVEG As Double, _
      ByVal CISCAP As Double, ByVal KC As Double, ByVal LAI As Double, ByVal NGRID As Double, _
      ByVal NSEG As Double, ByVal KP As Double, ByVal BETA As Double, ByVal DELTT As Double, ByVal RNWL As Double, _
      ByVal RMWL As Double, ByVal TSLOPE As Double, ByVal WSLOPE As Double, ByVal BFLOW As Double, ByVal POND As Double, _
      ByVal MONITO As Double, ByVal NOUT As Double, ByVal POLY As Double, ByVal NEVENT As Double, ByVal PRIN As Double, _
      ByVal ENDS As Double, ByVal KRET As Double, ByVal GIM As Double, ByVal GSC As Double, ByVal SCULV As Double, _
      ByVal XAREA As Double, ByVal LCULV As Double, ByVal EII As Double, ByVal EOI As Double, ByVal DCULV As Double, _
      ByVal KLOSSE As Double, ByVal KLOSSC As Double, ByVal KORIF As Double, ByVal KSPILL As Double, ByVal LSPILL As Double, ByVal KB As Double, _
      ByVal DELTX1 As Double, ByVal NCULV As Double, ByVal TWIDTH As Double, ByVal WWIDTH As Double, ByVal BACAN As Double, ByVal CAN As Double, ByVal OPEN As Double, _
      ByVal BAOPEN As Double, ByVal COVER As Double, ByVal GI As Double, ByVal PFC As Double, ByVal SCCOR As Double, ByVal ASW As Double, ByVal DELTX2 As Double, _
      ByVal MANN1 As Double, ByVal MANN2 As Double, ByVal MANN3 As Double, ByVal FSLOPE As Double, ByVal CWIDTH As Double, ByVal CSLOPE As Double, ByVal CANHT As Double, _
      ByVal PRESD As Double, ByVal KTC As Double, ByVal DW As Double, ByVal DSUB As Double, ByVal DSURF As Double, ByVal STRUC1 As Double, ByVal STRUC2 As Double, _
      ByVal STRUC3 As Double, ByVal DUAL As Double, ByVal NELEMV As Double, ByVal NELEMC As Double, ByVal NELEMT As Double, ByVal NELEMW As Double, ByVal SOIL As Double, _
      ByVal VEG As Double, ByVal GIM1 As Double, ByVal GSC1 As Double, ByVal FGCORR As Double, ByVal KOND As Double, ByVal CANFAC As Double, ByVal KONDC As Double, _
      ByVal KONDO As Double, ByVal KONDE As Double, ByVal KRILL As Double, ByVal TAWC As Double, ByVal KRILLY As Double, ByVal FSANG As Double, ByVal FSFAC As Double, _
      ByVal PCAN As Double, ByVal CANEF As Double, ByVal GRCE As Double, ByVal KSTO As Double, ByVal FRI As Double, ByVal RETAIN As Double, ByVal MOUT As Double, _
      ByVal RI As Double, ByVal ETK As Double, ByVal CIS As Double, ByVal CFILT As Double, ByVal FILT As Double, ByVal FLOWV As Double, ByVal FLOWC As Double, _
      ByVal FLOWT As Double, ByVal FLOWW As Double, ByVal QVLAT As Double, ByVal QCLAT As Double, ByVal QTLAT As Double, ByVal QWLAT As Double, ByVal RFLOW As Double, _
      ByVal QSUB As Double, ByVal RSTORE As Double, ByVal RCOMP As Double, ByVal QVUP As Double, ByVal QCUP As Double, ByVal QTUP As Double, ByVal QWUP As Double, _
      ByVal QGUP As Double, ByVal SEDLDV As Double, ByVal SEDLDC As Double, ByVal SEDLDT As Double, ByVal SEDLDW As Double, ByVal GVUP As Double, ByVal GCUP As Double, _
      ByVal GTUP As Double, ByVal GWUP As Double, ByVal SUBS As Double, ByVal SURFS As Double, ByVal STIME As Double, ByVal NEXTE As Double, ByVal TEST As Double, _
      ByVal STIMES As Double, ByVal SAR As Double)
    End Function
    Public Declare Auto Sub INITIA Lib "wrm.dll" _
    (ByVal NSOIL As Double, ByVal BDENS As Double, ByVal ORGMA As Double, _
      ByVal CLAY As Double, ByVal SAND As Double, ByVal SILT As Double, ByVal WTCF As Double, _
      ByVal CEC As Double, ByVal DWBA As Double, ByVal PSIZE As Double, ByVal FC As Double, _
      ByVal WP As Double, ByVal SAT As Double, ByVal STAB As Double, ByVal WDCLAY As Double, _
      ByVal MG As Double, ByVal FE As Double, ByVal AL As Double, ByVal COND As Double, ByVal CA As Double, _
      ByVal NA As Double, ByVal CECNH4 As Double, ByVal VFSAND As Double, ByVal SPSURF As Double, _
      ByVal CACO3 As Double, ByVal TOTPOR As Double, ByVal VOLCF As Double, ByVal CFCORR As Double, _
      ByVal EACORR As Double, ByVal EFFPOR As Double, ByVal WFCP As Double, ByVal RSWR As Double, _
      ByVal KONDS As Double, ByVal PORFAC As Double, ByVal WISCHM As Double, ByVal NVEG As Double, _
      ByVal CISCAP As Double, ByVal KC As Double, ByVal LAI As Double, ByVal NGRID As Double, _
      ByVal NSEG As Double, ByVal KP As Double, ByVal BETA As Double, ByVal DELTT As Double, ByVal RNWL As Double, _
      ByVal RMWL As Double, ByVal TSLOPE As Double, ByVal WSLOPE As Double, ByVal BFLOW As Double, ByVal POND As Double, _
      ByVal MONITO As Double, ByVal NOUT As Double, ByVal POLY As Double, ByVal NEVENT As Double, ByVal PRIN As Double, _
      ByVal ENDS As Double, ByVal KRET As Double, ByVal GIM As Double, ByVal GSC As Double, ByVal SCULV As Double, _
      ByVal XAREA As Double, ByVal LCULV As Double, ByVal EII As Double, ByVal EOI As Double, ByVal DCULV As Double, _
      ByVal KLOSSE As Double, ByVal KLOSSC As Double, ByVal KORIF As Double, ByVal KSPILL As Double, ByVal LSPILL As Double, ByVal KB As Double, _
      ByVal DELTX1 As Double, ByVal NCULV As Double, ByVal TWIDTH As Double, ByVal WWIDTH As Double, ByVal BACAN As Double, ByVal CAN As Double, ByVal OPEN As Double, _
      ByVal BAOPEN As Double, ByVal COVER As Double, ByVal GI As Double, ByVal PFC As Double, ByVal SCCOR As Double, ByVal ASW As Double, ByVal DELTX2 As Double, _
      ByVal MANN1 As Double, ByVal MANN2 As Double, ByVal MANN3 As Double, ByVal FSLOPE As Double, ByVal CWIDTH As Double, ByVal CSLOPE As Double, ByVal CANHT As Double, _
      ByVal PRESD As Double, ByVal KTC As Double, ByVal DW As Double, ByVal DSUB As Double, ByVal DSURF As Double, ByVal STRUC1 As Double, ByVal STRUC2 As Double, _
      ByVal STRUC3 As Double, ByVal DUAL As Double, ByVal NELEMV As Double, ByVal NELEMC As Double, ByVal NELEMT As Double, ByVal NELEMW As Double, ByVal SOIL As Double, _
      ByVal VEG As Double, ByVal GIM1 As Double, ByVal GSC1 As Double, ByVal FGCORR As Double, ByVal KOND As Double, ByVal CANFAC As Double, ByVal KONDC As Double, _
      ByVal KONDO As Double, ByVal KONDE As Double, ByVal KRILL As Double, ByVal TAWC As Double, ByVal KRILLY As Double, ByVal FSANG As Double, ByVal FSFAC As Double, _
      ByVal PCAN As Double, ByVal CANEF As Double, ByVal GRCE As Double, ByVal KSTO As Double, ByVal FRI As Double, ByVal RETAIN As Double, ByVal MOUT As Double, _
      ByVal RI As Double, ByVal ETK As Double, ByVal CIS As Double, ByVal CFILT As Double, ByVal FILT As Double, ByVal FLOWV As Double, ByVal FLOWC As Double, _
      ByVal FLOWT As Double, ByVal FLOWW As Double, ByVal QVLAT As Double, ByVal QCLAT As Double, ByVal QTLAT As Double, ByVal QWLAT As Double, ByVal RFLOW As Double, _
      ByVal QSUB As Double, ByVal RSTORE As Double, ByVal RCOMP As Double, ByVal QVUP As Double, ByVal QCUP As Double, ByVal QTUP As Double, ByVal QWUP As Double, _
      ByVal QGUP As Double, ByVal SEDLDV As Double, ByVal SEDLDC As Double, ByVal SEDLDT As Double, ByVal SEDLDW As Double, ByVal GVUP As Double, ByVal GCUP As Double, _
      ByVal GTUP As Double, ByVal GWUP As Double, ByVal SUBS As Double, ByVal SURFS As Double, ByVal STIME As Double, ByVal NEXTE As Double, ByVal TEST As Double, _
      ByVal STIMES As Double, ByVal SAR As Double)

    Public Declare Auto Sub TIMER Lib "wrm.dll" _
    (ByVal NEXTE As Double, ByVal STIMES As Double, ByVal DELTT As Double, ByVal NSIM As Double, ByVal ETT As Double, ByVal EVENT1 As Double)

    Public Declare Auto Sub RAINFL Lib "wrm.dll" _
    (ByVal NSIM As Double, ByVal STIME As Double, ByVal DELTT As Double, ByVal NGRID As Double, ByVal VEG As Double, ByVal SOIL As Double, ByVal CIS As Double, _
    ByVal CISCAP As Double, ByVal CFILT As Double, ByVal FILT As Double, ByVal KONDE As Double, ByVal EFFPOR As Double, ByVal ASW As Double, ByVal WFCP As Double, _
    ByVal DUAL As Double, ByVal QVUP As Double, ByVal DELTX1 As Double, ByVal QGUP As Double, ByVal DSUB As Double, ByVal SAT As Double, ByVal WP As Double, _
    ByVal SUBS As Double, ByVal RAIN As Double, ByVal RETAIN As Double, ByVal FLOWV As Double, ByVal QVLAT As Double, ByVal MANN1 As Double, ByVal FSLOPE As Double, _
    ByVal BETA As Double, ByVal FLOWC As Double, ByVal QCLAT As Double, ByVal FLOWW As Double, ByVal DELTX2 As Double, ByVal MANN2 As Double, ByVal CSLOPE As Double, _
    ByVal QCUP As Double, ByVal CWIDTH As Double, ByVal DWBA As Double, ByVal DW As Double, ByVal KTC As Double, ByVal KRILL As Double, ByVal TAWC As Double, ByVal GVUP As Double, _
    ByVal KRILLY As Double, ByVal FSFAC As Double, ByVal CANEF As Double, ByVal GRCE As Double, ByVal SEDLDV As Double, ByVal GCUP As Double, ByVal PSIZE As Double, _
    ByVal SEDLDC As Double, ByVal DSURF As Double, ByVal KSTO As Double, ByVal QSUB As Double, ByVal STRUC1 As Double, ByVal STRUC2 As Double, ByVal STRUC3 As Double, _
    ByVal RFLOW As Double, ByVal RCOMP As Double, ByVal RSTORE As Double, ByVal POLY As Double, ByVal RNWL As Double, ByVal RMWL As Double, ByVal KSPILL As Double, _
     ByVal LSPILL As Double, ByVal DCULV As Double, ByVal EII As Double, ByVal EOI As Double, ByVal XAREA As Double, ByVal KLOSSE As Double, ByVal KLOSSC As Double, _
     ByVal LCULV As Double, ByVal SCULV As Double, ByVal KORIF As Double, ByVal NCULV As Double, ByVal FLOWT As Double, ByVal QTLAT As Double, ByVal MANN3 As Double, _
     ByVal TSLOPE As Double, ByVal QTUP As Double, ByVal TWIDTH As Double, ByVal GTUP As Double, ByVal RI As Double, ByVal QWLAT As Double, ByVal WSLOPE As Double, _
     ByVal QWUP As Double, ByVal WWIDTH As Double, ByVal GWUP As Double, ByVal MOUT As Double, ByVal MONITO As Double, ByVal NELEMV As Double, ByVal NELEMC As Double, _
     ByVal NELEMT As Double, ByVal NELEMW As Double, ByVal SEDLDT As Double, ByVal SEDLDW As Double, ByVal SURFS As Double, ByVal NAME As Double, ByVal POND As Double, _
     ByVal TEST As Double, ByVal BFLOW As Double, ByVal NOUT As Double, ByVal FC As Double, ByVal NSEG As Double, ByVal FLOW As Double)

    Public Declare Auto Sub PONDED Lib "wrm.dll" _
    (ByVal CFILT1 As Double, ByVal FILT1 As Double, ByVal DELTT1 As Double, ByVal KONDE1 As Double, ByVal WFCP1 As Double, ByVal EFFPO1 As Double, _
                      ByVal ASW1 As Double)

    Public Declare Auto Sub EVAPT Lib "wrm.dll" _
    (ByVal STIME As Double, ByVal DELTT As Double, ByVal ETK As Double, ByVal NGRID As Double, ByVal VEG As Double, ByVal SOIL As Double, ByVal FILT As Double, _
    ByVal CFILT As Double, ByVal KONDE As Double, ByVal WFCP As Double, ByVal EFFPOR As Double, ByVal ASW As Double, ByVal DUAL As Double, ByVal DSUB As Double, ByVal SAT As Double, _
    ByVal WP As Double, ByVal SUBS As Double, ByVal QVUP As Double, ByVal FLOWV As Double, ByVal QVLAT As Double, ByVal MANN1 As Double, ByVal MANN2 As Double, ByVal FSLOPE As Double, _
    ByVal BETA As Double, ByVal FLOWC As Double, ByVal QCLAT As Double, ByVal FLOWW As Double, ByVal DELTX1 As Double, ByVal DELTX2 As Double, ByVal CSLOPE As Double, ByVal QCUP As Double, _
    ByVal CWIDTH As Double, ByVal DWBA As Double, ByVal DW As Double, ByVal KTC As Double, ByVal KRILL As Double, ByVal TAWC As Double, ByVal GVUP As Double, ByVal KRILLY As Double, _
    ByVal FSFAC As Double, ByVal CANEF As Double, ByVal GRCE As Double, ByVal SEDLDV As Double, ByVal GCUP As Double, ByVal PSIZE As Double, ByVal SEDLDC As Double, ByVal DSURF As Double, _
    ByVal FC As Double, ByVal QGUP As Double, ByVal KSTO As Double, ByVal QSUB As Double, ByVal STRUC1 As Double, ByVal STRUC2 As Double, ByVal STRUC3 As Double, ByVal RFLOW As Double, _
    ByVal RCOMP As Double, ByVal RSTORE As Double, ByVal POLY As Double, ByVal RNWL As Double, ByVal RMWL As Double, ByVal KSPILL As Double, ByVal LSPILL As Double, ByVal DCULV As Double, _
    ByVal EII As Double, ByVal EOI As Double, ByVal XAREA As Double, ByVal KLOSSE As Double, ByVal KLOSSC As Double, ByVal LCULV As Double, ByVal SCULV As Double, ByVal KORIF As Double, _
    ByVal NCULV As Double, ByVal FLOWT As Double, ByVal QTLAT As Double, ByVal MANN3 As Double, ByVal TWIDTH As Double, ByVal WWIDTH As Double, ByVal TSLOPE As Double, ByVal WSLOPE As Double, _
    ByVal QTUP As Double, ByVal GTUP As Double, ByVal RI As Double, ByVal QWLAT As Double, ByVal QWUP As Double, ByVal GWUP As Double, ByVal GI As Double, ByVal PCAN As Double, _
    ByVal LAI As Double, ByVal KC As Double, ByVal KP As Double, ByVal KB As Double, ByVal CIS As Double, ByVal MOUT As Double, ByVal MONITO As Double, ByVal NELEMV As Double, _
    ByVal NELEMC As Double, ByVal NELEMT As Double, ByVal NELEMW As Double, ByVal SEDLDT As Double, ByVal SEDLDW As Double, ByVal ETT As Double, ByVal SURFS As Double, ByVal TOTPOR As Double, _
    ByVal NOUT As Double, ByVal BFLOW As Double, ByVal CLAY As Double, ByVal VFSAND As Double, ByVal CACO3 As Double, ByVal SAR As Double, ByVal SPSURF As Double, ByVal WDCLAY As Double, _
    ByVal SAND As Double, ByVal NAME As Double, ByVal POND As Double, ByVal TEST As Double, ByVal RETAIN As Double, ByVal NSEG As Double, ByVal FLOW As Double, ByVal W As Double, ByVal Z As Double, ByVal Lm As Double, ByVal LATRAD As Double, ByVal CAF As Double)

    Public Declare Auto Sub RUNOFF Lib "wrm.dll" _
    (ByVal SAT1 As Double, ByVal WP1 As Double, ByVal DSUB1 As Double, ByVal DELTT1 As Double, ByVal FILTX1 As Double, ByVal QGUP1 As Double, ByVal DELTX1 As Double, _
    ByVal SUBS1 As Double, ByVal KSTO1 As Double, ByVal QSUB1 As Double, ByVal POND1 As Double, ByVal FLOWV1 As Double, ByVal QVLAT1 As Double, ByVal MANN As Double, ByVal SLOPE As Double, _
    ByVal QVUP1 As Double, ByVal BETA As Double, ByVal DWBA1 As Double, ByVal DW1 As Double, ByVal KTC1 As Double, ByVal KRILL1 As Double, ByVal TAWC1 As Double, ByVal RAIN As Double, ByVal GVUP1 As Double, _
    ByVal KRILL2 As Double, ByVal FSFAC1 As Double, ByVal CANEF1 As Double, ByVal GRCE1 As Double, ByVal SEDLD1 As Double, ByVal TEST1 As Double, ByVal FC1 As Double, ByVal SURFS1 As Double, _
    ByVal DSURF1 As Double, ByVal NOUT As Double, ByVal CAF As Double)

    Public Declare Auto Sub KMATIC Lib "wrm.dll" _
    (ByVal DELTT1 As Double, ByVal DELTX1 As Double, ByVal ALPHA As Double, ByVal BETA As Double, ByVal FLOW As Double, ByVal CONST1 As Double)

    Public Declare Auto Sub SATROF Lib "wrm.dll" _
    (ByVal DELTT1 As Double, ByVal QGUP1 As Double, ByVal DELTX1 As Double, ByVal DSUB1 As Double, ByVal SAT1 As Double, ByVal WP1 As Double, ByVal SUBS1 As Double, _
    ByVal RAIN As Double, ByVal POND1 As Double, ByVal QVUP1 As Double, ByVal FILTX1 As Double, ByVal FLOWV1 As Double, ByVal QVLAT1 As Double, ByVal MANN As Double, ByVal SLOPE As Double, _
    ByVal BETA As Double, ByVal FLOWC1 As Double, ByVal QCLAT1 As Double, ByVal FLOWW1 As Double, ByVal DELTX As Double, ByVal MANNN As Double, ByVal SLOPE1 As Double, ByVal QCUP1 As Double, _
    ByVal WIDTH1 As Double, ByVal DWBA1 As Double, ByVal DW1 As Double, ByVal FC1 As Double, ByVal KTC1 As Double, ByVal KRILL1 As Double, ByVal TAWC1 As Double, ByVal GVUP1 As Double, _
    ByVal KRILL2 As Double, ByVal FSFAC1 As Double, ByVal CANEF1 As Double, ByVal GRCE1 As Double, ByVal SEDLD1 As Double, ByVal GCUP1 As Double, ByVal PSIZE1 As Double, _
    ByVal SEDLD2 As Double, ByVal DEPTH As Double, ByVal SURFS1 As Double, ByVal DSURF1 As Double, ByVal KSTO1 As Double, ByVal TEST1 As Double, ByVal QSUB1 As Double, ByVal BFLOW As Double, ByVal NOUT As Double, ByVal CAF As Double)

    Public Declare Auto Sub STRUCT Lib "wrm.dll" _
    (ByVal FLOWT1 As Double, ByVal QTLAT1 As Double, ByVal FLOWV1 As Double, ByVal DELTX1 As Double, ByVal MANNN As Double, ByVal TSLOPE As Double, ByVal DELTT1 As Double, ByVal QTUP1 As Double, _
    ByVal BETA As Double, ByVal TWIDTH As Double, ByVal GTUP1 As Double, ByVal SEDLD1 As Double, ByVal PSIZE1 As Double, ByVal TAWC1 As Double, ByVal KRILL1 As Double, ByVal SEDLD2 As Double, _
    ByVal STRUC As Double, ByVal RI As Double, ByVal FLOWW1 As Double, ByVal QWLAT1 As Double, ByVal DELTX As Double, ByVal WSLOPE As Double, ByVal QWUP1 As Double, ByVal WWIDTH As Double, _
    ByVal GWUP1 As Double, ByVal SEDLD3 As Double)

    Public Declare Auto Sub GWWAY Lib "wrm.dll" _
    (ByVal RI As Double, ByVal FLOWW1 As Double, ByVal QWLAT1 As Double, ByVal FLOWT1 As Double, ByVal DELTX As Double, ByVal WSLOPE As Double, ByVal DELTT1 As Double, _
    ByVal QWUP1 As Double, ByVal BETA As Double, ByVal WWIDTH As Double, ByVal GWUP1 As Double, ByVal SEDLD2 As Double, ByVal PSIZE1 As Double, ByVal SEDLD3 As Double)

    Public Declare Auto Sub HSTRUC Lib "wrm.dll" _
    (ByVal FLOWC1 As Double, ByVal RFLOW1 As Double, ByVal RCOMP1 As Double, ByVal RSTOR As Double, ByVal POLY As Double, ByVal RNWL As Double, ByVal RMWL As Double, _
    ByVal KSPILL As Double, ByVal LSPILL As Double, ByVal SEDLD2 As Double, ByVal DELTT As Double, ByVal FLOW As Double)

    Public Declare Auto Sub CULVT Lib "wrm.dll" _
    (ByVal DEPTH1 As Double, ByVal DCULV As Double, ByVal EII As Double, ByVal EOI As Double, ByVal XAREA As Double, ByVal KLOSSE As Double, ByVal KLOSSC As Double, _
    ByVal LCULV As Double, ByVal SCULV As Double, ByVal KORIF As Double, ByVal NCULV As Double, ByVal FLOWC1 As Double)

    Public Declare Auto Sub BASEFL Lib "wrm.dll" _
    (ByVal ETT As Double, ByVal STIME As Double, ByVal NGRID As Double, ByVal VEG As Double, ByVal SOIL As Double, ByVal DUAL As Double, ByVal STRUC1 As Double, _
    ByVal STRUC3 As Double, ByVal SEDLDT As Double, ByVal FLOWW As Double, ByVal SEDLDW As Double, ByVal GI As Double, ByVal PCAN As Double, ByVal LAI As Double, ByVal KC As Double, _
    ByVal KP As Double, ByVal KB As Double, ByVal SURFS As Double, ByVal SUBS As Double, ByVal TOTPOR As Double, ByVal DSURF As Double, ByVal DSUB As Double, ByVal BFLOW As Double, _
    ByVal FLOWC As Double, ByVal MONITO As Double, ByVal SEDLDC As Double, ByVal NELEMV As Double, ByVal NELEMC As Double, ByVal NELEMT As Double, ByVal NELEMW As Double, ByVal QVUP As Double, _
    ByVal QGUP As Double, ByVal GVUP As Double, ByVal FLOWV As Double, ByVal QSUB As Double, ByVal SEDLDV As Double, ByVal QCUP As Double, ByVal GCUP As Double, ByVal QTUP As Double, ByVal GTUP As Double, _
    ByVal FLOWT As Double, ByVal QWUP As Double, ByVal GWUP As Double, ByVal QCLAT As Double, ByVal SAT As Double, ByVal FC As Double, ByVal WP As Double, ByVal DELTX1 As Double, _
    ByVal DELTX2 As Double, ByVal MANN2 As Double, ByVal CSLOPE As Double, ByVal BETA As Double, ByVal CWIDTH As Double, ByVal PSIZE As Double, ByVal TAWC As Double, ByVal KRILL As Double, _
    ByVal AET As Double, ByVal KSTO As Double, ByVal RFLOW As Double, ByVal RCOMP As Double, ByVal RSTORE As Double, ByVal POLY As Double, ByVal RNWL As Double, ByVal RMWL As Double, _
    ByVal KSPILL As Double, ByVal LSPILL As Double, ByVal DCULV As Double, ByVal EII As Double, ByVal EOI As Double, ByVal XAREA As Double, ByVal KLOSSE As Double, ByVal KLOSSC As Double, _
    ByVal LCULV As Double, ByVal SCULV As Double, ByVal KORIF As Double, ByVal NCULV As Double, ByVal DELTT As Double, ByVal NSEG As Double, ByVal FLOW As Double, ByVal Z As Double, ByVal Lm As Double, ByVal LATRAD As Double)

    Public Declare Auto Sub ETONE Lib "wrm.dll" _
    (ByVal SURFS1 As Double, ByVal DSURF1 As Double, ByVal FC1 As Double, ByVal WP1 As Double, ByVal QGUP1 As Double, ByVal DELTX1 As Double, ByVal SUBS1 As Double, _
    ByVal DSUB1 As Double, ByVal KSTO1 As Double, ByVal QSUB1 As Double, ByVal FLOWV1 As Double, ByVal SEDLD1 As Double, ByVal DELTT As Double)


    Public Declare Auto Sub ETTWO Lib "wrm.dll" _
   (ByVal SUBS1 As Double, ByVal SURFS1 As Double, ByVal FLOWC1 As Double, ByVal QCLAT1 As Double, ByVal SEDLD2 As Double, ByVal QGUP1 As Double, ByVal DELTX1 As Double, _
    ByVal DSUB1 As Double, ByVal DSURF1 As Double, ByVal FC1 As Double, ByVal WP1 As Double, ByVal DELTX As Double, ByVal MANNN As Double, ByVal SLOPE1 As Double, ByVal QCUP1 As Double, _
    ByVal BETA As Double, ByVal WIDTH1 As Double, ByVal PSIZE1 As Double, ByVal GCUP1 As Double, ByVal TAWC1 As Double, ByVal KRILL1 As Double, ByVal DEPTH1 As Double, ByVal KSTO1 As Double, _
    ByVal QSUB1 As Double, ByVal DELTT As Double, ByVal FLOWV1 As Double, ByVal SEDLD1 As Double, ByVal BFLOW As Double)

0 Kudos
Steven_L_Intel1
Employee
283 Views

I don't see a problem with the source. Sometimes VB will say "entry point not found" when it really means that it could not load a dependent DLL. Are you running this on the same system where the compiler is installed? is wrm.dll placed in the same folder as the VB EXE? I notice that the source you provided has a main program - something not common for a DLL.

0 Kudos
Reply