let know the source code to fetch files from git hub repository..while running the attached file we are getting error. ERROR #5001: Repository doesn't exist OR you don't have accesscoming1 1
Please help us to resolve the error.
Please find the code used :
Class Util.download Extends %Persistent
{
ClassMethod Update(Owner As %String, Repository As %String, Branch As %String = "", Username As %String, Password As %String, Namespace = {$Namespace}) As %Status
{
write ! , Username
write ! , Password
Set req = ..CreateRequest(Username, Password)
write !,req
//Set req.Location = "repos/" _ Owner _ "/" _ Repository _ "/contents" // as described in https://developer.github.com/v3/repos/
set req.Location = "http://github.com/vadsamm/sam.git"
//set req.Location = ""
//Do:(Branch'="") req.SetParam("ref",Branch) // if omitted the repository’s default branch (usually master) would be used
Set links = ##class(%ListOfDataTypes).%New()
//Set st = ..ProcessDirectory("",req,.links)
//write !,"coming1 "_$system.Status.DisplayError(st)
// Return:$$$ISERR(st) st
write !,"coming2"
Set namespace = $Namespace
Zn Namespace
Set st = ..DownloadFiles(links,req,.list)
Set st2 = $system.OBJ.CompileList(.list,"cuk /checkuptodate=expandedonly")
Zn namespace
WRITE !,st
WRITE !,st2
Return $$$ADDSC(st, st2)
}
/**
Process one directory of GitHub repository. Recursive.
