Sylvain Guilbaud SylvainGuilbaud
SylvainGuilbaud
/ large.utils.cls
Created
July 31, 2023 14:46
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Class large.utils | |
| { | |
| ClassMethod init(nb As %Integer = 10, max As %Integer = 100) As %Status | |
| { | |
| set sc = $$$OK | |
| set serialclass = "large.serial" _ max | |
| if ##class(%Dictionary.ClassDefinition).%ExistsId(serialclass) { |
SylvainGuilbaud
/ swagger-common.yaml
Created
September 9, 2022 15:12
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| info: | |
| title: '' | |
| description: '' | |
| version: '' | |
| x-ISC_Namespace: IRISAPP | |
| host: "localhost" | |
| basePath: /common | |
| paths: | |
| /: | |
| get: |
SylvainGuilbaud
/ admin.utils.cls
Last active
April 20, 2022 16:27
post upgrade tasks to run after upgrading InterSystems IRIS (or Caché, Ensemble)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Class admin.utils | |
| { | |
| ClassMethod upgrade(verbose As %Boolean = 0) As %Status | |
| { | |
| set ns=$Namespace | |
| // Stopping all productions | |
| do ..stopAllProductions(verbose) | |
| zn "%sys" |
SylvainGuilbaud
/ data.archive.person.cls
Last active
February 21, 2022 14:33
How to efficiently store historical data, similar to current data, without mixing physical storage ?
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Class data.archive.person Extends (%Persistent, data.current.person) | |
| { | |
| Parameter DEFAULTGLOBAL = "^off.person"; | |
| /// Description | |
| ClassMethod archive(purgeArchive As %Integer = 0, purgeSource As %Integer = 0) As %Status | |
| { | |
| set sc = $$$OK , tableName = "" | |
| set (archived,archivedErrors, severity) = 0 |