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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: VADPT61

Package: Registration

Routine: VADPT61


Information

VADPT61 ;ALB/MJK - Patient ID Utilities (cont.); 12 AUG 89 @1200

Source Information

Source file <VADPT61.m>

Entry Points

Name Comments DBIA/ICR reference
1 ;;ID Format Enter/Edit
Q1
2 ;;Eligibility Code Enter/Edit
Q2
ASK ;
WARN ; -- interaction warning
BEG ;
END ;
TASK ;
TASKQ
OPTS ; -- queue task list ;;opt#;description;vars to save

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: 2+1
Function Call: WRITE
  • Prompt: !!,*7,"User Input Needed for '",$P(^DIC(8,VAELG,0),U),"' id:"
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: !!?5,"...",$P(^DIC(8,VAELG,0),U)
  • Line Location: ASK+4
Function Call: WRITE
  • Prompt: !!?5,*7,"WARNING: User interaction usually is required for this format."
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !!?5,"The resetting of ID formats can take many hours."
  • Line Location: TASK+1
Function Call: WRITE
  • Prompt: !?5,"It is suggested that it be run at off-peak hours,"
  • Line Location: TASK+2
Function Call: WRITE
  • Prompt: !?5,"perferably over a weekend.",!
  • Line Location: TASK+3
Function Call: WRITE
  • Prompt: !!,"Job has been queued. (Task #",ZTSK,")",!,"A MailMan message will be sent to you when the job has completed."
  • Line Location: TASK+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(8 - [#8] Classic Fileman Calls
^DIC(8.2 - [#8.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call