PRPFSIG ;WISC@ALTOONA/CTB/TEN-ROUTINE TO ENTER OR CHANGE ELECTRONIC SIGNATURE CODE ;7/15/97 9:56 AM
Source file <PRPFSIG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
V | ;;3.0;PATIENT FUNDS;**6,7**;JUNE 1, 1989
|
|
ENCODE(X,X1,X2) | ||
DECODE(X,X1,X2) | ||
HASH(X) | ||
SUM(X) | ;CREATE CHECKSUM VALUE FOR STRING
|
|
ESIG(USERNUM,MESSAGE) | ;interogate user for electronic signature code
|
|
NOW() | ;Extrinsic function to return current time
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|