go to post Robert Cemper · Nov 2, 2023 try this dirty hack: create your JSON object using "_" Property "client._id" As %Integer [ Required ]; Property "client_firstName" As %String [ Required ]; Property "client_lastName" As %String [ Required ]; create your JSON_body = { "details":{ ....} } before sending use $TRanslate(JSON_body,"_",".")
go to post Robert Cemper · Oct 30, 2023 the code fails already for start year 1924 <NULL VALUE>and is in principle wrong 🙁
go to post Robert Cemper · Oct 30, 2023 From my IBM-360-Assembly programming times in the late 60ties If your code is running hard,apply a switch to make it smart
go to post Robert Cemper · Oct 30, 2023 instead of strange constructs that are hard to follow,I would just take the pragmatical way and add a param SUPER=0 Class SubClass Extends MyClass { ClassMethod Foo(SUPER = 0 ) { if SUPER do ##super() quit . . . . . do ##super() // <---- } } The efficiency is evident also to less sophisticated programmers
go to post Robert Cemper · Oct 29, 2023 You may place a PRODLOG at WRC;And it might be changed in some future release.
go to post Robert Cemper · Oct 28, 2023 Are you sure the 2nd parameter of the stored procedure is of type %String(MAXLEN="") without length limit?
go to post Robert Cemper · Oct 28, 2023 ERROR: - OK which error ?? pls. be specific with all detailshint for SQL Escapingbut test in SQL Shell shows no problem USER>do $system-.SQL.Shell() SQL Command Line Shell ---------------------------------------------------- The command prefix is currently set to: <<nothing>>. Enter q to quit, ? for help. USER>>select 'HbA1cTests.sort(''testDate'',false)[0].resultValue' 1. select 'HbA1cTests.sort(''testDate'',false)[0].resultValue' HostVar_1 HbA1cTests.sort('testDate',false)[0].resultValue 1 Rows(s) Affected statement prepare time(s)/globals/lines/disk: 0.0002s/5/166/0ms execute time(s)/globals/lines/disk: 0.0002s/0/385/0ms cached query class: %sqlcq.USER.cls117 --------------------------------------------------------------------------- USER>>
go to post Robert Cemper · Oct 26, 2023 Simplified:WIJ is the on-disk image of your modified buffers.If buffers are changed they get updated on-disk by an asynchronous background process.The modified date is typically the last modification at file close.writing modification date at every file update as you expect will break every file system. Transposing your expectation to a text editor would mean to update the file and date at every new line:I suppose you would be disappointed by the related performance reduction.Though, from personal experience, this seems to be the standard operating style of almost every government.😉
go to post Robert Cemper · Oct 26, 2023 n i f i=1:1:20 w !,$$save(file,glob) s id=^TEST zw id it looks like magic and the issue is independent of Global namefor testing, I would suggest this extension to the loop.zw also shows any $Lb() in readable format6, 7, seem to break sometimes ??
go to post Robert Cemper · Oct 26, 2023 after I called the label a second time pls. check ^TEST or ^TEST2 before the 2nd callif it isn't starting with a number it throws <ILLEGAL VALUE>I see no obvious reason in your code why it should NOT be Numeric.so in your test loop you may do a "write ^TEST,! " to check this condition
go to post Robert Cemper · Oct 26, 2023 what OS are you working with ? "C:/temp/file.xslt" this is wrong in Windows >>> "C:\temp\file.xslt" and wrong in Linux, Unix,, ... >>> "/temp/file.xslt"
go to post Robert Cemper · Oct 24, 2023 even deleting the lock from Terminal doesn't seems to work Whatever you try to express doesn't make senseAny kind of LOCK is bound just to the job that executes itthere is just no "UNLOCK" from outside except job termination. the locking job in your screenshot is 9908but your terminal is job 10376 expressed in a picture:- you try to catch a fly in your room that is flying somewhere outside the building
go to post Robert Cemper · Oct 23, 2023 Part of it (KILL, SET, TSTART, TCOMMIT, TROLLBACK) by global by process can be traced by examination of JOURNAL There is nothing similar for Global READ
go to post Robert Cemper · Oct 23, 2023 You may try this approach to convert JSON into a Global for search and iteration
go to post Robert Cemper · Oct 23, 2023 ClassMethod Calendar(y As %Integer) As %String { s a=$lfs("Monkey,Rooster,Dog,Pig,Rat,Ox,Tiger,Rabbit,Dragon,Snake,Horse,Goat,Metal,Water,Wood,Fire,Earth") q $li(a,y\2#5+13)_" "_$li(a,y#12+1) }
go to post Robert Cemper · Oct 23, 2023 great idea:: integers as separators! just realized the separating blank broke the line in display.
go to post Robert Cemper · Oct 22, 2023 I didn't get the meaning of Field(ge=0) immediatelyI see 6 variants to achieve this in IRIS in order of my personal preference use SQL NULLIF function use SQL CASE..END block if more complex use a custom SQL Function = ClassMethod projected as SQLProcedure create a TRIGGER if this is not just a single case use calculated properties with on Change clause create a customized OdbcToLogical method There are eventually more options