|
2 | 2 | <Export generator="Cache" version="25" zv="Cache for Windows (x86-64) 2015.2 (Build 540)" ts="2015-04-28 19:50:48"> |
3 | 3 | <Class name="UMLExplorer.ClassView"> |
4 | 4 | <Description> |
| 5 | +Cache UML Explorer vX.X.X/*build.replace:pkg.version*/ |
5 | 6 | Class contains methods that return structured classes/packages data.</Description> |
6 | | -<TimeChanged>63686,85630.818189</TimeChanged> |
| 7 | +<TimeChanged>63690,48954.853237</TimeChanged> |
7 | 8 | <TimeCreated>63653,67019.989197</TimeCreated> |
8 | 9 |
|
9 | 10 | <Method name="getClassTree"> |
@@ -302,11 +303,74 @@ Returns structured package data</Description> |
302 | 303 | </Class> |
303 | 304 |
|
304 | 305 |
|
305 | | -<Project name="UMLExplorer" LastModified="2015-05-15 00:57:01.855062"> |
| 306 | +<Class name="UMLExplorer.WebAppInstaller"> |
| 307 | +<Super>%Projection.AbstractProjection</Super> |
| 308 | +<TimeChanged>63696,65168.289869</TimeChanged> |
| 309 | +<TimeCreated>63696,64041.85537</TimeCreated> |
| 310 | + |
| 311 | +<Projection name="Reference"> |
| 312 | +<Type>WebAppInstaller</Type> |
| 313 | +</Projection> |
| 314 | + |
| 315 | +<Method name="CreateProjection"> |
| 316 | +<Description> |
| 317 | +This method is invoked when a class is compiled.</Description> |
| 318 | +<ClassMethod>1</ClassMethod> |
| 319 | +<FormalSpec><![CDATA[cls:%String,¶ms]]></FormalSpec> |
| 320 | +<ReturnType>%Status</ReturnType> |
| 321 | +<Implementation><![CDATA[ |
| 322 | + set ns = $NAMESPACE |
| 323 | + zn:ns'="%SYS" "%SYS" |
| 324 | + do ##class(Security.System).GetInstallationSecuritySetting(.security) |
| 325 | + if (security="None") { |
| 326 | + set cspProperties("AutheEnabled") = 64 // Unauthenticated |
| 327 | + } else { |
| 328 | + set cspProperties("AutheEnabled") = 32 // Password |
| 329 | + } |
| 330 | + set cspProperties("NameSpace") = ns |
| 331 | + set cspProperties("Description") = "A WEB application for Cache UML Explorer." |
| 332 | + set cspProperties("IsNameSpaceDefault") = 1 |
| 333 | + set cspProperties("DispatchClass") = "UMLExplorer.Router" |
| 334 | + if ('##class(Security.Applications).Exists("/UMLExplorer")) { |
| 335 | + w !, "Creating WEB application ""/UMLExplorer""..." |
| 336 | + set tSC = ##class(Security.Applications).Create("/UMLExplorer", .cspProperties) |
| 337 | + if $$$ISERR(tSC) throw ##class(%Installer.Exception).CreateFromStatus(tSC) |
| 338 | + w !, "WEB application ""/UMLExplorer"" created." |
| 339 | + } else { |
| 340 | + w !, "WEB application ""/UMLExplorer"" already exists, so it is ready to use." |
| 341 | + } |
| 342 | + zn:ns'="%SYS" ns |
| 343 | + quit $$$OK |
| 344 | +]]></Implementation> |
| 345 | +</Method> |
| 346 | + |
| 347 | +<Method name="RemoveProjection"> |
| 348 | +<Description> |
| 349 | +This method is invoked when a class is 'uncompiled'.</Description> |
| 350 | +<ClassMethod>1</ClassMethod> |
| 351 | +<FormalSpec><![CDATA[cls:%String,¶ms,recompile:%Boolean]]></FormalSpec> |
| 352 | +<ReturnType>%Status</ReturnType> |
| 353 | +<Implementation><![CDATA[ |
| 354 | + set ns = $NAMESPACE |
| 355 | + zn:ns'="%SYS" "%SYS" |
| 356 | + if (##class(Security.Applications).Exists("/UMLExplorer")) { |
| 357 | + w !, "Deleting WEB application ""/UMLExplorer""..." |
| 358 | + do ##class(Security.Applications).Delete("/UMLExplorer") |
| 359 | + w !, "WEB application ""/UMLExplorer"" was successfully removed." |
| 360 | + } |
| 361 | + zn:ns'="%SYS" ns |
| 362 | + QUIT $$$OK |
| 363 | +]]></Implementation> |
| 364 | +</Method> |
| 365 | +</Class> |
| 366 | + |
| 367 | + |
| 368 | +<Project name="UMLExplorer" LastModified="2015-05-24 18:07:22.008232"> |
306 | 369 | <Items> |
307 | 370 | <ProjectItem name="UMLExplorer.ClassView" type="CLS"></ProjectItem> |
308 | 371 | <ProjectItem name="UMLExplorer.Router" type="CLS"></ProjectItem> |
309 | 372 | <ProjectItem name="UMLExplorer.StaticContent" type="CLS"></ProjectItem> |
| 373 | + <ProjectItem name="UMLExplorer.WebAppInstaller" type="CLS"></ProjectItem> |
310 | 374 | </Items> |
311 | 375 | </Project> |
312 | 376 |
|
|
0 commit comments