go to post Christian Berger · Oct 5, 2024 Hi @Philippe Ebinger, take a look into the %Studio.Project class, there is a method called Export, which gives you exactly what you need on the console like: Set project = ##class(%Studio.Project).%OpenId("MyProject") Do project.Export("MyProject.xml") <Class name="MyProject.M">...</Class> <Project name="MyProject"...</Project> <Class name="MyProject.Pendenz">...</Class> <Class name="MyProject.Protokoll">...</Class>
go to post Christian Berger · Jan 26, 2024 207... 😒 197 if we can get rid of phrase and change return to short quit ClassMethod ToKeyPad(phrase) As %String { S t=$ZCVT(phrase,"U") F i=2:1:9 {F j=1:1:$S("79"[i:4,1:3) S b($C($I(s)+64))=i_j,b(i)=i_j+1} S r="" F i=1:1:$L(t) {S a=$E(t,i) S:a=" " r=r_0 S:"01"[a r=r_a_a F j=1:1:$E($G(b(a)),*) S r=r_$E(b(a))} return r }
