Routine: PRCHES12

Information

PRCHES12 ;WISC/RHD/AKS-ESIG MAINTENANCE ROUTINE ;9/23/94 10:49 AM

Source file <PRCHES12.m>

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
DECODE(LEVEL0)	;Extrinsic Function to return hashed esig to readable form.
D1	;decode e signature for version 1
ENCODE(LEVEL0,USERNUM,Y)	;Encode esig for version 1 only
RECODE(LEVEL0,CHECKSUM,Y)	;Recode esig for version 1 only
REMOVE(LEVEL0)	;Entry point to remove esig from record
VERIFY(LEVEL0)
STRING(X,X1,X12)