Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: FHMADM4

Package: Dietetics

Routine: FHMADM4


Information

FHMADM4 ; HISC/AAC - Multidivisional Staffing Data Report ;10/10/03 16:08

Source Information

Source file <FHMADM4.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 4 ^%DT  (C,DOW,NOW)^%DTC  ^DIC  ^DIE  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
Dietetics 2 (DTP,EN2)^FH  DT^FHMADM2  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHADM4  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Process Printing Staffing Report
QUIT ;
Q3 ;
Q2 ;Print Averages
Q4 ;
FTOTALS ;Print Final Totals
LN
EN1 ; Enter/Edit Staffing Data
EN2 ; Print Staffing Data Report
M1 ; Get total Meals
; S Y1=$G(^FH(117,D1,0)) Q:Y1="" I '$D(^FH(117,D1,1)) Q S Y2=$G(^FH(117,D1,1)) Q
KIL
PRINT
N1 ;Get specific records
N2 ;Get Communications Offices
E1
HDR ;Print page headers

External References

Name Field # of Occurrence
^%DT E1
C^%DTC E1+3, Q4+3
DOW^%DTC Q1+2
NOW^%DTC EN1+1, Q1+3
^%ZIS PRINT+1
^%ZISC PRINT+3
^DIC N2+2
^DIE E1+4
DTP^FH Q1+1, Q1+3, N1+5
EN2^FH PRINT+2
DT^FHMADM2 EN2+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: E1+0
Function Call: WRITE
  • Prompt: *7,!!,"** Date must not be in the future!",!
  • Line Location: E1+1
Function Call: READ
  • Prompt: "Print report all Communications Offices Y or N: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: ZCO
  • Line Location: EN2+7
Function Call: WRITE
  • Prompt: !!,"The report requires a 132 column printer.",!
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !?7,"Total",?15
  • Line Location: Q4+5
Function Call: WRITE
  • Prompt: $J(S(K),$E(X,1)+1,$E(X,2))
  • Line Location: Q4+5
Function Call: WRITE
  • Prompt: !?7,"Avg.",?15
  • Line Location: Q2+1
Function Call: WRITE
  • Prompt: $J(S(K)/ND,$E(X,1)+1,$E(X,2))
  • Line Location: Q2+1
Function Call: WRITE
  • Prompt: !?7,"% Paid",?68
  • Line Location: Q2+2
Function Call: WRITE
  • Prompt: $J(S(K)/S(22)*100,$E(X,1)+1,0)
  • Line Location: Q2+2
Function Call: WRITE
  • Prompt: !!?7,"Adjustment for Unscheduled and Intermittent",!!?7,"UNS/INT Total "
  • Line Location: Q2+3
Function Call: WRITE
  • Prompt: $J(TOT,5,1)," FTEE",!?7,"Adjusted Measured FTEE "
  • Line Location: Q2+3
Function Call: WRITE
  • Prompt: $J(TOT,5,1)," FTEE",!?7,"Adjusted Measured FTEE "
  • Line Location: Q2+3
Function Call: WRITE
  • Prompt: $J(TOT,5,1)," FTEE",!?7,"Adjusted Measured FTEE "
  • Line Location: Q2+3
Function Call: WRITE
  • Prompt: !!?7,"Man Minutes/Meal: ",$J(MAN/FHTOT,0,0)
  • Line Location: Q2+4
Function Call: WRITE
  • Prompt: !
  • Line Location: Q2+5
Function Call: WRITE
  • Prompt: !?6,"All Total",?13
  • Line Location: FTOTALS+2
Function Call: WRITE
  • Prompt: $J(SS(K),$E(X,1)+1,$E(X,2))
  • Line Location: FTOTALS+2
Function Call: WRITE
  • Prompt: !?6,"All Avg.",?15
  • Line Location: FTOTALS+4
Function Call: WRITE
  • Prompt: $J(SS(K)/SSND,$E(X,1)+1,$E(X,2))
  • Line Location: FTOTALS+4
Function Call: WRITE
  • Prompt: !?6,"All % Paid",?68
  • Line Location: FTOTALS+5
Function Call: WRITE
  • Prompt: $J(SS(K)/SS(22)*100,$E(X,1)+1,0)
  • Line Location: FTOTALS+5
Function Call: WRITE
  • Prompt: !!?6,"All Adjustment for Unscheduled and Intermittent",!!?6,"All UNS/INT Total "
  • Line Location: FTOTALS+6
Function Call: WRITE
  • Prompt: $J(TOT,5,1)," FTEE",!?6,"All Adjusted Measured FTEE "
  • Line Location: FTOTALS+6
Function Call: WRITE
  • Prompt: $J(SSTOT,6,1)
  • Line Location: FTOTALS+7
Function Call: WRITE
  • Prompt: !?6,"All Avg Measured FTEE ",$J(SSTOT/ND,5,1)
  • Line Location: FTOTALS+7
Function Call: WRITE
  • Prompt: !!?6,"Man Minutes/Meal: ",$J(SMAN/SFHTOT,0,0)
  • Line Location: FTOTALS+8
Function Call: WRITE
  • Prompt: !
  • Line Location: FTOTALS+9
Function Call: WRITE
  • Prompt: !?4,HDT,?44,"S T A F F I N G D A T A W O R K S H E E T",?122,"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,?1,NAME
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!?(132-$L(DTE)\2),DTE
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!?15,"| DAILY| CLIN|ADMIN| SUPP| SUPV| MEAS| POT | OFF |WOP| OT|UNS|INT| PAID|COP| AL| SL|OTH|LND|CMP|TRN|VOL|BOR|TOTAL"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !?15,"| FTEE| FTEE| FTEE| FTEE| FTEE| FTEE| HRS | HRS |HRS|HRS|HRS|HRS| HRS |HRS|HRS|HRS|HRS|HRS|HRS|HRS|HRS|HRS| HRS"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?4,"----------------------------------------------------------------------------------------------------------------------------"
  • Line Location: LN+0
Function Call: WRITE
  • Prompt: !?4,$P("Sun Mon Tue Wed Thu Fri Sat"," ",DOW)," ",$E(DTP,1,6)," "
  • Line Location: N1+9
Function Call: WRITE
  • Prompt: "|",N(K)
  • Line Location: N1+10
Routine Call
  • DIE
  • Line Location:
    • E1+4
Routine Call
  • DIC
  • Line Location:
    • N2+2
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(117.1 - [#117.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(117 - [#117] M1+7
^FH(117.1 - [#117.1] E1+2*, E1+3, N1+1, N1+2
^FH(119.73 - [#119.73] EN2+6, Q3+2, Q3+3

Label References

Name Line Occurrences
E1 E1, E1+1
EN1 E1+4
FTOTALS QUIT+5
HDR Q3+5, QUIT+4, N1+5
KIL E1, EN2+1, PRINT+1, PRINT+2, PRINT+3
LN QUIT+6, QUIT+7, Q4+4
M1 N1+11
N1 Q4+3
N2 EN2+7, N2+4
PRINT N2+3
Q1 PRINT+3
Q2 Q4+4
Q3 Q3+2, Q3+3, Q3+7, Q3+8
Q4 Q3+6
QUIT Q3+2, Q3+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+1, Q1+3
>> %DT E1*
>> %DT("A" E1*
%ZIS PRINT+1!*, PRINT+3!
%ZIS("A" PRINT+1*
AV Q1+4!
>> CO EN2+3*, Q3+2, N2+2, N2+4*
>> CON N2+4*
>> CONAM EN2+3*, N2+4*
>> CONAME EN2+3*, Q3+2, N2+4*
>> CONUM EN2+3*, Q3+7, N1+1*, N1+2*, M1+7
>> CONUMX Q3+2*, N2+4*
>> COUNT EN2+3*, Q3+3*, N1+2
>> COXX EN2+3*, Q3+2*, N1+1
>> D1 Q4+3*, N1+1, N1+2, N1+5, M1+7
>> DA E1+1*, E1+2, E1+3
DIC E1+2!, N2+1*, N2+5!
DIC("A" N2+1*
DIC(0 N2+1*
DIE E1+2!*
>> DM1 E1+3*
>> DOW Q1+2*, Q4+3*, N1+9
>> DR E1+4*
DT EN1+1*, E1+1
>> DTE Q1+1*, HDR+3
DTIME EN2+7
>> DTOUT E1
>> DTP Q1+1*, Q1+3*, N1+5*, N1+9
>> EDT Q1+1, Q4+3
>> FHLST PRINT+2*
>> FHPGM PRINT+2*
>> FHTOT Q4+3*, Q2+4, M1+13*
>> FHX1 E1+3*
>> HDT Q1+3*, HDR+1
IO PRINT+3
IO("Q" PRINT+2
IOF HDR+1
IOP PRINT+1!, PRINT+3!
IOSL N1+5
IOST HDR+1
>> K EN2+4*, Q1+4*, Q4+2*, Q4+5*, Q2+1*, Q2+2*, FTOTALS+2*, FTOTALS+5*, N1+10*, M1+8*
, M1+9*
>> L N1+6*, M1+8*, M1+9*
>> L1 Q4+3*
M M1+8!
M( M1+8*, M1+9*
M(1 M1+10
M(10 M1+11*, M1+12
M(11 M1+12
M(12 M1+12
M(13 M1+12*
M(14 M1+12
M(15 M1+12
M(16 M1+12*
M(17 M1+12*
M(18 M1+12*, M1+13
M(2 M1+10
M(3 M1+10*, M1+11
M(4 M1+10
M(5 M1+10
M(6 M1+10*, M1+11
M(7 M1+10
M(8 M1+10
M(9 M1+10*, M1+11
>> MAN Q4+3*, Q2+4*
N N1+6!
N( N1+6*, N1+10*
N(1 N1+7
N(10 N1+8
N(11 N1+8
N(12 N1+8
N(13 N1+8
N(14 N1+8
N(15 N1+8
N(16 N1+8
N(17 N1+8
N(18 N1+8
N(19 N1+8
N(2 N1+7
N(20 N1+7*, N1+8
N(21 N1+7*, N1+8
N(22 N1+8*
N(23 N1+8*
N(3 N1+7
N(4 N1+7
N(5 N1+7
N(6 N1+8
N(7 N1+8
N(8 N1+8
N(9 N1+8
>> NAME Q3+2*, Q3+3*, QUIT+3*, HDR+2
>> ND Q4+3*, Q4+4, Q2+1, N1+4*
>> PG Q1+3*, HDR+1*
>> POP PRINT+1
S Q1+4!
S( Q1+4*, Q4+2*, Q4+5, Q2+1, Q2+2, N1+10*
S(22 Q2+2, Q2+4
>> SDT Q1+1, Q1+2, Q4+3
>> SFHTOT Q4+3*, Q2+4*, FTOTALS+8
>> SIZ Q1+5*, Q4+5, Q2+1, Q2+2, FTOTALS+2, FTOTALS+5, N1+10
>> SMAN EN2+3*, Q2+4*, FTOTALS+8*
>> SS( EN2+4*, Q4+5*, FTOTALS+2, FTOTALS+5
>> SS(22 FTOTALS+5, FTOTALS+8
>> SSND EN2+3*, N1+4*
>> SSTO1 EN2+3*, FTOTALS+7, N1+8*
>> SSTOT EN2+3*, FTOTALS+6*, FTOTALS+7*, N1+8*
>> TO1 Q4+3*, Q2+3, N1+8*
>> TOT Q4+3*, Q2+3*, FTOTALS+6, N1+8*
>> X E1, E1+3, EN2+1, Q1+2*, Q4+3, Q4+5*, Q2+1*, Q2+2*, FTOTALS+2*, FTOTALS+5*
, N1+10*
>> X0 E1+2*
>> X1 E1+3*, Q4+3*
>> X2 E1+3*, Q4+3*
>> Y E1, E1+1, Q1+2, N2+2, N2+3, N2+4, N2+5
>> Y1 M1+7*, M1+8
>> Y2 M1+7*, M1+9
>> Y3 N1+1*, N1+2*
>> Y4 N1+1*, N1+2*, N1+6
>> Y5 N1+1*, N1+2*
>> ZCO EN2+3*, EN2+7*, Q3+2, Q3+3, Q3+7, Q3+8, N1+1, N1+2
>> ZOUT EN2+6*, Q3+3, N1+1, N1+2
>> ZZCOUNT EN2+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All