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

Package: Text Integration Utility

Routine: TIUPSCS


Information

TIUPSCS ;BPOIFO/EL/CR - TIU DOCUMENT POST-SIGNATURE ALERT SETUP ;10/29/17 8:15am

Source Information

Source file <TIUPSCS.m>

Entry Points

Name Comments DBIA/ICR reference
BUILD ;
; allow a CAC to setup the title for post-signature alerts - a controlled situation
CONFIRM ;
DEL ; use to clean up an existing setup
DEVICE ;
DEVQ ;
EN ; entry point for the option [TIUFPC CREATE POST-SIGNATURE]
EN10 ;
GETFLD(TIUFLE,TIUIEN,TIUFLD,TIUIE) ; Get field value
GETTITLE ;
STATUS ; Check
INTRO ;
HD ; Header for Enter Post-Signature Code
STOP ; Check Continue
SUBROUT ;
SUBQ
WHO ; Select Alert Recipient

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The Post-Signature code for '"_$$GET1^DIQ(TIUFLE,TIUIEN,.01)_"' has been updated as follows..."
  • Line Location: BUILD+3
Function Call: WRITE
  • Prompt: !,"POST-SIGNATURE CODE: "_$$GET1^DIQ(TIUFLE,TIUIEN,4.9)
  • Line Location: BUILD+4
Function Call: WRITE
  • Prompt: !!,"The Post-Signature code for '"_TIUNAME_"' will be set as follows..."
  • Line Location: CONFIRM+4
Function Call: WRITE
  • Prompt: !,"POST-SIGNATURE CODE: "_TIUDR,!
  • Line Location: CONFIRM+5
Function Call: WRITE
  • Prompt: !!,"No action has been taken!!"
  • Line Location: CONFIRM+12
Function Call: WRITE
  • Prompt: !!,"No action has been taken!!"
  • Line Location: DEL+7
Function Call: WRITE
  • Prompt: !,"... Deleted ..."
  • Line Location: DEL+10
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: !!,"ABORT DEVICE - No action is taken."
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN10+8
Function Call: WRITE
  • Prompt: !!,"Someone else is editing this record, try again later.",!
  • Line Location: GETTITLE+8
Function Call: WRITE
  • Prompt: !!,"NATIONAL STANDARD Document Type cannot be edited."
  • Line Location: GETTITLE+15
Function Call: WRITE
  • Prompt: !!,"Only Document Title is allowed to be edited."
  • Line Location: GETTITLE+19
Function Call: WRITE
  • Prompt: !!,"This application cannot alter more than one alert call at a time."
  • Line Location: GETTITLE+29
Function Call: WRITE
  • Prompt: !,"It is --> ",TIUPREV
  • Line Location: GETTITLE+30
Function Call: WRITE
  • Prompt: !!,"The POST-SIGNATURE Code in '"_TIUNAME_"' was created by this option."
  • Line Location: GETTITLE+32
Function Call: WRITE
  • Prompt: !,"It is --> ",TIUPREV
  • Line Location: GETTITLE+33
Function Call: WRITE
  • Prompt: !
  • Line Location: GETTITLE+38
Function Call: WRITE
  • Prompt: !!,"The POST-SIGNATURE Code in '"_TIUNAME_"' was already set by another option."
  • Line Location: GETTITLE+41
Function Call: WRITE
  • Prompt: !,"It is --> ",TIUPREV
  • Line Location: GETTITLE+42
Function Call: WRITE
  • Prompt: !,"This Post-Signature Code cannot be altered in this option."
  • Line Location: GETTITLE+43
Function Call: WRITE
  • Prompt: !,"To change the code, please contact your local IT Support Programmer."
  • Line Location: GETTITLE+44
Function Call: WRITE
  • Prompt: !,"'Document Definitions (Manager) / Edit Document' option can be used."
  • Line Location: GETTITLE+45
Function Call: WRITE
  • Prompt: !!,"The STATUS of this Document Definition Title is '"_TIUST_"'."
  • Line Location: STATUS+7
Function Call: WRITE
  • Prompt: !
  • Line Location: STATUS+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !,"This option will setup 'Post-Signature Code Alerts' for PROGRESS NOTES."
  • Line Location: INTRO+2
Function Call: WRITE
  • Prompt: !,"Please select a choice of RECIPIENTS, and a choice of ROUTINE,"
  • Line Location: INTRO+3
Function Call: WRITE
  • Prompt: !,"and DEVICE (optional) to receive a printed alert upon note signature."
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !!,"If both RECIPIENTS and ROUTINE are N/A, a choice of"
  • Line Location: INTRO+5
Function Call: WRITE
  • Prompt: !,"DELETION or CANCELLATION for the Code Alert setting will be provided.",!!
  • Line Location: INTRO+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: " "
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: H1,!
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: " "
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: H2
  • Line Location: HD+9
Function Call: READ
  • Variable: Y
  • Timeout: TIUWAIT
  • Line Location: STOP+4
Function Call: WRITE
  • Prompt: !!,"ABORT alert ROUTINE - No action is taken."
  • Line Location: SUBROUT+15
Function Call: WRITE
  • Prompt: !!,"This is a required response. OR Enter '^' to exit",!
  • Line Location: SUBROUT+16
Function Call: WRITE
  • Prompt: !!,"Without RECIPIENT and ROUTINE, alert code setting is cancelled."
  • Line Location: SUBROUT+20
Function Call: WRITE
  • Prompt: !
  • Line Location: SUBROUT+26
Function Call: WRITE
  • Prompt: !!,"No action has been taken!!"
  • Line Location: SUBROUT+28
Info |  Source |  Entry Points |  Interaction Calls