Off to a summer holiday until 22nd of August.
Example on using NAV Web Service in NAV C/Side
Some of our clients are using LS Retail.That solution supports stand-alone POS terminals that are running Microsoft Dynamics NAV. It is therefore easy to allow these terminals to be used also as a punch clock.
This punch clock starts up a background process to handle synchronization via web services. Attached is a demo c/side code on how the web services are consumed.
Example on using NAV Web Service in Visual Studio vb.net
This is using the web service in my previous post. In Visual Studio I start by adding the web reference. Select Project -> Add Service Reference
Then select Advanced…
Then Add Web Reference…
Where I insert URL encoded string for the published codeunit including the company name.
I created a form with a listbox object and a button. I used this code to insert all employee no’s into the listbox.
[code htmlscript=”false” lang=”vb”]Public Class Form1
Dim ClockID As String
Dim Success As Boolean
Dim DefCred As Boolean
Dim ResponseMessage As String
‘The Web Service
Dim NAVPunch1 As New WebService.NAVPunch
‘New set of credentials
Dim User As New System.Net.NetworkCredential
Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles MyBase.Load
If DefCred Then
NAVPunch1.UseDefaultCredentials = True
NAVPunch1.Url = ""
Else
User.Domain = ""
User.UserName = ""
User.Password = ""
NAVPunch1.Credentials = User
NAVPunch1.Url = ""
End If
ClockID = "{4A212826-CAF3-4E3C-9D97-6923A692A209}"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles Button1.Click
‘ Get Employee List
ResponseMessage = ""
ListBox1.Items.Clear()
Dim EmployeeList As New WebService.EmployeeList
Try
Success = NAVPunch1.GetClockEmployees(ClockID, _
EmployeeList, _
ResponseMessage)
CheckBox1.Checked = Success
TextBox1.Text = ResponseMessage
If Success Then
For Each Employee In EmployeeList.Employee
ListBox1.Items.Add(Employee.No)
Next
End If
Finally
End Try
End Sub
End Class[/code]
Creating Web Services in NAV 2009
I have been working on NAV Time Registration and the solution is almost ready. The last step was to create a web service that supports stand-alone punching clocks, both in .net c# and also as a NAV client.
The web service is a standard codeunit with functions. I make sure the functions that are not to be published have the Local property set to Yes.
Using XMLport in web services requires a few parameter changes. First I include them in the function parameters. I use a boolean parameter in Return Value as a success flag.
Then in XMLport properties I change direction to export, change format to XML and select to use default namespace.
The C/Side code to answer this web service is.
[code htmlscript=”false”]IF NOT ValidateClockID(ClockID,ResponseMessage) THEN BEGIN
InsertLog(ClockID,Log.GetEmployeeList,FALSE,ResponseMessage,”);
EXIT(FALSE);
END;
IF NOT CreateEmployeeBuffer(EmployeeBuffer,ResponseMessage) THEN BEGIN
InsertLog(ClockID,Log.GetEmployeeList,FALSE,ResponseMessage,”);
EXIT(FALSE);
END;
EmployeeList.SetEmployeeList(PunchClock.Code,EmployeeBuffer);
ResponseMessage := Text033;
InsertLog(ClockID,Log.GetEmployeeList,TRUE,”,”);
EXIT(TRUE);[/code]
Then finally I run form 860, Web Services and add a line for this web service to be published.
Next post is a demonstration on how to use this web service. I used Freddys multiple service tier post in my developement enviroment to setup NAV services.