go to post Sergey Mikhailenko · Mar 22, 2021 If you use zapm, then even more information is available.zapm:%SYS>find * -d Module based zpmshow 1.0.2 Desc: from module.xml: Helper to Search, Install, Uninstall ZPM packages https://github.com/rcemper/zpmshow/Thanks Robert.
go to post Sergey Mikhailenko · Mar 16, 2021 If your projects have a Description attribute in the module, please republish anyway. There was a crash and some Descriptions were not included in the register.
go to post Sergey Mikhailenko · Feb 21, 2021 Oh, how unexpected! Let's cut it down a bit to get another nice number of characters. zn "%SYS",n="SL" d:'##class(Security.SSLConfigs).Exists(n) ##class(Security.SSLConfigs).Create(n) s u="https://pm.community.intersystems.com/packages/zpm/latest/installer" D ##class(%Net.URLParser).Parse(u,.c) s h=##class(%Net.HttpRequest).%New(),h.Server=c("host"),h.Port=443,h.Https=1,h.SSLConfiguration=n,s=h.Get(c("path")) q:'s $System.Status.GetErrorText(s) s x=##class(%File).TempFilename("xml"),f=##class(%Stream.FileBinary).%New(),f.Filename=x d f.CopyFromAndSave(h.HttpResponse.Data) d h.%Close(),$system.OBJ.Load(x,"ck") do ##class(%File).Delete(x)
go to post Sergey Mikhailenko · Nov 9, 2020 Hey.It's easier ?```ClassMethod setValue(params...) As %Status{ quit:params<2 0 s name="%session.Data" for i=1:1:params-1 set:$GET(params(i))'="" name=$NA(@name@(params(i))) set @name=params(params) quit $$$OK}```
go to post Sergey Mikhailenko · Oct 12, 2020 I really like the opportunity to see which modules are installed in which namespaces. And quickly go there without leaving the shell of the ZPM. zpm: USER>help zn namespace [<name>] Alias: zn See list modules in namespace and go to the namespace Arguments name Name namespace, * or context name* Examples zn * Show all modules in all namespaces zn sql* Show all modules in namespaces by context
go to post Sergey Mikhailenko · Sep 30, 2020 Hi, BobIt may be easier to make an analogue of ^% G ?Something like this:```ClassMethod AlterG(gn = "", Output rep) As %Status{ OPEN 2:$job USE 2 zwrite @gn ; CLOSE 2 set i="",rep="" for { set i=$order(^SPOOL($job,i),1,s) quit:i="" set rep=rep_s } KILL ^SPOOL($job)}
