Pieces of experience in InterSystems Technology which solve some particular problem in elegant or unusual way.
The procedure for uploading/downloading from an FTP server is as follows.
1. Upload the image file to the FTP server
set tmpfile="c:\temp\test.jpg"
set ftp=##class(%Net.FtpSession).%New()
// connect to FTP server
do ftp.Connect("","<username>","<password>")
// set transfer mode to BINARY
do ftp.Binary()
// Move to the directory to upload
do ftp.SetDirectory("/temp/upload")
// Prepare a stream of files to upload
set file=##class(%File).%New(tmpfile)
do file.If you want to run an OS executable file, command, or a program created within an InterSystems product when the InterSystems product starts, write the processing in the SYSTEM^%ZSTART routine. (The %ZSTART routine is created in the %SYS namespace).
Before you write any code in SYSTEM^%ZSTART, make sure that it works properly under all conditions.
If the ^%ZSTART routine is written incorrectly, or if it is written correctly but the command does not return a response or an error occurs during processing, InterSystems products may not be able to start.
To disable the timeout, set the query timeout to disabled in the DSN settings:
Windows Control Panel > Administrative Tools > Data Sources (ODBC) > System DSN configuration
If you check Disable query timeout, the timeout will be disabled.
If you want to change it on the application side, you can set it at the ODBC API level.
Set the SQL_ATTR_QUERY_TIMEOUT attribute when calling the ODBC SQLSetStmtAttr function before connecting to the data source.
The TIMESTAMP type corresponds to the %Library.TimeStamp data type (=%TimeStamp) in InterSystems products, and the format is YYYY-MM-DD HH:MM:SS.nnnnnnnnn.
If you want to change the precision after the decimal point, set it using the following method.
1) Set system-wide
Management Portal: [System Administration] > [Configuration] > [SQL and Object Settings] > [General SQL Settings]
Default time precision for GETDATE(), CURRENT_TIME, CURRENT_TIMESTAMP. You can specify the number of digits in the range 0 to 9.
Hi Community,
We're pleased to invite you to the upcoming webinar in Hebrew:
📅 Date & time: May 21st, 3:30 PM IDT
In our previous article, we explored how to send emails through Microsoft 365 using the Graph API. Since then, an anonymous client reached out to me about setting up some other methods of notifications through that API. He was particularly interested in Outlook’s tasks and calendar events.
If you still have your client ID, client secret, and application ID from the last exercise, you may continue utilizing them. We will reuse the globals we stored from before with the GetToken method. Most of the setup in Microsoft Entra will not need to be repeated.
If you change the system date, InterSystems Data Platform (IRIS) may not start properly.
IRIS performs a journal file deletion process when it starts, but if the system date is changed, a journal file with an incorrect date is created. During journal file deletion processing, the process proceeds by referring to the information of the previous and subsequent files recorded inside the journal file.
hi there,
I recently created a shell script to run the integrity check.
I used this as reference - Introduction | InterSystems IRIS Data Platform 2023.3
I found the example from above url having a line - "
kill ^IRIS.TempIntegrityOutput(+$job)it isn't working when I used in a script. it returns the pid of my iris session instead.
I had to simplify the example to run following lines instead -
Do CheckList^Integrity(,,,,5)
do Display^Integrity(,1,)
script runs fine and can see integrity check results as expected.
I came up with a challenge for myself to come up with a way to make a variable watch itself for a certain value and do something when it hits that value without having to check it every time something touches it. Basically, a way to say "if at any point during the execution of this code, if x = 0 (or whatever the condition is) do this thing." The class I ended up with watches a %Status:
Class User.WatchedStatus Extends %RegisteredObject
{
Property sc As %Status [ InitialExpression = 1, SqlComputeCode = {set {*} = ##class(User.WatchedStatus).For naming conventions, please check the respective document pages below.
About table name (class name): Identifier rules and guidelines - classes
About column names (property names): Identifier rules and guidelines - class members
As stated here, only alphanumeric characters and characters with Unicode code points larger than ASCII 128 can be used in column names (property names).
When you run a routine in the terminal and an error occurs in the program, if you have not set the error trap properly, the program will enter debug mode as shown below.
USER>do ^error1
write A
^
a+2^error1 *A
USER 2d0>From this state, enter the Quit command to return to the state before the routine was started.
USER 2d0>QuitIf a transaction is being processed within the routine where the error occurred, a prompt similar to the one below will appear.
Hi developers!
Just want to share an old but always relevant best practice on namespaces changing @Dmitry Maslennikov shared with me (again).
Consider method:
classmethod DoSomethingInSYS() as %Status
{
set sc=$$$OK
set ns=$namespace
zn "%SYS"
// try-catch in case there will be an error
try {
// do something, e.g. config change
}
catch {}
zn ns ; returning back to the namespace we came in the routine
return sc
}And with new $namespace the method could be rewritten as:
classmethod DoSomethingInSYS() as %Status
{
set sc=$$$OK
new $namespace
set $namespace="%SYS"
// do something
return sc
}So! The difference is that we don't need to change the namespace manually as it will be back automatically once we return the method.
and we don't need try-catch (at least for this purpose) too.
InterSystems IRIS family has a nice utility ^SystemPerformance (as known as ^pButtons in Caché and Ensemble) which outputs the database performance information into a readable HTML file. When you run ^SystemPerformance on IRIS for Windows, a HTML file is created where both our own performance log mgstat and Windows performance log are included.
If the journal file is too large to be searched or filtered using the Management Portal, you can refer to it using the following two methods.
① How to use the ^JRNDUMP utility
② How to reference it in a program
================================================== ==========
① Using the ^JRNDUMP utility. For example, if you want to select all records in the journal file that include the global reference ^ABC, do the following:
*Please execute all commands below in the %SYS namespace.
DO SELECT^JRNDUMP("C:\MyCache\mgr\journal\YYYYMMDD.The Web/CSP Gateway management page is typically configured so that it cannot be accessed from client machines.
To access from any client, do the following:
Properties defined in list collections (Property XXX As list of %String;) can be manipulated using SQL functions: $LISTBUILD(), $LISTFROMSTRING().
For each SQL function, please refer to the document page below.
InterSystems SQL Reference - $LISTBUILD() [IRIS]
IRIS SQL Reference - $LISTFROMSTRING() [IRIS]
Caché SQL Reference - $LISTBUILD()
Caché SQL Reference - $LISTFROMSTRING()
/// Class definition example
Class ISJ.ListOfData Extends %Persistent
{
Property listdata As list Of %String;
}An example of SQL statement execution is as follows.
USER>do $systemSQL.HealthShare uses a lot of XSLTs. These are used to convert IHE medical documents to SDA (internal HealthShare format) and back to IHE formats, to create summary reports, and to deal with IHE profiles (e.g., patient information query, document provide and register). Customers may customize the XSLTs to customize reports or for other reasons.
For debugging and development, it is very convenient to be able to run an XSLT from Terminal.
Following is a class that contains a class method that lets you do this on Windows.
Record maps are used to efficiently map files containing delimited records or fixed-width records to message classes used by the interoperability function, and to map files from interoperability function message classes to text files.
Record map mapping definitions can be created using the Management Portal, and we also provide a CSV record wizard that allows you to define while reading a CSV file.
To use a record map in production, just add a record map business service or business operation and specify the record map definition class you created.
.png)
Visual Studio Code (VS Code) is a free source code editor made by Microsoft for Windows, Linux, and macOS. It provides built-in support for JavaScript, TypeScript, and Node.js. You can add extensions to provide support for numerous other languages including ObjectScript.
The InterSystems extensions enable you to use VS Code to connect to an InterSystems IRIS server and develop code in ObjectScript. The Visual Studio Code Documentation is an excellent resource on VS Code, so it is a good idea to be familiar with it.
You can use the %IndexBuilder class to perform index rebuilding using multiple processes.
Here is an example for the purpose of defining the standard index HomeStateIdx for the Home_State (state information of contact address) column of Sample.Person.
The steps are as follows:
1. Hide the index name to be added/rebuilt from the query optimizer.
>write $system.SQL.SetMapSelectability("Sample.Person","HomeStateIdx",0)
12. Add %IndexBuilder to the rightmost superclass of the class definition that defines the new index.
The objective of the article is to provide the reader with the following informations:
Schema of the article:
Global mappings can be registered using the system class Config.MapGlobals.
The method to globally map ^Sample.PersonD in a database SAMPLES other than the default database from the namespace USER is as follows (example executed in a terminal).
USER>zn "%SYS"
%SYS>set ns="USER"
%SYS>set glo="Sample.PersonD"
%SYS>set vals("Database")="SAMPLES"
%SYS>set st=##class (Config.MapGlobals).Create(ns,glo,.vals)The third argument of the Create() method of the Config.MapGlobals class is passed by reference, so specify it by appending a period (.) to the variable name.
I want to address the nasty problems about reading a flat text in ASCII, UTF*
explicitly excluding HTML, EBCDIC, and other encoding.
According to Wikipedia there are at least 8 variations of control characters.
As you can deduct from the names the inspiration comes from mechanical typewriters.
In IRIS* similar as in Caché or Ensemble or .
To remove InterSystems products installed on your Windows system, use Add or Remove Programs in Control Panel (in Windows 10, select Apps from Windows Settings).
Since we will be making changes to the system, you will need to log in as a user with administrator privileges.
1) Log in to the system as an administrator.
2) From the system tray, exit the launcher of the InterSystems product instance you want to uninstall (click launcher → exit).
“I have been waiting for thirty seconds for service. This is outrageous! I am leaving!”
“I am very sorry to hear that, sir. Perhaps, next time, you should make a reservation.”
If you heard that comment at your favorite restaurant, you would think the person saying it was being ridiculous. However, in the context of your API, it makes perfect sense. Just like your favorite eatery, your API has some regular patrons who, as you know, will be visiting one day or another. It would be great to be able to make a standing reservation for them as well.
It will involve a couple of IRIS fundamentals.
The $ZF(-100) command is used in the following format.
$ZF(-100, flags, command name, command arguments)The "/shell" flag is required when running OS commands.
For example, use mkdir like this:
// mkdir C:\temp\newdir
Write $ZF(-100, "/shell", "mkdir", "C:\temp\newdir")
If a command has multiple arguments, enclose them in double quotes and separate them with commas, as in the example below.
// move C:\temp\a.txt C:\temp\a2.txt
Write $ZF(-100, "/shell", "move", "C:\temp\a.txt", "C:\ temp\a2.If the system does not stop for 24 hours, old journal files will be deleted at 0:30 according to the "Journal file deletion settings".
A possible cause of journal files remaining that are older than the "Journal file deletion settings" is that there are transactions that remain open.
In that case, you will be able to delete the journal file by searching for processes executing transactions and finalizing the transactions.
The sample below checks for the existence of open transactions, and if they exist, outputs the target file name and journal record information.
If you need to migrate your server for some reason, you can reduce the setup work by copying configuration information from the pre-migration environment to the post-migration environment.
The following setting information can be migrated.
Note 1: If a password has been set, only the password needs to be reset manually.
Note 2: Preferred connection server settings such as ^%ZSTART, ^ZMIRROR routines, etc.
What comes to the data platform (not the user facing application) most of the the events of interest/required are available as predefined system audit events in audit log - out of the box. They just need to be enabled.
This error occurs when an instance of the class is already open at compile time.
There are two ways to deal with this issue:
If you want to determine which process is using the class, try the sample routine below.
/// Test.