ORA-08002: 尚未在這個階段作業中定義序列 CS_ADDRESS_SEQ.CURRVAL，一个比较奇怪的现象，请高手指教

我在写asp.net中遇到的问题，单步执行是好的，程序连起来运行就提示这个错误，请高手指教。 strsql = "Insert Into cs_address (cs_address_id,county,town,zip_code,village,address_type,address_name,section,area,lane,alley, " _
               & "NO,NO_Z,other,contact,contact_phone,user_name,Insert_date,cs_re,matched) valueS (cs_address_seq.nextval,'" & Session("county") _
               & "','" & Session("town") & "','" & GetZIP_Code(Session("county"), Session("town")) & "','" & Session("village") & "','" _
               & Session("address_type") & "','" & Session("address_name") & "','" & Session("section") & "','" & Session("area") & "','" _
               & Session("lane") & "','" & Session("alley") & "'," & Val(Session("NO")) & "," & Val(txtNO_Z.Text) & ",'" & UCase(Trim(txtOther.Text)) & "','" _
               & txtContact.Text & "','" & txtContact_phone.Text & "','" & Session("user_name") & "',sysdate,'" & txtRe.Text & "','FALSE')"        iresult = ExecuteSQL(strsql, Application("ConnectionString"))
        If iresult = 1 Then
            For i = 0 To lstServiceType_Selected.Items.Count - 1
                If strservice_type = "" Then
                    strservice_type = lstServiceType_Selected.Items(i).Text
                Else
                    strservice_type = strservice_type & "," & lstServiceType_Selected.Items(i).Text
                End If            Next            If ExecuteSQL("Insert Into cs_addr_reqprod(CS_REQUEST_ID,CS_ADDRESS_ID,CS_SERVICE_TYPE) VALUES(CS_REQUEST_SEQ.NEXTVAL,CS_ADDRESS_SEQ.CURRVAL,'" _
               & strservice_type & "')", Application("ConnectionString")) = 1 Then
                Response.Redirect("..\\QUERY\AddressInfo_cs.aspx")
            End If
        End If在取当前CS_ADDRESS_SEQ.CURRVAL的时候出错，oracle在取CS_ADDRESS_SEQ.CURRVAL的时候，必须先执行select CS_ADDRESS_SEQ.nextVAL from dual;才可以执行select CS_ADDRESS_SEQ.currVAL from dual得到当前得值，在我的代码中为什么单步执行可以通过，连起来运行程序的出错，请高手帮忙解释原因。