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: MCESEDT2

Package: Medicine

Routine: MCESEDT2


Information

MCESEDT2 ;WISC/DCB-ELECTRONIC SIGNATURE EDITS PART 2 ;6/26/96 12:51

Source Information

Source file <MCESEDT2.m>

Entry Points

Name Comments DBIA/ICR reference
EDD ; Draft
EDPD ; Problem Draft
EDRV ; Release On-line Verify
EDROV ; Release Off-Line Verify
SIGN ; Display message, checks for elect. sign
EDRNV ; Release Not Verify
EDRNV1 ;
EDS ; Superseded
EDSRV ; NO
EDSROV ; OP
ERROR ;
ASK ;
NOW(TA) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,IOBON,"Please enter a provider that you are signing for",IOBOFF
  • Line Location: EDROV+5
Function Call: WRITE
  • Prompt: !,"Note: This provider must have a key for ",IOUON,MCROUT,IOUOFF,!
  • Line Location: EDROV+6
Function Call: WRITE
  • Prompt: !!,"In order to "_IOUON_"release and verify"_IOUOFF_" procedure results",!,"you must type in your electronic signature code."
  • Line Location: SIGN+2
Function Call: WRITE
  • Prompt: !!,IOINHI,IOBON,*7,"This option should be used with extreme CAUTION.",IOINORM,IOBOFF
  • Line Location: EDRNV+2
Function Call: WRITE
  • Prompt: !,"You can be held accountable for releasing unverified procedure results",!!
  • Line Location: EDRNV+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: EDRNV1+1
Function Call: WRITE
  • Prompt: !!!,"You must sign a Superseded record in order to complete the process"
  • Line Location: EDS+2
Function Call: WRITE
  • Prompt: !!,?14,IOBON,IODWL,IOUON,"Please Wait!",IOBOFF,IOUOFF
  • Line Location: EDS+8
Function Call: WRITE
  • Prompt: !!,IOINHI,"An ",IOBON,"error",IOBOFF," has occured",!,"in creating the new record"
  • Line Location: EDS+11
Function Call: WRITE
  • Prompt: !!,"Record "_REC_" copy to "_NEWREC_"."
  • Line Location: EDS+12
Function Call: WRITE
  • Prompt: !,"Indexing "_NEWREC_"."
  • Line Location: EDS+15
Function Call: WRITE
  • Prompt: !!,"Your Procedure has been Copied",!,"You can now make changes to the copy."
  • Line Location: EDS+18
Function Call: WRITE
  • Prompt: !,"New Record:",!
  • Line Location: EDS+19
Function Call: WRITE
  • Prompt: !!,IOINHI,IOBON,*7,"Your electronic signature is invalid or not declared.",IOINORM,IOBOFF
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: !!,"You must declare an electronic signature or ask your IRM for help."
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: !,"===> No changes to release status can be done. <===="
  • Line Location: ERROR+4
Info |  Source |  Entry Points |  Interaction Calls