#Caché

Question: can a business process with pool size > 1 invoke external programs in parallel via $ZF(-100)?

We have a production that takes HL7 (ORU_R01) messages in and produces a PDF from each one for onward transmission to a document store.

s ftp=##class(%Net.FtpSession).%New()

s ok=ftp.Connect(server,user,password,port)
s ftp.Timeout = 100

i ok {

s ok=ftp.SetDirectory(directory)
i ok {
n files,file

s ok=ftp.NameList(directory,.files)
i ok {
f i=1:1:files.Count() {
s file=files.GetAt(i)
i (ftp.SetDirectory(file)) {
d ftp.SetToParentDirectory()
continue
}
s fname=$p(file,"/",$l(file,"/"))

Is it possible to start a terminal attached to a process (JOB)?

For example, I have a 548 process being debugged by VSCODE.

I would like to start a terminal, attached to the process to check process global values ​​by running the command "zw ^||MYGLOBAL"

Hi all,

I am trying to establish an HTTPS connection to a server using a %Net.HttpRequest object. I'm able to ping and curl the server via command line. The issue I am running into is that I am able to establish a connection, but something seems to be going wrong with verification from the server side. For example, if I use the CheckSSLCN method on the server, it returns this error message

ERROR #6155: Unable to verify SSL/TLS connected to correct system as no SSL certificate present for this socket. */

Can %Service_telnet be enabled programmatically? I have the need to enable this feature so that I can automate a script I have for Cache, but unless the telnet service is on, the session cant connect.

Suppose you have routine ^A loaded in your partition in programmer mode and you call routine ^B. Routine ^B finds the value of $ZU(96,9) which should be the calling routine.

But $ZU(96,9) now returns null, as does $SYSTEM.Process.CallingRoutine()

Works on 2018.1.7 but not 2018.1.8

$ROLES= %All on both systems

More precisely I have line label ZZPP in ^%ZLANGC00 which needs to identify the original routine in the partition and do some work on it. When I type ZZPP I get nothing on the later version. Here's the line of code:

I'm trying to open a TCP connection to a remote system. The Caché command I'm using to open the connection is OPEN "|TCP|"_PORT:(IP::"PSE"):10 where PORT is a port number in the range 40000 to 40100 and IP is a standard IPv4 addess like 10.200.100.50
the connection appears to open because $TEST becomes 1.
I'm then writing to the open port with USE "|TCP|"_PORT:(::"S") WRITE "some text",*-3
It's a windows system

Hi ,

I am trying to transform CSV file into SDA3 format by using Studio code. I am getting "No Stream contained in StreamContainer Request" Error at the business operation after converting CSV file to SDA3 Format but not able to generate the file in business operation

Hello everyone, i want to have an InterSystems Caché Installation cache-2017.2.2.865.0-win_x64.exe

Thanks

Hi folks!

I need to change a status database to RW with the class

I used scripts for this, for example, I can create a database like this

setup_database() {
csession -B -U "%SYS" <<-EOF
zw ##class(SYS.Database).CreateDatabase("/InterSystems/cachedb/mydatabase")
set Properties("Directory")="/InterSystems/cachedb/mydatabase"
zw ##Class(Config.Databases).Create("MYDATABASE",.Properties)
halt
EOF

How can I modify this status R/W?

Greetings.

I am working on a demand wheres i need to find all the possible combinations of number contained in a string, its works very well, but when the total numbers is increased bigger, the time to execute the code is increased exponentially. Theres a beter way to find combinations then recursively?

string data:

Can someone point me to learning resources / documentation for Intersystems Terminal? I have scoured YouTube, Intersystems documentation, and the internet. Many of the Object Script commands I found don't work (and that are listed here) do not work in the version of terminal that I have:

https://docs.intersystems.com/ens201817/csp/docbook/DocBook.UI.Page.cls?...

Hi,

in our system we usually display an information if someone locks data that another user tries to edit. Like: "Data locked by <user>/<program>"

We have a global that is set at userlogin with following information:

^BA020(0,3,$job) = "<user>;<program>"

We show that information by getting the jobnr/owner from the locktable ^$LOCK("<ref>","OWNER") and looking at ^BA020.

Hi,

Can anyone please help me to display date field in the format DDMMYYYY which I need single digit date needs to have leading 0 like 01022000.

I tried to-char but leading 0 is not there.

I am writing object script with the help of sql query for generating extracts.

can anyone please help on this.

thanks

jude