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

Package: Nursing Service

Routine: NURADEG


Information

NURADEG ;HIRMFO/JH,FT-LIST STAFFS' COMBINED NURSING AND ACADEMIC DEGREES ;11/20/96

Source Information

Source file <NURADEG.m>

Entry Points

Name Comments DBIA/ICR reference
EN1
DEG
START ;
Q
MSG1
DEGREE
CHKLINE
NHDR
PROD
HSKEEP
NODEGR ; NO DEGREE MESSAGE

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: DEG
  • Timeout: DTIME
  • Line Location: DEG+0
Function Call: WRITE
  • Prompt: !!,$C(7),"Select Sort Parameter by choosing '1','2' or '3'"
  • Line Location: DEG+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DEG+7
Function Call: WRITE
  • Prompt: ?26,$$CAT^NURSUT2($G(NURSCAT)),!!,?19,"NO DEGREE(S) FOUND !",!
  • Line Location: START+5
Function Call: WRITE
  • Prompt: ?26,$$CAT^NURSUT2($G(NURSCAT))
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !?19,"( NOTIFY YOUR IRM PERSONNEL. )"
  • Line Location: START+28
Function Call: WRITE
  • Prompt: !,NURANAM,?26,$S(DEG=1:NPSPOS(1),1:$E($P(^TMP($J,"HIGH",DA),U,4),1,6)),?34,NURASSN
  • Line Location: DEGREE+1
Function Call: WRITE
  • Prompt: ?$$CNTR^NURSUT2($G(NURFAC)),$$FACL^NURSUT2($G(NURFAC))
  • Line Location: NHDR+2
Function Call: WRITE
  • Prompt: !,@HEAD1,!,?26,"SVC",@HEAD2
  • Line Location: NHDR+3
Function Call: WRITE
  • Prompt: !!?19,"NO DEGREE(S) FOUND FOR "_NL1_"!"
  • Line Location: NODEGR+1
Info |  Source |  Entry Points |  Interaction Calls