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

Package: Quasar

Routine: ACKQCLED


Information

ACKQCLED ;SMT - ACKQ CLINICIAN EDIT MENU ;11/14/07 10:24am ; 9/22/09 8:48am

Source Information

Source file <ACKQCLED.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Menu Entry Point.
SRCH ;Search New Person file for a name
ADDSTF ;Add A&SP Staff Member
EDTSTF ;Edit an A&SP Staff Member.
; Force User with No PERSON CLASS to remain student.
NMVD ;Validate that the NEW PERSON names match the A&SP Staff names,
PCCHK(NPIEN) ;Check if User has a PERSON CLASS valid to QUASAR.
; Input:
; NPIEN = New Person File IEN
; Output:
; 1 - if Audiology/Valid Quasra person class exists and is active
; 0 - No valid Quasar person class exists or is active(can be student)
; -1 - No Person classes assigned to this user(can be student)
USRCHK(NPNM) ;Check if User has valid USR Class
; Input:
; NPNM = FILE 200 NAME
; Output:
; Returns 1 if Valid, 0 if invalid.
EX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SRCH+2
Function Call: WRITE
  • Prompt: !,$P(Y,"^",2)_" is already an A&SP Staff Member"
  • Line Location: ADDSTF+5
Function Call: WRITE
  • Prompt: !,"Are you adding "_$P(RSLT,"^",2)_" as a new A&SP Staff"
  • Line Location: ADDSTF+7
Function Call: WRITE
  • Prompt: !,$P(RSLT,"^",2)_$S(PCK=-1:" has no PERSON CLASS, status will be set to STUDENT.",1:" needs a valid PERSON CLASS.")
  • Line Location: ADDSTF+9
Function Call: WRITE
  • Prompt: !,$P(RSLT,"^",2)_" needs a valid USR CLASS."
  • Line Location: ADDSTF+10
Function Call: WRITE
  • Prompt: "ERROR"
  • Line Location: ADDSTF+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls,  GET1^DIQ
200.05 GETS^DIQ
^ACK(509850.3 - [#509850.3] Classic Fileman Calls,  GET1^DIQ
^USR(8930.3 - [#8930.3] FIND^DIC,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call