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

Package: Quasar

Routine: ACKQASU2


Information

ACKQASU2 ;HCIOFO/BH-NEW/EDIT VISIT QUASAR UTILITIES ; 04/01/99

Source Information

Source file <ACKQASU2.m>

Entry Points

Name Comments DBIA/ICR reference
ADD
POST(ACKVIEN) ;
GETDATA
NULL ; NUll out fields that should not bo present or have been set
; incorrectly
EXIT ; One way out
MINIMUM ; Minimum Data not entered. If New Visit user can either delete or
; re-edit the visit if user is editing a visit user only has option
; to re-edit the visit.
DELETE ; Delete the entry
CORRUPT ; Display corrupt data message
QUASAR ; Display Quasar heading and missing fields
PCE ; Display PCE missing fields
PCE1
CHOICE ; Display choice - either enter '^' to quit entry or <Return> to
; re-enter the template
CHOICE1 ; Prompt for PCE choice - An Exception may not be set when the PCE Inte-
; -face is on so dont prompt user with 'Send to PCE' options if no
; exception is present (i.e. ACKEXPT=0).
DISP
UTLAUD ;
LEFT ; Cannot calculate average if a null value exists
VALUES ; Get value for calculation
EXPT(ACKVIEN) ; Passes back 1 or zero depending if visit has an Exception
; entry set up.
DISPLAY ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," ",ACKARR(1,ACKK1)
  • Line Location: NULL+28
Function Call: WRITE
  • Prompt: !," ",ACKARR(2,ACKK2)
  • Line Location: NULL+30
Function Call: WRITE
  • Prompt: !!
  • Line Location: NULL+32
Function Call: WRITE
  • Prompt: !!
  • Line Location: NULL+32
Function Call: WRITE
  • Prompt: !," ",ACKARR(1,ACKK1)
  • Line Location: NULL+37
Function Call: WRITE
  • Prompt: !!
  • Line Location: NULL+38
Function Call: WRITE
  • Prompt: !!
  • Line Location: NULL+38
Function Call: WRITE
  • Prompt: !!,$C(7),"<<INCOMPLETE RECORD DELETED!!>>",!!
  • Line Location: DELETE+2
Function Call: WRITE
  • Prompt: !!,"ERROR - This record has become corrupted.",!
  • Line Location: CORRUPT+2
Function Call: WRITE
  • Prompt: !!," WARNING - ",!
  • Line Location: QUASAR+2
Function Call: WRITE
  • Prompt: " The following are fields required by QUASAR that have not been entered.",!
  • Line Location: QUASAR+3
Function Call: WRITE
  • Prompt: " Enter <RETURN> to re-enter this function or '^' to quit.",!!
  • Line Location: QUASAR+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PCE+2
Function Call: WRITE
  • Prompt: " WARNING - ",!!
  • Line Location: PCE+3
Function Call: WRITE
  • Prompt: " The following are fields required by QUASAR & PCE that have not been entered.",!
  • Line Location: PCE+4
Function Call: WRITE
  • Prompt: !," '^' Quit & File the A&SP visit but do not send incomplete A&SP"
  • Line Location: PCE1+0
Function Call: WRITE
  • Prompt: !," visit to PCE. Or,"
  • Line Location: PCE1+1
Function Call: WRITE
  • Prompt: !!,"The following field(s) are required by QUASAR but have not been entered.",!!
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: " CDR Account",!
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: " Appointment Time",!
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISPLAY+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACK(509850.6 - [#509850.6] Classic Fileman Calls,  GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call