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

Package: Quasar

Routine: ACKQASU7


Information

ACKQASU7 ;HCIOFO/AG - New/Edit Visit Utilities ; 04/01/99

Source Information

Source file <ACKQASU7.m>

Entry Points

Name Comments DBIA/ICR reference
SHOWPCE(ACKGBL) ; display errors from COPYPCE stored in @ACKGBL
; this routine displays on the screen any errors found in the global
; referenced by ACKGBL that were created by COPYPCE^ACKQASU4.
; format for global is @ACKGBL=number or errors
; @ACKGBL@(n)=field^int^ext^message
; returns:- 0 - continue, 1 - user typed '^' to exit
PAUSE ;
ACKAPMNT(ACKVD,ACKVTME,ACKCLIN,ACKPAT) ;
MESSAG ;
OK2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?2,"ERROR - The following errors occurred while copying the PCE Visit"
  • Line Location: SHOWPCE+13
Function Call: WRITE
  • Prompt: !?2,"data into QUASAR. The fields in error are displayed below with the"
  • Line Location: SHOWPCE+14
Function Call: WRITE
  • Prompt: !?2,"reason they were rejected.",!
  • Line Location: SHOWPCE+15
Function Call: WRITE
  • Prompt: !?2,ACKFLD_":",?13,$E(ACKDTA,1,20)
  • Line Location: SHOWPCE+24
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ACKLF
  • Line Location: SHOWPCE+31
Function Call: WRITE
  • Prompt: ?ACKTAB,ACKTXT
  • Line Location: SHOWPCE+31
Function Call: WRITE
  • Prompt: !!
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+4
Function Call: WRITE
  • Prompt: !!!,"WARNING -",!
  • Line Location: MESSAG+1
Function Call: WRITE
  • Prompt: !,"You are Creating a Visit that does not exist within Appointment Management."
  • Line Location: MESSAG+2
Function Call: WRITE
  • Prompt: !,"This Visit will not be displayed within Appointment Management.",!
  • Line Location: MESSAG+3
Function Call: WRITE
  • Prompt: !,"Jumping not allowed.",!
  • Line Location: OK2+3
Info |  Source |  Entry Points |  Interaction Calls