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

Package: Nursing Service

Routine: NURAR110


Information

NURAR110 ;HIRMFO/MD-PRINT MODULE FOR FTEE COMPARISON BY LOCATION ;5/19/97

Source Information

Source file <NURAR110.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;ENTRY POINT TO PRINT MODULE
NEXT
WRITHDR ;
PRTDETL ;
NODETL ;
PRTSUM ;
NEXTP
NEXTL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?15,"THERE IS NO DATA FOR THIS REPORT"
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: WRITHDR+1
Function Call: WRITE
  • Prompt: !,?$$CNTR^NURSUT2(NURFAC),$$FACL^NURSUT2(NURFAC)
  • Line Location: WRITHDR+3
Function Call: WRITE
  • Prompt: !,"NURSING SERVICE BUDGETED/ACTUAL FTEE BY WARD",?70,"PAGE: ",NURPAGE
  • Line Location: WRITHDR+4
Function Call: WRITE
  • Prompt: !!,?31,"BUDGETED",?44,"ACTUAL",!,"TITLE",?33,"FTEE ",?45,"FTEE",?54,"VARIANCE"
  • Line Location: WRITHDR+5
Function Call: WRITE
  • Prompt: " ",Y,!,$$REPEAT^XLFSTR("-",80)
  • Line Location: WRITHDR+5
Function Call: WRITE
  • Prompt: !?Y,$G(Z),!?Y,$$REPEAT^XLFSTR("-",$L(Z)+1)
  • Line Location: WRITHDR+7
Function Call: WRITE
  • Prompt: !!,?15,"WARD: ",NL1,!
  • Line Location: WRITHDR+9
Function Call: WRITE
  • Prompt: !!,NPOS,?30,$J(+NBFTE,8,3),?41,$J(NAFTE,8,3),?52,$J(NVAR,8,3)
  • Line Location: PRTDETL+6
Function Call: WRITE
  • Prompt: !,?15,"THERE IS NO DATA FOR WARD: ",NL1
  • Line Location: NODETL+2
Function Call: WRITE
  • Prompt: !,?31,"--------",?42,"--------",?53,"--------"
  • Line Location: NEXTL+2
Function Call: WRITE
  • Prompt: !,?17,"WARD TOTAL =",?30,$J(+NTOTB,8,3),?41,$J(NTOTA,8,3),?52,$J(NTOTV,8,3)
  • Line Location: NEXTL+3
Function Call: WRITE
  • Prompt: ?30,$J(+NTRB,8,3),?41,$J(NTRA,8,3),?52,$J(NTRV,8,3)
  • Line Location: NEXTL+4
Function Call: WRITE
  • Prompt: ?30,$J(+NTLB,8,3),?41,$J(NTLA,8,3),?52,$J(NTLV,8,3)
  • Line Location: NEXTL+5
Function Call: WRITE
  • Prompt: ?30,$J(+NTNB,8,3),?41,$J(NTNA,8,3),?52,$J(NTNV,8,3)
  • Line Location: NEXTL+6
Function Call: WRITE
  • Prompt: ?30,$J(+NTAB,8,3),?41,$J(NTAA,8,3),?52,$J(NTAV,8,3)
  • Line Location: NEXTL+7
Function Call: WRITE
  • Prompt: ?30,$J(+NTCB,8,3),?41,$J(NTCA,8,3),?52,$J(NTCV,8,3)
  • Line Location: NEXTL+8
Function Call: WRITE
  • Prompt: ?30,$J(+NTOB,8,3),?41,$J(NTOA,8,3),?52,$J(NTOV,8,3)
  • Line Location: NEXTL+9
Info |  Source |  Entry Points |  Interaction Calls