ASAP 3.0 Server Manual

HP NonStop ASAP Server Manual Page 301 of 342
Query Key Definitions
DEF Q-key. !For Enform
02 ikey pic x(18).
02 cpu-entity redefines ikey.
03 csysno type binary 16 display "m<\999.>".
03 ccpuno type binary 16 display "m<99>".
02 lh-entity redefines ikey.
03 lhsysno type binary 16 display "m<\999.>".
03 lhlinename type character 8.
02 Entity type character 8 redefines ikey.
02 iyear pic x(11) redefines ikey.
02 imonth pic x(12) redefines ikey.
02 iday pic x(13) redefines ikey.
02 ihour pic x(14) redefines ikey.
02 imin pic x(15) redefines ikey.
02 isec pic x(16) redefines ikey.
02 irank pic x(17) redefines ikey.
END.
Extended Primary Key
The ASAP extended primary p-key with the domain name required for APP processing
is:
DEF P-key-x.
03 sysno type binary 16. !system number
03 word type binary 16 redefines sysno. !word handle
03 domain type binary 16 occurs 32 times. !domain name
03 dname type character 64 redefines domain.
03 its type binary 64. !inverted timestamp
03 zdate redefines its. !inversion code
04 zyear pic x(1). !2200 - year
04 zmonth pic x(1). ! 12 - month
04 zday pic x(1). ! 31 - day
04 zhour pic x(1). ! 24 - hour
04 zmin pic x(1). ! 60 - min
04 zsec pic x(1). ! 60 - sec
04 zrank pic x(1). ! process busy rank
03 suffix redefines its. !
04 fillerx type binary 16 occurs 3 times. ! cpu.p-key.suffix.
04 nssvnn type binary 16. !
END.
Extended Query Key
The ASAP extended queue q-key with the domain name required for APP processing
is:
DEF Q-key-x. !For Enform
02 ikey pic x(74).
02 app-entity redefines ikey.