amsCommitArtifact
Commit an Artifact Change to the AMS

Description

Commits an update to an artifact made by amsUpdateArtifact to the AMS. The commit must be approved before it is available in the AMS.

Usage

amsCommitArtifact(artCheckoutObj, checkedOutArtifactId = NULL,
    checkoutId = NULL, commitMessage = "Artifact Commit Message",
    uncheckout=TRUE, url, apiToken, port = 2185)

Arguments

artCheckoutObj an object returned by amsCheckoutArtifact. This object contains the necessary IDs for checking in the new artifact update.
checkedOutArtifactId the entityId of the checked-out artifact. This ID can be found in the artCheckoutObj and does not need to be specified if the artCheckoutObj is given.
checkoutId the entityId of the check out. This ID can be found in the artCheckoutObj and does not need to be specified if the artCheckoutObj is given.
commitMessage an character string specifying the commit message.
uncheckout a logical value. If TRUE (the default), then the artifact is unchecked out after the commit is made.
url the URL for the AMS. The default is the cached value saved when amsLogin was called.
apiToken a character value. The API token to connect to the AMS. The default is the cached value created when amsLogin was called.
port an numeric value. The port for connecting to the AMS. The default is the cached value saved when amsLogin was called.
Value
returns a list with components:
body a character vector with the body of the results from the connection to the AMS. This character vector is in JSON format.
status an integer representing the return code from the connection to the AMS. A value of 200 indicates a successful operation.
headers a character vector containing the headers returned from the connection to the AMS.
See Also
amsCheckoutArtifact, amsUpdateArtifact
Examples
## Not run: 
amsLogin("http://localhost", "fakeuser", "fakepassword")
projTable <- amsListProjects()
zlist_art <- amsListArtifacts(projTable[1, "projectName"])
zcheckout <- amsCheckoutArtifact(zlist_art[1, "path"],
  projTable[1, "projectName"])
newObj <- t.test(runif(13)) 
zupdate <- amsUpdateArtifact(newObj, zcheckout, artDesc="Now a t-test object")
zcommit <- amsCommitArtifact(zcheckout,
  commitMessage="Changed to a t-test object") 
## End(Not run)
Package AMS version 6.1.1-7
Package Index