Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
CODE PROJECT For Those Who Code
  • Home
  • Articles
  • FAQ
Community
  1. Home
  2. General Programming
  3. Visual Basic
  4. Deployment Error

Deployment Error

Scheduled Pinned Locked Moved Visual Basic
sysadmindatabasesql-serverhelpcareer
5 Posts 2 Posters 0 Views 1 Watching
  • Oldest to Newest
  • Newest to Oldest
  • Most Votes
Reply
  • Reply as topic
Log in to reply
This topic has been deleted. Only users with topic management privileges can see it.
  • R Offline
    R Offline
    reykentj
    wrote on last edited by
    #1

    Error 1 Column, parameter, or variable #1: Cannot find data type GL_Record. Clrtest Microsoft.SqlServer.Server.SqlProcedure() Public Shared Sub sbSetupGLProbe(ByVal Selections As StoredProcedures.GL_Record) On Error GoTo Err_sbSetupGLProbe sbBuildGLQuery(Selections) Exit_sbSetupGLProbe: Exit Sub Err_sbSetupGLProbe: MsgBox(Err.Description) Resume Exit_sbSetupGLProbe End Sub This code will compile and deploy when the Sql Server attribute is omitted but then t_sql cannot see it. rkj

    D 1 Reply Last reply
    0
    • R reykentj

      Error 1 Column, parameter, or variable #1: Cannot find data type GL_Record. Clrtest Microsoft.SqlServer.Server.SqlProcedure() Public Shared Sub sbSetupGLProbe(ByVal Selections As StoredProcedures.GL_Record) On Error GoTo Err_sbSetupGLProbe sbBuildGLQuery(Selections) Exit_sbSetupGLProbe: Exit Sub Err_sbSetupGLProbe: MsgBox(Err.Description) Resume Exit_sbSetupGLProbe End Sub This code will compile and deploy when the Sql Server attribute is omitted but then t_sql cannot see it. rkj

      D Offline
      D Offline
      Dave Kreskowiak
      wrote on last edited by
      #2

      It's saying that the type GLRecord doesn't exist, at least not in the StoredProcedures class or namespace. Why are you using "On Error Goto" when it's been deprecated by Try/Catch?

      reykentj wrote:

      This code will compile and deploy when the Sql Server attribute is omitted

      What attribute? Let see the definition as it's supposed to be written.

      Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic
           2006, 2007

      R 1 Reply Last reply
      0
      • D Dave Kreskowiak

        It's saying that the type GLRecord doesn't exist, at least not in the StoredProcedures class or namespace. Why are you using "On Error Goto" when it's been deprecated by Try/Catch?

        reykentj wrote:

        This code will compile and deploy when the Sql Server attribute is omitted

        What attribute? Let see the definition as it's supposed to be written.

        Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic
             2006, 2007

        R Offline
        R Offline
        reykentj
        wrote on last edited by
        #3

        Error 1 Column, parameter, or variable #1: Cannot find data type GL_Record. Clrtest Public Class GL_Record Public AccountNo As String = "" Public AccountField As String = "" Public Year As Integer = 0 Public Month As Integer = 0 Public YTD As Decimal = 0 Public MTD As Decimal = 0 Public LastTransAmount As Decimal Public LastTransDate As Date = "01/01/01" Public LastTransBy As String = "" Public LastEffectiveDate As Date = "01/01/01" Public NumberOfTrans As Long = 0 End Class _ Public Shared Sub sbSetupGLProbe(ByVal Selections As GL_Record) Dim stDocName As String Dim result As Long = 0 On Error GoTo Err_sbSetupGLProbe sbBuildGLQuery(Selections) stDocName = "rptGL_Probe" 'DoCmd.OpenReport(stDocName, acPreview) Exit_sbSetupGLProbe: Exit Sub Err_sbSetupGLProbe: MsgBox(Err.Description) Resume Exit_sbSetupGLProbe End Sub On Error is being used because this is a conversion of small modules which may be later converted to try catch rkj

        D 1 Reply Last reply
        0
        • R reykentj

          Error 1 Column, parameter, or variable #1: Cannot find data type GL_Record. Clrtest Public Class GL_Record Public AccountNo As String = "" Public AccountField As String = "" Public Year As Integer = 0 Public Month As Integer = 0 Public YTD As Decimal = 0 Public MTD As Decimal = 0 Public LastTransAmount As Decimal Public LastTransDate As Date = "01/01/01" Public LastTransBy As String = "" Public LastEffectiveDate As Date = "01/01/01" Public NumberOfTrans As Long = 0 End Class _ Public Shared Sub sbSetupGLProbe(ByVal Selections As GL_Record) Dim stDocName As String Dim result As Long = 0 On Error GoTo Err_sbSetupGLProbe sbBuildGLQuery(Selections) stDocName = "rptGL_Probe" 'DoCmd.OpenReport(stDocName, acPreview) Exit_sbSetupGLProbe: Exit Sub Err_sbSetupGLProbe: MsgBox(Err.Description) Resume Exit_sbSetupGLProbe End Sub On Error is being used because this is a conversion of small modules which may be later converted to try catch rkj

          D Offline
          D Offline
          Dave Kreskowiak
          wrote on last edited by
          #4

          Repost the code (Copy and Paste) and make sure you enable the "Ignore HTML tags in this message" checkbox before you hit "Post Message".

          Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic
               2006, 2007

          R 1 Reply Last reply
          0
          • D Dave Kreskowiak

            Repost the code (Copy and Paste) and make sure you enable the "Ignore HTML tags in this message" checkbox before you hit "Post Message".

            Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic
                 2006, 2007

            R Offline
            R Offline
            reykentj
            wrote on last edited by
            #5

            Error 1 Column, parameter, or variable #1: Cannot find data type GL_Record. Public Class GL_Record Public AccountNo As String = "" Public AccountField As String = "" Public Year As Integer = 0 Public Month As Integer = 0 Public YTD As Decimal = 0 Public MTD As Decimal = 0 Public LastTransAmount As Decimal Public LastTransDate As Date = "01/01/01" Public LastTransBy As String = "" Public LastEffectiveDate As Date = "01/01/01" Public NumberOfTrans As Long = 0 End Class _ Public Shared Sub sbSetupGLProbe(ByVal Selections As StoredProcedures.GL_Record) Dim stDocName As String Dim result As Long = 0 On Error GoTo Err_sbSetupGLProbe sbBuildGLQuery(Selections) stDocName = "rptGL_Probe" 'DoCmd.OpenReport(stDocName, acPreview) Exit_sbSetupGLProbe: Exit Sub Err_sbSetupGLProbe: MsgBox(Err.Description) Resume Exit_sbSetupGLProbe End Sub Thank you for that suggestion. This code complies withou error but fails on deployment. rkj

            1 Reply Last reply
            0
            Reply
            • Reply as topic
            Log in to reply
            • Oldest to Newest
            • Newest to Oldest
            • Most Votes


            • Login

            • Don't have an account? Register

            • Login or register to search.
            • First post
              Last post
            0
            • Categories
            • Recent
            • Tags
            • Popular
            • World
            • Users
            • Groups