------------------------SDT2 KeypadInterface--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- KeypadInterface------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------15-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(! Process Type KeypadInterface)]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------4()[w(!GSDL)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[(! l! !(d)[h(! l)[k(! 6)[n(! 6d! )]][ q(! 6)]]]}-------------------------------------------------------------------!%()HeadingText-----------------------------------!%()PageOrder------------------------------------1finitionPage------------------------------------DefinitionPage------------------------------------ !%&()LinkEndpoints----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------()[(! l! 22!(d)[z(! 6d! l)[}(! 6})[(! 6! )]][ (! 6})][@w(!d!)[ (! 6! Entry)][`(! )][.x(! )[8(! 6! ReadDigit)]][(! 6d!Z)]][@(!&d&!)[(! 6! Exit)] [`(! )][.(! )[8(! 6?! ReceiveCode)]][(! 6&!)]][9(! 6 ! )[8(!4 DCL Digit Integer, i CodeIndexType, Code CodeType;)]][9 (! 6~! )[8(! TIMER KeyStrokeTimer:=3;)]][2(! 6! d)[8(! )][(!XX&!"X&X)[6(! 6&!  d)[8(! i:=1)][(!XX!"XX)[(! 6X!Z)][3(! 6! d)[8(! WaitForDigit)][(!X X R!"XRX )[(! 6R! d!)[8(! ReadDigit (Digit))][(!XX!"XX)[6(! 6! d)[8(! RESET (KeyStrokeTimer))][(!XLX~!"X~XL)[6(! 6~! )[8(! Code(i):= Digit, i:=i+1)][(!XFXx!"XxXF)[ (! 6x! d)[8(! i<=4)][(!XX!"XX)[8(! 6q! True)][6(! 6! d)[8(! SET (KeyStrokeTimer))][(!XrX!"XXr)[(! 6X!Z)][3(! 6! d)[8(! -)]]]]][(!RR!"R)[8(! 6k! False)][(! 6! d!)[8(! ReceiveCode (Code))][(!RrR!"RRr)[6(! 6! d)[8(! i:=1)][(!RR:!"R:R)[(! 6R:!Z)][3(! 6:! d)[8(! -)]]]]]]]]]]]]]]][(!"X X99R!"RX )[(! 6RR! d!)[8(! KeyStroke_ Timer)][ (!!")[6 (! 6R! d)[8(! i:=1)][(!L~!"~L)[(! 6~!Z)][3(! 6R~! d)[8(! WaitForDigit)]]]]]]]]]]]]]]}it)]]]]]]]]]]]]]]}----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------(!4!5!7)[!(! DefinitionPage!)[!(! 1!!2!3)]]}-----------------------------------------------------------------------------------------------------------------------