Schema DDL Types of access
U929-J-Z125-9-76 91
Dokuschablonen 19x24 Version 7.3us für FrameMaker V7.x vom 14.02.2007 © cognitas GmbH 2001-2007 24. Oktober 2007 Stand 09:30.23 Pfad: G:\vogt\fsc\ud s\Manuale\en\udsent_e\uds ent.k04
Example in Assembler:
BYTEHASH CSECT READ
BYTEHASH AMODE ANY
BYTEHASH RMODE ANY
USING *,15
STM 4,8,12(13)
LM 4,7 ALLZEROS
L 8,0(0,1)
LA 4,0(0,8)
BCTR 4,0 (1)
IC 5,0(0,2) (2)
DR 6,5 (3)
HASHBYTE SRDL 6,24
IC 7,0(4,5)
D 6,0(0,3)
BCT 5,HASHBYTE
LR 1,6
LM 4,8,12(13)
BR 14
ALLZEROS DC 4F'0'
END
(1) Register 4 always contains the add ress before the CALC key.
(2) Register 5 contains the index to the CALC key; the initial value is the length
of the CALC key.
(3) If a zero is passed for the length o f the CALC key, this division results in a
P104.