You may try this approach to convert JSON into a Global for search and iteration 

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)
}

great idea::  integers as separators!

just realized the separating blank broke the line in display.

I didn't get the meaning of  Field(ge=0) immediately
I see 6 variants to achieve this in IRIS in order of my personal preference

1. use SQL NULLIF function
2. use SQL CASE..END block if more complex
3. use a custom SQL Function = ClassMethod projected as SQLProcedure
4. create a TRIGGER if this is not just a single case 
5. use calculated properties with on Change clause
6. create a customized  OdbcToLogical method 

There are eventually more options  

First bid:

• 145 by code checker
• 35 real code - the rest is text + packing + "cosmetics"

contact ISC sales, buy an appropriate license, and  you get access to WRC and the Kit repo

Last version of Caché was 2018

I see. just Sub-sessions:
  

If this is your own CSP page you may set  %session.EndSession =1

OR
you have a dummy page that does just this and you call it manually
I did it mostly during testing 

since the invention of Grace Period by BdK  I'm fighting hanging CSP connections.
my approach:

in most cases, it is sufficient to get free locked licenses

BIG CONGATULATIONS!

Robert

YEAH!    Coffee in Belgium was always great for me

when I worked in Italy and Spain 40+ years back we always went to the cafeteria next door.
They served excellent "café correto".  
BTW: I'd definetly prefer Sangia over Cold Water
😋

I assume "water cooler tank" has the same social functionality
as the kitchenette with the common coffee machine in central and northern Europe