Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PRCUESIG

Package: IFCAP

Routine: PRCUESIG


Information

PRCUESIG ;WISC@ALTOONA/CTB/TEN-ROUTINE TO ENTER OR CHANGE ELECTRONIC SIGNATURE CODE (IFCAP) ;5/4/93 8:31 AM

Source Information

Source file <PRCUESIG.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**68**;Oct 20, 2000
ENCODE(X,X1,X2)
DECODE(X,X1,X2)
HASH(X)
SUM(X) ;CREATE CHECKSUM VALUE FOR STRING
  • ICR #6552
    • Status: Active
    • Usage: Private
    ESIG(USERNUM,MESSAGE) ;interogate user for electronic signature code
  • ICR #1552
    • Status: Active
    • Usage: Private
    NOW() ;Extrinsic function to return current time

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"You have no signature code on file. Please contact your IRM staff for assistance.",$C(7),!
    • Line Location: ESIG+9
    Function Call: WRITE
    • Prompt: !,"Enter ELECTRONIC SIGNATURE CODE: "
    • Line Location: ESIG+12
    Function Call: READ
    • Variable: X
    • Timeout: 60
    • Line Location: ESIG+13
    Function Call: WRITE
    • Prompt: ?60,"Thank you."
    • Line Location: ESIG+17
    Function Call: WRITE
    • Prompt: !,"Sorry, but that's not your correct electronic signature code."
    • Line Location: ESIG+18
    Info |  Source |  Entry Points |  Interaction Calls