NURSUT2 ;HIRMFO/MD,RM,FT-UTILITIES FOR FILES 210 AND 211.8 ;01/06/97
Source file <NURSUT2.m>
| 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. |
