Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: NURSUT2

Package: Nursing Service

Routine: NURSUT2


Information

NURSUT2 ;HIRMFO/MD,RM,FT-UTILITIES FOR FILES 210 AND 211.8 ;01/06/97

Source Information

Source file <NURSUT2.m>

Caller Graph

Caller Graph Total: 46

Package Total Caller Graph
Nursing Service 45 NURA5A  NURA5C  NURA6C1  NURA6C2  NURA6D1  NURA6D2  NURA6G  NURA6I1  
NURA6I2  NURA6K2  NURA7A  NURA7B  NURA9C1  NURA9C2  NURA9D1  NURA9D2  
NURA9G  NURA9I  NURA9K  NURAAU2  NURADEG  NURAED1  NURAED2  NURAFSD  
NURAGE  NURAGEN  NURAGEN1  NURAMH9  NURAR110  NURAR1A  NURARCRW  NURARMH1  
NURARPC2  NURSCPLC  NURSEP31  NURSEPC1  NURSEPCA  NURSEPCP  NURSEPD2  NURSEPD3  
NURSEPL1  NURSEPML  NURSUT3  ^NURSF(210  OCCUPANCY/TRANSFERRED DATE  
PAID 1 PRSNUT03  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;GET THE TOTAL EMPLOYEE FTEE
; INPUT VARIABLES: NUR("DA")=ENTRY IN FILE 210 FOR NURSING EMPLOYEE
; NUR("DT")=DATE AT WHICH TOTAL FTEE TO BE CALCULATED
; (OPTIONAL VARIABLE DT IS USED IF NOT SUPPLIED)
; OUTPUT VARIABLE: NURTFTEE=TOTAL ASSIGNMENT FTEE
TOTX
EN2 ;VARIABLE D0=NURS EMPLOYEE IEN IS PASSED IN TO COMPUTE PRIMARY LOCATION
S2 ;
SETLOC
EN3 ; ENTRY TO DETERMINE IF A POSITION CHANGE WILL CREATE DUPLICATE
; PRIMARY ASSIGNMENTS, MAKE TOTAL FTEE>1, MAKE THE START DATE
; AFTER THE VACANCY DATE OF THE ASSIGNMENT, OR CREATE DUPLICATE
; SERVICE POSITIONS ON THE SAME LOCATION
; INPUT VARIABLES: DA(1) AND DA = DEFINE THE POSITION ENTRY
; NUR(0)=DATA TO BE FILED IN ZEROTH NODE; AND OF THE
; SAME STRUCTURE AS THE ZEROTH NODE.
; OUTPUT VARIABLES: NURSBAD=$S(0:NO PROB,1:PROB)^$S(1:FTEE>1,2:DUP PRI,
EN4 ; ENTRY FROM ASSIGNMENT EDIT TO VALIDATE POSITION ENTRY.
STPOAR ;
ST1 ;
DTPRC ;
VACDT ;
VAC1 ;
CAT(NURCAT) ; Input: Service Category code (i.e, R, L, N, A, S, C, O or
; O_<space>_sub-category value)
; Ouput: Expanded value of Service Category.
CNTR(NURPARM) ; Center Printed String
PROD(NURPROG) ; Input: Nurs Product Line free text value
; Output: Expanded value of Service Category.
FACL(NURFAC) ; Input: Facility free text value.
; Output: Printable Facility value.

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^NURSF(210 - [#210] EN1+5, EN2+1
^NURSF(211.8 - [#211.8] EN1+6, TOTXEN2+2, S2+1, SETLOCEN3+11, STPOAR+1, ST1+1
^SC - [#44] SETLOC

Label References

Name Line Occurrences
DTPRC EN4+4
S2 EN2+2
SETLOC S2+1
ST1 STPOAR+1
STPOAR EN3+11
TOTX EN1+6
VAC1 VACDT+1
VACDT DTPRC+1

Naked Globals

Name Field # of Occurrence
^(0 EN1+5, TOTXEN2+1, S2+1, SETLOCSTPOAR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 EN2+1
>> DA EN3+12, ST1+1
>> DA(1 EN3+12, ST1+1
DT EN1+5, SETLOCDTPRC+4
NUR EN1+5*, EN1+6, EN1+7!, TOTXEN2+1*, EN2+3!, SETLOC*, EN3+9!, EN3+11*, EN4+8!
STPOAR+1
NUR("CNTR" EN3+10*, EN4+7, ST1+1*
NUR("DA" EN1+5
NUR("DT" EN1+5*, TOTX
NUR("PRI" EN4+1*, EN4+7, DTPRC+2*, DTPRC+8, VAC1+1*
NUR("SDT" EN3+12*, EN4+2*, EN4+3, EN4+4, ST1+1*, DTPRC+1, DTPRC+2, DTPRC+3, DTPRC+8, VACDT+1
NUR("SP" EN4+1*, DTPRC+3*, DTPRC+4, DTPRC+5*, DTPRC+6, DTPRC+8
NUR("TFTE" EN4+1*, DTPRC+2*, DTPRC+8, VAC1+1*
NUR("TOUR" EN4+1*, DTPRC+6*, DTPRC+8
NUR("VDT" EN3+12*, EN4+1*, ST1+1*, DTPRC+1, DTPRC+8, VACDT+1*, VAC1+1
NUR(0 EN1+6*, TOTXEN2+2*, S2+1, SETLOCEN3+9*, EN3+11, EN3+12, STPOAR+1
NUR(1 TOTX*, S2+1*, EN3+11*, EN4+3*, EN4+4, STPOAR+1, ST1+1, DTPRC+2, DTPRC+3
NUR(2 TOTX*, S2+1*, SETLOCEN4+4*, STPOAR+1*, ST1+1, DTPRC+2, DTPRC+3
NUR(3 EN2+1*, EN2+2, S2+1, STPOAR+1*, ST1+1
NUR(4 VACDT+1*, VAC1+1
NUR(5 VAC1+1*
NURCAT CAT~, CAT+4*, CAT+5*, CAT+6
NURCNTR CNTR+4~*, CNTR+5
NURFAC FACL~, FACL+2
>> NURLS EN4+1
NURPARM CNTR~, CNTR+4
>> NURPFAC FACL+2*, FACL+3
>> NURPPROD PROD+3*, PROD+4
NURPROG PROD~, PROD+3
>> NURS132 CNTR+4
>> NURSBAD EN4+1*, EN4+2, EN4+3, EN4+4, EN4+7*, DTPRC+8*, DTPRC+9
>> NURSNPOS DTPRC+9*
>> NURSPOS(1 DTPRC+9*
>> NURTFTEE EN1+6*, TOTX*
NURZ EN3+9*, EN4+8!
NX EN4+1*, EN4+8!, DTPRC+3*, DTPRC+4
NX(0 DTPRC+4*, DTPRC+5, DTPRC+6
U EN1+5, TOTXEN2+1, SETLOCEN3+11, EN3+12, STPOAR+1, ST1+1, DTPRC+2, DTPRC+3
DTPRC+4, DTPRC+5, DTPRC+6, DTPRC+9, VAC1+1
X EN2+3*, CNTR+4~*
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All