title: ORA-00936: missing expression vb.net - oracle
body: <p>I am trying to insert a record into an oracle database and the code is as follows:
  I am getting ORA-00936: </p>
  
  <blockquote>
    <p>missing expression at  Dim t1 As Integer = cmd3.ExecuteNonQuery().</p>
  </blockquote>
  
  <p>I have checked 3 times and I am sure I am not missing any variable. Please help! :(</p>
  
  <pre><code>Dim cmd3 As New OracleCommand
                  cmd3.Connection = conn
                  Dim timepara As String = Now.Hour &amp; Now.Minute &amp; Now.Second &amp; Now.Millisecond
                  cmd3.CommandText = "INSERT INTO d009040 (LBRCODE,ENTRYDATE,BATCHCD,SETNO,SCROLLNO,MAINSCROLLNO,POSTDATE,FEFFDATE,ACTIVITYTYPE,CASHFLOWTYPE,VALUEDATE,BOOKTYPE,DRCR,VCRACCTID,MAINACCTID,MAINMODTYPE,VCRMODTYPE,TRNCURCD,FCYTRNAMT,LCYCONVRATE,LCYTRNAMT,INSTRBANKCD,INSTRBRANCHCD,INSTRTYPE,INSTRNO,INSTRDATE,TOKENNO,PARTICULARS,SYSGENVCR,SHTOTFLAG,SHCLRFLAG,ACTOTFLAG,ACCLRFLAG,MAKER,MAKERDATE,MAKERTIME,CHECKER1,CHECKER2,CHECKER3,CHECKER4,CHECKERDATE,CHECKERTIME,NOAUTHPENDING,NOAUTHOVER,POSTFLAG,AUTHFLAG,FEFFFLAG,CANCELEDFLAG,POSTAUTHFEFFCNCL,UPDTCHKID,PARTCLEARAMT,POSTTIME) VALUES (@LBRCODE,@ENTRYDATE,@BATCHCD,@SETNO,@SCROLLNO,@MAINSCROLLNO,@POSTDATE,@FEFFDATE,@ACTIVITYTYPE,@CASHFLOWTYPE,@VALUEDATE,@BOOKTYPE,@DRCR,@VCRACCTID,@MAINACCTID,@MAINMODTYPE,@VCRMODTYPE,@TRNCURCD,@FCYTRNAMT,@LCYCONVRATE,@LCYTRNAMT,@INSTRBANKCD,@INSTRBRANCHCD,@INSTRTYPE,@INSTRNO,@INSTRDATE,@TOKENNO,@PARTICULARS,@SYSGENVCR,@SHTOTFLAG,@SHCLRFLAG,@ACTOTFLAG,@ACCLRFLAG,@MAKER,@MAKERDATE,@MAKERTIME,@CHECKER1,@CHECKER2,@CHECKER3,@CHECKER4,@CHECKERDATE,@CHECKERTIME,@NOAUTHPENDING,@NOAUTHOVER,@POSTFLAG,@AUTHFLAG,@FEFFFLAG,@CANCELEDFLAG,@POSTAUTHFEFFCNCL,@UPDTCHKID,@PARTCLEARAMT,@POSTTIME)"
                  'myCommand.Parameters[0].Value = 60; 
                  ''110','15-MAR-12','TR-MOBDS','5','5','5','15-MAR-12','15-MAR-12','CR','CR','15-MAR-12','ZZ','C','DS      000000000000240700000000','DS      000000000000240700000000','47','47','INR','100','1','100','0','0','99','000000000000','15-MAR-12','0','DDS CR. From Agent','1','Y','Y','Y','Y','0','15-MAR-12','12203130','0','0','0','0','15-MAR-12','12203130','0','1','P','A','F','0','0','0','0','12203130')"
                  cmd3.Prepare()
                  datepara = Date.Now.ToString("dd-MMM-yy")
                  'myCommand1.Parameters.Add("deptno", 20) 
                  cmd3.Parameters.Add("@LBRCODE", lbr)
                  cmd3.Parameters.Add("@ENTRYDATE", datepara)
                  cmd3.Parameters.Add("@BATCHCD", "TR-MOBDS")
                  cmd3.Parameters.Add("@SETNO", k)
                  cmd3.Parameters.Add("@SCROLLNO", k)
                  cmd3.Parameters.Add("@MAINSCROLLNO", k) 'VALUEDATE,BOOKTYPE,DRCR,VCRACCTID,MAINACCTID,MAINMODTYPE,VCRMODTYPE,TRNCURCD,FCYTRNAMT,
                  cmd3.Parameters.Add("@POSTDATE", datepara)
                  cmd3.Parameters.Add("@FEFFDATE", datepara)
                  cmd3.Parameters.Add("@ACTIVITYTYPE", "CR")
                  cmd3.Parameters.Add("@CASHFLOWTYPE", "CR")
                  cmd3.Parameters.Add("@VALUEDATE", datepara)
                  cmd3.Parameters.Add("@BOOKTYPE", "ZZ")
                  cmd3.Parameters.Add("@DRCR", "C") 'LCYCONVRATE,LCYTRNAMT,INSTRBANKCD,INSTRBRANCHCD,INSTRTYPE,INSTRNO,INSTRDATE,TOKENNO,
                  cmd3.Parameters.Add("@VCRACCTID", internalaccount)
                  cmd3.Parameters.Add("@MAINACCTID", internalaccount)
                  cmd3.Parameters.Add("@MAINMODTYPE", "47")
                  cmd3.Parameters.Add("@VCRMODTYPE", "47")
                  cmd3.Parameters.Add("@TRNCURCD", "INR")
                  cmd3.Parameters.Add("@FCYTRNAMT", amount)
                  cmd3.Parameters.Add("@LCYCONVRATE", "1")
                  cmd3.Parameters.Add("@LCYTRNAMT", amount)
                  cmd3.Parameters.Add("@INSTRBANKCD", "0")
                  cmd3.Parameters.Add("@INSTRBRANCHCD", "0")
                  cmd3.Parameters.Add("@INSTRTYPE", "99")
                  cmd3.Parameters.Add("@INSTRNO", "000000000000")
                  cmd3.Parameters.Add("@INSTRDATE", datepara)
                  cmd3.Parameters.Add("@TOKENNO", "0") 'PARTICULARS,SYSGENVCR,SHTOTFLAG,SHCLRFLAG,ACTOTFLAG,ACCLRFLAG,MAKER,MAKERDATE,MAKERTIME,
                  cmd3.Parameters.Add("@PARTICULARS", "DDS CR. From Agent")
                  cmd3.Parameters.Add("@SYSGENVCR", "1")
                  cmd3.Parameters.Add("@SHTOTFLAG", "Y")
                  cmd3.Parameters.Add("@SHCLRFLAG", "Y")
                  cmd3.Parameters.Add("@ACTOTFLAG", "Y")
                  cmd3.Parameters.Add("@ACCLRFLAG", "Y")
                  cmd3.Parameters.Add("@MAKER", "0") 'CHECKER1,CHECKER2,CHECKER3,CHECKER4,CHECKERDATE,CHECKERTIME,NOAUTHPENDING,
                  cmd3.Parameters.Add("@MAKERDATE", datepara)
                  cmd3.Parameters.Add("@MAKERTIME", Now.Hour &amp; Now.Minute &amp; Now.Second &amp; Now.Millisecond)
                  cmd3.Parameters.Add("@CHECKER1", "0")
                  cmd3.Parameters.Add("@CHECKER2", "0")
                  cmd3.Parameters.Add("@CHECKER3", "0")
                  cmd3.Parameters.Add("@CHECKER4", "0") 'NOAUTHOVER,POSTFLAG,AUTHFLAG,FEFFFLAG,CANCELEDFLAG,POSTAUTHFEFFCNCL,UPDTCHKID,PARTCLEARAMT,POSTTIME
                  cmd3.Parameters.Add("@CHECKERDATE", datepara)
                  cmd3.Parameters.Add("@CHECKERTIME", Now.Hour &amp; Now.Minute &amp; Now.Second &amp; Now.Millisecond)
                  cmd3.Parameters.Add("@NOAUTHPENDING", "0")
                  cmd3.Parameters.Add("@NOAUTHOVER", "1")
                  cmd3.Parameters.Add("@POSTFLAG", "P")
                  cmd3.Parameters.Add("@AUTHFLAG", "A")
                  cmd3.Parameters.Add("@FEFFFLAG", "F")
                  cmd3.Parameters.Add("@CANCELEDFLAG", " ") 'UPDTCHKID,PARTCLEARAMT,POSTTIME
                  cmd3.Parameters.Add("@POSTAUTHFEFFCNCL", "0")
                  cmd3.Parameters.Add("@UPDTCHKID", "0")
                  cmd3.Parameters.Add("@PARTCLEARAMT", "0")
                  cmd3.Parameters.Add("@POSTTIME", Now.Hour &amp; Now.Minute &amp; Now.Second &amp; Now.Millisecond)
  
  
  
                  Dim str As String = cmd3.CommandText
                  cmd3.CommandType = CommandType.Text
                  Try
                      Dim t1 As Integer = cmd3.ExecuteNonQuery()
                  Catch ex As Exception
                      msg(ex.ToString)
                  End Try
  </code></pre>