Read in and process function keys

Question

Question

Russell Knight · Jul 3, 2017

Greetings,

Can someone please show me via coding example(s) how to write an input prompt that will read in a function key, F7 for example, validate that the key pressed is F7 and then process it all via cache.

Thanks...

Discussion (7)0

Log in or sign up to continue

Vitaliy Serdtsev · Jul 3, 2017

Demo for [F1], [F7] and [Home]:

s key(##class(%xsd.hexBinary).XSDToLogical("1B5B31387E"))="F7"
s key(##class(%xsd.hexBinary).XSDToLogical("1B4F50"))="F1"
s key(##class(%xsd.hexBinary).XSDToLogical("1B5B317E"))="Home"
u:$zu(96,14)=1 0:(:"+S") r "Input: ",*x u:$zu(96,14)=1 0:(:"-S")

;zzdump $key
   
w "You press [",$g(key($key),"unknown"),"]",!

3 0

score 0 · Answer 1 · 2017-07-03T02:50:00-04:00

Greetings,

Can someone please show me via coding example(s) how to write an input prompt that will read in a function key, F7 for example, validate that the key pressed is F7 and then process it all via cache.

Thanks...

score 0 · Answer 2 · 2017-07-03T03:18:40-04:00

Dmitry Maslennikov · Jul 3, 2017

Where do you need it, in Web/ZEN or in terminal?

0 0

score 0 · Answer 3 · 2017-07-03T04:08:16-04:00

Russell Knight · Jul 3, 2017

Terminal, thank you...

0 0

score 0 · Answer 4 · 2017-07-04T16:58:16-04:00

Russell Knight · Jul 4, 2017

Thank you very much...

0 0

score 0 · Answer 5 · 2019-07-23T12:32:18-04:00

$ZU functions are deprecated and no longer documented, and users are encouraged to replace $ZU functions with methods and properties in InterSystems class libraries that perform the equivalent actions.

In this case, $zu(96,14) is replaced by ##class(%Library.Device).GetType()

score 1 · Answer 6 · 2019-07-24T01:28:23-04:00

Thank you for your comment.
This code is taken from the source code %SYS, which in theory should be an example for application developers.

I hope that InterSystems developers will see your comment and make appropriate changes.