Info Requested: SOAPClient Integration with JIRA

Hi,

I am trying to create a JIRA using VBA. I am stuck at the creation step. Can anyone please guide me a bit on the same.

I have used the below sample code to create a JIRA. But I am stuck at the very last step while using the command createIssue.

Dim token As Variant
Dim newissue, updateissue As Variant
Dim issuemap As Variant

Dim b As Boolean

Dim SoapClient
Set SoapClient = CreateObject("MSSOAP.SoapClient30")
SoapClient.mssoapinit ("https://issuetracking.company.net/jira15/rpc/soap/jirasoapservice-v2?wsdl")
'token = SoapClient.LogIn("jirauser", "jira")

If Err <> 0 Then
wscript.echo "initialization failed " + Err.Description
End If

Dim new_xmlText, update_xmlText As String

new_xmlText = "<root>" & _
"<assignee>" & "USER" & "</assignee>" & _
"<project>" & "PROJECTNAME" & "</project>" & _
"<type>" & "Defect" & "</type>" & _
"<summary>" & "TestProject" & "</summary>" & _
"<priority>" & "High" & "</priority>" & _
"</root>"

Dim new_xmlDoc As New MSXML2.DOMDocument30

new_xmlDoc.async = False
new_xmlDoc.LoadXML (new_xmlText)
If (new_xmlDoc.parseError.ErrorCode <> 0) Then
Dim myErr
Set myErr = new_xmlDoc.parseError
MsgBox (myErr.reason)
GoTo MyEnd
Else
End If

Dim update_xmlDoc As New MSXML2.DOMDocument30

update_xmlDoc.async = False
update_xmlDoc.LoadXML (new_xmlText)
Dim new_XMLNodeList As MSXML2.IXMLDOMNodeList
Dim new_root As MSXML2.IXMLDOMElement
Set new_root = new_xmlDoc.DocumentElement
Set new_XMLNodeList = new_root.ChildNodes
Dim FieldValues(1 To 1) As MSXML2.IXMLDOMNodeList
Dim update_XMLNodeList As MSXML2.IXMLDOMNodeList
Dim update_root As MSXML2.IXMLDOMElement
Set update_root = update_xmlDoc.DocumentElement
Set update_XMLNodeList = update_root.ChildNodes
Set FieldValues(1) = update_XMLNodeList
Set updateissue = SoapClient.createIssue(token, update_XMLNodeList)

I get a runtime automation error at the last step

Can you please help me out by pointing out where I might have gone wrong? I have googled the stuff quite a bit but to no avail. Thanks.

1 answer

This widget could not be displayed.

Suggest an answer

Log in or Sign up to answer
Community showcase
Posted Tuesday in Jira

What modern development practices are at the heart of how your team delivers software?

Hey Community mates! Claire here from the Software Product Marketing team. We all know software development changes rapidly, and it's often tough to keep up. But from our research, we've found the h...

84 views 0 1
Join discussion

Atlassian User Groups

Connect with like-minded Atlassian users at free events near you!

Find a group

Connect with like-minded Atlassian users at free events near you!

Find my local user group

Unfortunately there are no AUG chapters near you at the moment.

Start an AUG

You're one step closer to meeting fellow Atlassian users at your local meet up. Learn more about AUGs

Groups near you