Through %ZEN.proxyObject is unlikely to work, since the q parameter cannot be disabled in this case

q - output numeric values unquoted even when they come from a non-numeric property

Use your own class, for example:

Class dc.test Extends %RegisteredObject
{

Property articlenumber As %String;

}

s object = ##class(dc.test).%New()
s object.articlenumber = "15049950"

s x = ##class(%ZEN.Auxiliary.jsonProvider).%WriteJSONStreamFromObject(.json,object,,,,"aelotw")

Output:

{
  "articlenumber":"15049950"
}

Conclusion: the quote will be removed from the documentation since it's no longer true.

Then besides this, in the documentation for %STARTSWITH need to add the note DEPRECATED and the recommendation "use LIKE 'XXX%'"

I also did an analysis for Caché 2018.1

Class del.t Extends %Persistent
{

Index ip On p;

Property p As %VarString;

/// d ##class(del.t).Fill()
ClassMethod Fill(N = 1000000)
{
  d DISABLE^%NOJRN
  k ^del.tD,^del.tI

  f i=1:1:N s ^del.tD(i)=$lb("","test"_i)
  s ^del.tD=N
  d ENABLE^%NOJRN

  d ..%BuildIndices(,,,$$$NO)
  d $system.SQL.TuneTable($classname(),$$$YES)
  d $system.OBJ.Compile($classname(),"cu-d")
}
}

Although the plans are exactly the same in SMP the results of the metrics differ:

select count(*) from del.t where p like 'test7%'
Row count: 1 Performance: 0.291 seconds 333340 global references 2000537 lines executed

select count(*) from del.t where p %startswith 'test7'
Row count: 1 Performance: 0.215 seconds 333340 global references 1889349 lines executed

For the next two queries, the INT code matches:

&sql(select * from del.t where p like 'test7%')
&sql(select * from del.t where p %startswith 'test7')

But for these - is already different, so the metrics in SMP are different:

&sql(select * from del.t where p like :a)
&sql(select * from del.t where p %startswith :a)

In IRIS 2020.1, the work with embedded queries was changed, but I can't check it.

The CSPBIND value is required at the compile-time to generate code on the client and server side. You try to change this value at runtime.

See:

• CSP Page Lifecycle
• CSP Elements: Expressions

To Dmitry's words I will add a few links from the documentation:

• write [listname] (Caché List structured data displays in encoded form)
• List-Structure String Operations

In your case, be the $LISTTOSTRING function is useful, for example:

USER>set first=$lb("words","more","words")
USER>write first
words-morewords
USER>write $listtostring(first)
words,more,words
USER>write $listtostring(first,"^")
words^more^words
USER>write $listtostring(first,"")
wordsmorewords

I think that the result of "dogcatfish" in the book was due to copying/pasting, which caused the service characters to be lost.

By the way, here on the forum it’s also not so easy to insert this gibberish ;)

See Users, Roles, and Privileges.

In addition, you can optionally enable auditing.

It should be noted that this applies not only to the try/catch block, but also to other blocks, for example:

f i=1:1:2 {
  q 1 ; runtime error, but the line is highlighted
}

do {
  q 2 ; compilation error
}while(0)

while 0 {
  q 3 ; compilation error
}

Hi Nigel.

I hasten to inform you that new classes have been added to IRIS for writing/reading streams in JSON format: %Stream.DynamicBinary, %Stream.DynamicCharacter.

Class dc.test Extends (%RegisteredObject, %JSON.Adaptor)
{

Property string As %VarString(%JSONFIELDNAME = "longstring");

Property cs As %Stream.TmpCharacter(%JSONFIELDNAME = "cstream");

/// d ##class(dc.test).test()
ClassMethod test()
{
  #define fill(%len,%val) $tr($j("",%len)," ",%val)

  try{
    
    s tmp=..%New()
    
    ; the maximum string length when exporting to JSON depends on the length of the property name
    s tmp.string=$$$fill($$$MaxLocalLength-($l("longstring")+5),$c(351))
    
    $$$ThrowOnError(tmp.cs.Write($$$fill($$$MaxLocalLength,$c(355))))
    $$$ThrowOnError(tmp.cs.Write($$$fill($$$MaxLocalLength,$c(354))))

    w "[Export] len(string): ",$l(tmp.string),", len(cs): ",tmp.cs.Size,!!

    s file=##class(%Stream.FileCharacter).%New()
    s file.Filename="VeryBigObject.json"
    
    $$$ThrowOnError(tmp.%JSONExportToStream(file))
    $$$ThrowOnError(file.%Save())
    
    ;------------------
    
    s dobj={}.%FromJSON(file)
    w "1. [Import    %DynamicObject] len(longstring): ",$l(dobj.longstring),", len(cstream): ",dobj.%Get("cstream",,"stream").Size,!

    s obj1=..%JSONNew(dobj)
    w "2. [Import %RegisteredObject] len(string): ",$l(obj1.string),", len(cs): ",obj1.cs.Size,!

    /*
    
    The following command will generate an error (tested on IRIS 2019.1.1 CE, Unicode):
    
    ERROR: <MAXSTRING>  zWrite^%Stream.TmpCharacter.1
    
    To avoid errors, you need to fix the code in the GenImportCharacterStream method (see the patch below)
    
    */
    
    s obj2=..%New()
    $$$ThrowOnError(obj2.%JSONImport(file))
    w "3. [Import %RegisteredObject] len(string): ",$l(obj2.string),", len(cs): ",obj2.cs.Size,!

  }catch(ex) {
    w "ERROR: ",ex.DisplayString(),!
  }
}

/// Get an instance of an JSON enabled class.<br><br>
/// 
/// You may override this method to do custom processing (such as initializing
/// the object instance) before returning an instance of this class.
/// However, this method should not be called directly from user code.<br>
/// Arguments:<br>
///     dynamicObject is the dynamic object with thee values to be assigned to the new object.<br>
///     containerOref is the containing object instance when called from JSONImport.
ClassMethod %JSONNew(
  dynamicObject As %DynamicObject,
  containerOref As %RegisteredObject = "") As %RegisteredObject [ GenerateAfter = %JSONGenerate, ServerOnly = 1 ]
{
  #dim r As dc.test=$s($IsObject(containerOref):containerOref,1:..%New())
  s r.string=dynamicObject.longstring
  d r.cs.CopyFrom(dynamicObject.%Get("cstream",,"stream"))
  q r
}

}

Result:

USER>d ##class(dc.test).test()
[Export] len(string): 3641129, len(cs): 7282288
 
1. [Import    %DynamicObject] len(longstring): 3641129, len(cstream): 7282288
2. [Import %RegisteredObject] len(string): 3641129, len(cs): 7282288
3. [Import %RegisteredObject] len(string): 3641129, len(cs): 7282288

Patch for 2019.1.1CE:

Instead of

        $$$GENERATE(indent_"  Set sc=stream.Write(%JSONObject."_$$$QN($$$jsonfieldname(propertyMap))_") If $$$ISERR(sc) Goto %JSONImportExit")

need

        $$$GENERATE(indent_"  Set testInvalidField=0, sc=stream.CopyFrom(%JSONObject.%Get(field,,""stream"")) If $$$ISERR(sc) Goto %JSONImportExit")

It is possible that in version 2019.4.x has already fixed everything.