All
Accepted answers
Robert Cemper · Jun 23, 2020 go to post

The most simple way to do it:
in  class Table.A have 
       Property TableB as Table.B;
in  class Table.B have
                  Property TableA as Table.A;

in your code it may look like this:

set objA=##class(Table.A).%OpenId(212)
set objB=##class(Table.B).%OpenId(99)
set objA.TableB=objB
set objB.TableA=objA
do objA.%Save(), objB.%Save()

You are free to index properties TableA or TableB according to your needs
and you can also use Implicit JOIN between these tables.  

Robert Cemper · Jun 23, 2020 go to post

Suggestion for a calculated Property:

Property SentTimeNEW As Ens.DataType.UTC [ Calculated, SqlComputed,
              SqlComputeCode = { set {*}=$s({SentTime}<1842:"",1:{SentTime}) } ];
Robert Cemper · Jun 23, 2020 go to post

OK. I understand those records where created BEFORE you defined your new column.
I checked the internal code

$s(%val="":"",1:$zdatetime($zdTH($zdatetimeh(%val,3,,,,,,,,0),-3),3,,3))

This tells me:
- Your value is Not Empty 
- it has no valid time format, so it is trapped by the ERROR option and set to Zero  ==>> 1840-12-31 00:00:00

Suggestion:
- set value to NULL for old records.
or
- create your own data type for this case. 
or

- use a calculated Property  to trap the values

Robert Cemper · Jun 23, 2020 go to post

1840-12-31 00:00:00 is point Zero of internal time setting.
It applies as default to empty data type Ens.DataType.UTC

Robert Cemper · Jun 22, 2020 go to post

embedded SQL is probably an overkill for this formating.
Just convert it to the internal format, add what you need and assemble the pieces in COS

; set datein=201906192359
; set add=60    ;; seconds to add
set dh=$ZDH($e(datein,1,8),8)
set hh=$e(datein,9,10)
set mi=$e(datein,11,12)
set new=$ZTH(hh_":"_mi_":00",3)+add
set zdt=$zdt(new\86400+dh_","_(new#86400),3)
set dateout=$tr($e(zdt,1,*-3),"-: ")
Robert Cemper · Jun 19, 2020 go to post

for the fixed part you still can use classic mapping.
for the variable section you may set   CONTENT = "MIXED"  for the containing property
and get the raw XML structure in hands .
You can then analyze this "inner" XML using class %XML.TestReader

Robert Cemper · Jun 18, 2020 go to post

The example  and the class are simply wrong 
A %Library.DynamicObject that is composed here just has neither a method  %Clone nor a method %Compose

You may report the bug to WRC

Robert Cemper · Jun 16, 2020 go to post

Ah, getting closer:
The problem seems to reduce to an alternative way (a wrapper around) to %Open and %Delete. 

Robert Cemper · Jun 16, 2020 go to post

it isn't the save yet. especially if some UNIQUE conflict prevents the save and requires a Rollback
delete isn't affected at all

Robert Cemper · Jun 16, 2020 go to post

As all you need is in %Persitent you could have your own personal.persitent extending %persitent
wrapping %Open and %Delete in your own extended code.
3 points to consider:

  • how to force your personal.persitent to all existent and future classes ?
  • how to force classes generated  by DDL ?
  • how to maintain your extension over release changes ?

Sorry, I doubt if this is the right approach

Robert Cemper · Jun 16, 2020 go to post

take a look at %Library.Persistent. Methods

  • %Open, %OpenId have a 3rd call parameter status  that returns a %Status value indicating success or failure.
  • %Delete, %DeleteId do it as direct result  by a %Status value indicating success or failure.

No further need of an %On.... to know success or failure 

Robert Cemper · Jun 13, 2020 go to post

Allmost!  3rd Update

since if the left side is a Unix Timestamp, then you get this result:

write $zdt($zdth(1591891200000\1000,-2),3) ==> 2020-06-11 18:00:00

docs: https://docs.intersystems.com/iris20201/csp/docbook/Doc.View.cls?KEY=RCOS_fzdatetime 

timezone conversion from UTC may compensate  the 6 hours difference ! 
 in Middle Europ we have we have 2 hrs+  to UTC so

write $zdt($zdt($zdth(1591891200000\1000,-2),-3),3)
2020-06-11 16:00:00
Robert Cemper · Jun 13, 2020 go to post

to complete this.
Docker has its storage here.

C:\Users\<youruser>\AppData\Local\Docker\wsl\data\ext4.vhdx
C:\Users\<youruser>\AppData\Local\Docker\wsl\distro\ext4.vhdx
Robert Cemper · Jun 12, 2020 go to post

 method OpenSFTP(ByRef sftp As %Net.SSH.SFTP) as %Status

Open up an SFTP session for SFTP activity.

 ByRef this means that the variable you pass has to be initialized first.

#dim sftp As %Net.SSH.SFTP 

 just binds the object type to variable  sftp but doesn't initialize it.
So it is <UNDEFINED>

Use your  original line instead or in addition to initalize it

Set sftp = ##class(%Net.SSH.Session).%New()
Robert Cemper · Jun 10, 2020 go to post

I had to transfer more than a few files. so I shared a docker  volume:

docker run  ...... --name=iris1 -d -v volume1:/external   ........
docker run ....... --name=iris2 -d -v volume1:/external   ........

so both containers  have permanent access and can pass files as we use to pass Globals using IRISTEMP  or CACHETEMP

The volume gets generated at first access automatically

Robert Cemper · Jun 10, 2020 go to post

Another issue I had is the requirement of Hyper-V.

The latest VMware Player 15.5.6  has no problem, with Hyper-V enabled anymore.
So they can be installed  in parallel (if your disk space allows  devil)

Robert Cemper · Jun 10, 2020 go to post

@Luca Ravazzolo , @Jose-Tomas Salvador 
I succeeded to force an upgrade of my Win 10 to  2004 and to activate WSL2   (installation blocked until VMware was de-installed !)
and Docker Desktop For WSL2.
Quite interesting to have a Windows-Installer for a Linux program. Take care to use version >2.3.0 2  for WSL2
And it was running as expected with no troubles. No issues with Images, Containers, Volumes, Networks.

It's an interesting experience, especially as I'm not forced to use PowerShell.
Communication with Win File System goes Docker ==> WSL2 ==> Windows.
Next positive surprise: my local C:\..  was mounted byWSL2 to /mnt/c/....  (I just tried read access)
Bad surprises:
- the guide to install / activate was  just of limited help, partially confusing / contradictionary   
Google helped with useful and just commercial advice.
- Reboots: after #5 I stopped counting 

Still a challenge: I couldn't find out where WSL2 file system was homed on my C:\ drive.
 

Robert Cemper · Jun 8, 2020 go to post

I think not that this is possible.
The reason was to make it as flexible as any other Dynamic query.
I'm convinced this was necessary to support Sharding.

But you have the option to write your own custom class query 

Robert Cemper · Jun 8, 2020 go to post

I'd like to say a big Thank You !  to all participants that gave me their vote.


And I forgive the unknow experts that voted for me in the beginning and changed their mind shortly before closing as by the rules.

Robert Cemper · Jun 7, 2020 go to post

You did a very interesting presentation of the essential concept of Globals that was developed once by Neal Pappalardo in 1966/67. yes
Long before objects were even thought of.
So back to the roots !
( Neil Pappalardo is the founder and CEO of MEDITECH )