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

Package: Nursing Service

Routine: NURSEP31


Information

NURSEP31 ;HIRMFO/JH,FT-NURSING MANDATORY INSERVICE CLASS DATA FOR THE LAST THREE YEARS ;3/19/98 13:17

Source Information

Source file <NURSEP31.m>

Entry Points

Name Comments DBIA/ICR reference
EN1
START ;
QUIT
FIN
FIN1 ;
FIN2
FIN3
HDR
PHDR
CHDR
SORT
A
SORT1 ;
COMPARE ;CHECK FOR NEW FISCAL YEAR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+10
Function Call: WRITE
  • Prompt: !,"THERE IS NO DATA FOR THIS REPORT."
  • Line Location: START+7
Function Call: WRITE
  • Prompt: !,NM_" "_NURSPEC(1),!
  • Line Location: FIN+0
Function Call: WRITE
  • Prompt: !
  • Line Location: FIN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: FIN2+0
Function Call: WRITE
  • Prompt: !?$$CNTR^NURSUT2(NURFAC),$$FACL^NURSUT2(NURFAC)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"3 "_$S(TYP="C":"CY ",1:"FY ")_$S(NURSEL="M":"MANDATORY",NURSEL="O":" OTHER",NURSEL="W":" WARD",NURSEL="C":"C.E.",1:" COMPLETE")_" TRAINING REPORT BY "_$S($G(NURSEL(1))=2:"SVC. CATEGORY",1:"UNIT"),?$S(NURS132:100,1:52)," ",NDATE
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?$S(NURS132:121,1:69),"PAGE: ",NURPAGE,!!,$S(NURS132:"EMPLOYEE NAME",1:"EMPLOYEE NAME/CLASS")
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?37,"CLASS"
  • Condition for execution: NURS132
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: ?92," "
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?46," "
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: " ",Z
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,HH
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,?$$CNTR^NURSUT2(NURPROG),$G(Z),!,?$$CNTR^NURSUT2(NURPROG),$$REPEAT^XLFSTR("-",$L(Z)+1)
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PHDR+0
Info |  Source |  Entry Points |  Interaction Calls