All
Accepted answers
Dmitry Maslennikov · Dec 14, 2017 go to post

To set any response header, you should overwrite OnPreHTTP method in your CSP Page class.

 Class User.Page Extends %CSP.Page
{

ClassMethod OnPage() As %Status
{
  &html<<html>
<head>
</head>
<body>>
  ; To do...
  &html<</body>
</html>>
  Quit $$$OK
}

/// Event handler for <b>PreHTTP</b> event: this is invoked before
/// the HTTP headers for a CSP page have been sent. All changes to the
/// <class>%CSP.Response</class> class, such as adding cookies, HTTP headers,
/// setting the content type etc. must be made from within the OnPreHTTP() method.
/// Also changes to the state of the CSP application such as changing
/// %session.EndSession or %session.AppTimeout must be made within the OnPreHTTP() method.
/// It is prefered that changes to %session.Preserve are also made in the OnPreHTTP() method
/// as this is more efficient, although it is supported in any section of the page.
/// Return <b>0</b> to prevent <method>OnPage</method> from being called.
ClassMethod OnPreHTTP() As %Boolean [ ServerOnly = 1 ]
{
  Do %response.SetHeader("X-MyHeader", "some info")
  quit 1
}

}

​

Dmitry Maslennikov · Dec 13, 2017 go to post

In HTTP/2 added some features which are impossible or maybe possible in Cache

  • Server Push - allows pushing some resource from server to client, at any time, in parallel 
  • Data compression for HTTP Headers. How it will be now when I will need to read headers in a request.

And other features which also important but mostly on TCP Stack, and maybe really not Cache part.

Dmitry Maslennikov · Dec 10, 2017 go to post

Looks like there is some error with autodetecting links in a post here, just fixed it with manually marking correctly as a link in his comment.

Dmitry Maslennikov · Dec 7, 2017 go to post

In the first implementation, I tried to actually build the tree. But missed something, and got some duplications in the lowest branches. Then using the same tree trying to solve second part, I found more than one unbalanced branches and a long time had not noticed how it could be until I noticed duplications. Then I removed this way, and first part becomes much simpler if just search node which does not have parents. In the second part, you actually already have a tree when you know when it started from the first part.

Dmitry Maslennikov · Dec 7, 2017 go to post

Looks like just some simple implementation for Long Pulling requests.

But how about getting not just a progress but how to get some data before task finished. 

And also, I see beg security Issue, when I can get information from any other process. You use TaskId directly from the request like you trust everybody. And also easy to get SUBSCRIPT error.

BTW: do you suppose to acept someone's answer? Looks like it is mostly just discissing topic.

Dmitry Maslennikov · Dec 7, 2017 go to post

Today's task was pretty difficult, it takes few hours to solve it. I made a mistake in first part even if I got the right answer, but after when I rewrote my first part, the second part was solved quite fast. But I lost so much time to figure it out.

Dmitry Maslennikov · Dec 6, 2017 go to post

For current process

USER>f fmt="enuw","rusw","current","" do ##class(%SYS.NLS.Format).%New(fmt) w !,fmt,?10,$zd($h,11),?15,$zd($h,12)
 
enuw      Wed  Wednesday
rusw      Сре  Среда
current   St   středa
          Wed  Wednesday

Or for all new processes, without restart

%SYS>write $zd($h,12)
Wednesday
%SYS>Set ^SYS("NLS","Config","LocaleFormat")=1
 
%SYS>write $zd($h,12)
Wednesday
%SYS>Do Locale^NLSLOAD("rusw")
 
%SYS>write $zd($h,12)
Среда
Dmitry Maslennikov · Dec 6, 2017 go to post

Looks like we in the same timezone, and you solve tasks faster than me. When your time today was 15:47 minutes for the first task. But on the main Leaderboard fastest time 2:58. I really don't understand how it would be possible, to solve it so fast.

Dmitry Maslennikov · Dec 6, 2017 go to post

anagram used all letters, so I just compared lengths of strings and used $tr() to remove all characters from string one in another.

So, your code I would change like 

ClassMethod IsAnagram(word,test) as %Boolean {

  if $L(word)'=$L(test) return 0

  return $tr(word,test)=""

}
Dmitry Maslennikov · Dec 5, 2017 go to post

Look at the documentation, there are some formats available to use in the $zdate function. Where 11 (abbreviated) and 12(full) looks like what you need.

write $zdate($h, 11)
Tue

Write $zdate($h, 12)
Tuesday
Dmitry Maslennikov · Dec 2, 2017 go to post

It would be better if you can add your SQL query, and if it is not a secret also Classes definition. So, we could see if something may be wrong with it. And you also should look at the book in the documentation about SQL Optimizations.

Dmitry Maslennikov · Dec 2, 2017 go to post 
 set input="1212"
 set len=$l(input)/2
 set sum=0
 f i=1:1:len {
   if $e(input,i)=$e(input,len+i),$i(sum, i*2)
 }
 zw sum
Dmitry Maslennikov · Dec 2, 2017 go to post

I also started from $zstrip,  but in task 1111 should produce 1, when $zstrip returns only one 1.

for the second task, you should simply compare values from the first half of string with the same position from the second half. 

Dmitry Maslennikov · Dec 1, 2017 go to post 
ClassMethod HelloWorld(Name As %String)
{
  set result = {
    "name": (Name)
  }
  quit result.%ToJSON()
}
Dmitry Maslennikov · Dec 1, 2017 go to post

Why do you use such a strange url? You created the application with your class as Dispatch class. So, in this case, you should call this.

http://localhost:57772/USER/REST/Arun

where /USER/REST is web application, and everything else is already what should be in a REST.

PS. I would not recommend do not use uppercase for web applications

Dmitry Maslennikov · Dec 1, 2017 go to post

You can use colon to achieve it

<Route Url="/checkUID/:uid/:supplierid/" Method="GET" Call="Some.Other.Class:checkUID"/>

With Map tag in UrlMap, you can simply split your big UrlMap by multiple classes

Dmitry Maslennikov · Nov 28, 2017 go to post

After all details, it means, that no reasons to use $lb, or any other ways, it should be as is as a string, but with this length's header.

In Cache, we don't have binary strings as do other languages, but what is a byte, it is a symbol for text, so text will be arrays of bytes.

write $c(166, 70, 114, 105, 110, 103, 101)
¦Fringe

The only thing you should care as already mentioned above is different codepages. 

Let's try for some example:

And try to get the same.

USER>set data="TestТест"
 
USER>zzdump data
 
0000: 0054 0065 0073 0074 0422 0435 0441 0442                 TestТест

USER>set msg=$zcvt(data,"O","UTF8") ; convert from Unicode
 
USER>set msg=$c(160+$l(msg))_msg    ; of course should be changed for bigger text
 
USER>zzdump msg
 
0000: AC 54 65 73 74 D0 A2 D0 B5 D1 81 D1 82                  ¬TestТеÑ.Ñ.

and as you can see we got the same result

Dmitry Maslennikov · Nov 27, 2017 go to post

What do you mean by overhead from $lb? 

What is $c(166), some magic number? And why you encode the string as a list of codes, why not keep it as a string?

$lb it is also a string, but compressed for some types of values.

Dmitry Maslennikov · Nov 23, 2017 go to post

I love Docker way. In Dev environment, when you need only some test data. You can use Docker, with all test data inside the image, just recreate container will clean all previous changes and return the database to state when this image was built. If you later will decide to keep some changes as default for next uses, you can commit this changes to the image.

Dmitry Maslennikov · Nov 12, 2017 go to post

Not sure, but maybe property method GetStored can help. It is ClassMethod which accept object Id as the first argument. Full name for the method <Property>GetStored(id)