Advertisement
bluebunny72

Form Script to retrieve return value from SP!

Jan 11th, 2017
209
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VB.NET 1.18 KB | None | 0 0
  1. ALTER PROCEDURE [dbo].[ILC_GetJobOrderCustomerOrderSp]
  2.       @JoNum            JobType
  3.      ,@JoSuffix         SuffixType
  4.      ,@CoNum            CoNumType = NULL OUTPUT
  5.      ,@CoLine           CoLineType = NULL OUTPUT
  6.      ,@CoRelease        CoReleaseType = NULL OUTPUT
  7.      ,@CoWhse           WhseType = NULL OUTPUT
  8. AS ...
  9.  
  10.  
  11.  
  12.                 Dim invokeResponse As InvokeResponseData
  13.  
  14.                 job = ThisForm.PrimaryIDOCollection.CurrentItem("Job").GetValue(Of String)()
  15.                 suffix = ThisForm.PrimaryIDOCollection.CurrentItem("Suffix").GetValue(Of Integer)()
  16.  
  17.                 ' call ido method...
  18.                 'invokeResponse = Me.IDOClient.Invoke("ILC_SLCos", "ILC_GetJobOrderCustomerOrderSp", New Object() {job, suffix, Nothing, Nothing, Nothing, Nothing})
  19.  
  20.                 ' use SP! instead...
  21.                 invokeResponse = Me.IDOClient.Invoke("SP!", "ILC_GetJobOrderCustomerOrderSp", New Object() {job, suffix, Nothing, Nothing, Nothing, Nothing})
  22.  
  23.                 co = invokeResponse.Parameters(2).Value
  24.                 coLine = invokeResponse.Parameters(3).GetValue(Of Integer)()
  25.                 coRelease = invokeResponse.Parameters(4).GetValue(Of Integer)()
  26.                 coWhse = invokeResponse.Parameters(5).Value
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement