Routine: PRPFSIG1

Information

PRPFSIG1 ;WISC@ALTOONA/CTB-ESIG MAINTENANCE ROUTINE ;11/22/96 4:45 PM

Source file <PRPFSIG1.m>

Name	Comments	DBIA/ICR reference
V	;;3.0;PATIENT FUNDS;6;JUNE 1, 1989
DECODE(LEVEL0)	;Extrinsic Function to return hashed electronic sig to readable form.
D	;decode e signature less than version 1
D1	;decode e signature for version 1
ENCODE(LEVEL0,USERNUM,Y)	;Encode e signature for version 1 only
REMOVE(LEVEL0)	;Entry point to remove e signature from record
VERIFY(LEVEL0)
STRING(X)