PRSNUT01 ;WOIFO/JAH - Nurse Activity for VANOD Utilities;6/5/2009
Source file <PRSNUT01.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETCODES(PRSIEN) | ;function returns the following codes from file 450
; Cost Center (CST) ; Budget Object Code (BOC) ; Assignment Code (ASN) ; Occupation Series Code (OCC) |
|
| GETDEG(PRSIEN) | ;function returns degree and year of degree
|
|
| ISNURSE(PRSIEN) | ;Return True if employee is a nurse
|
|
| NURSTYP | ;
|
|
| ACTIVLOC(ACTLOC,PRSDT) | ; return list of active locations for a given date
|
|
| ACTIVLST(ACTLOC,PRSDT) | ; return list of active locations that are active
|
|
| ISACTIVE(PRSDT,LIEN) | ;Return TRUE if location is active on date
|
|
| ISACTPP(PRSDT,LIEN) | ;Return True if location is active for any days
; during the pay period associated with date |
|
| POCRANGE() | ;Prompt user for POC date range and return start and stop dates
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^NURSF(211.4 - [#211.4] | GETS^DIQ |
| ^DIC(4 - [#4] | GETS^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^PRSPC - [#450] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^NURSF(211.4 - [#211.4] | ACTIVLOC+26, ACTIVLST+28, ISACTIVE+14, ISACTIVE+18, ISACTIVE+22, ISACTIVE+29 |
| ^PRSN(451 - [#451] | POCRANGE+12, POCRANGE+14 |
| ^PRSN(451.1 - [#451.1] | ISNURSE+30, ISNURSE+32, ISNURSE+34, ISNURSE+36, NURSTYP+2, NURSTYP+3 |
| ^PRST(458 - [#458] | ISACTPP+13, ISACTPP+16, ISACTPP+17, ISACTPP+18, POCRANGE+15, POCRANGE+18 |
| Name | Line Occurrences |
|---|---|
| $$GETCODES | ISNURSE+15 |
| $$ISACTIVE | ACTIVLOC+27, ISACTPP+20 |
| $$ISACTPP | ACTIVLST+29 |
| NURSTYP | ISNURSE+30, ISNURSE+32, ISNURSE+34, ISNURSE+36 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | POCRANGE+3~, POCRANGE+4*, POCRANGE+39~, POCRANGE+40* |
| %DT("A" | POCRANGE+5*, POCRANGE+41* |
| ACTIVE | ACTIVLOC+23~, ACTIVLOC+27*, ACTIVLOC+28, ACTIVLOC+30, ACTIVLST+25~, ACTIVLST+29*, ACTIVLST+30, ACTIVLST+32, ISACTPP+12~, ISACTPP+19 , ISACTPP+20*, ISACTPP+22 |
| ACTLOC | ACTIVLOC~, ACTIVLOC+22!, ACTIVLST~, ACTIVLST+24! |
| ACTLOC( | ACTIVLOC+29*, ACTIVLOC+30*, ACTIVLST+31*, ACTIVLST+32* |
| ACTLOC(0 | ACTIVLOC+24*, ACTIVLOC+29*, ACTIVLST+26*, ACTIVLST+31* |
| ASN | GETCODES+6~, GETCODES+11*, GETCODES+17, ISNURSE+11~, ISNURSE+18*, ISNURSE+29, ISNURSE+35 |
| ASNE | GETCODES+6~, GETCODES+15*, GETCODES+17 |
| BOC | GETCODES+6~, GETCODES+9*, GETCODES+17, ISNURSE+11~, ISNURSE+16*, ISNURSE+29, ISNURSE+31, ISNURSE+33, ISNURSE+35 |
| BOCE | GETCODES+6~, GETCODES+13*, GETCODES+17 |
| CODES | ISNURSE+11~, ISNURSE+15*, ISNURSE+16, ISNURSE+17, ISNURSE+18, ISNURSE+19 |
| CST | GETCODES+6~, GETCODES+12*, GETCODES+17, ISNURSE+11~, ISNURSE+19*, ISNURSE+33, ISNURSE+35 |
| CSTE | GETCODES+6~, GETCODES+16*, GETCODES+17 |
| DEGREE | GETDEG+2~, GETDEG+5*, GETDEG+7 |
| DIVI | ISACTIVE+15~, ISACTIVE+26*, ISACTIVE+32 |
| DT | ACTIVLOC+21, ACTIVLST+23, ISACTIVE+16 |
| EDTE | POCRANGE+22~, POCRANGE+57*, POCRANGE+58 |
| ENDDT | POCRANGE+22~, POCRANGE+49*, POCRANGE+50, POCRANGE+52, POCRANGE+57, POCRANGE+58 |
| EPPI | POCRANGE+11~, POCRANGE+12*, POCRANGE+13, POCRANGE+18 |
| FD | POCRANGE+11~, POCRANGE+18*, POCRANGE+19, POCRANGE+28, POCRANGE+35*, POCRANGE+36, POCRANGE+50 |
| FIELDS | GETCODES+6~, GETDEG+2~, ISNURSE+12~, ISACTIVE+15~ |
| FIELDS( | ISACTIVE+25, ISACTIVE+26 |
| FIELDS(4 | ISACTIVE+31 |
| FIELDS(450 | GETCODES+9, GETCODES+10, GETCODES+11, GETCODES+12, GETCODES+13, GETCODES+14, GETCODES+15, GETCODES+16, GETDEG+5, GETDEG+6 |
| FIRSTDT | POCRANGE+11~, POCRANGE+19*, POCRANGE+29, POCRANGE+36*, POCRANGE+51 |
| I | ISACTPP+12~, ISACTPP+19* |
| IEN | NURSTYP+1~, NURSTYP+2*, NURSTYP+3, ACTIVLOC+23~, ACTIVLOC+25*, ACTIVLOC+26*, ACTIVLOC+27, ACTIVLOC+29, ACTIVLOC+30, ACTIVLST+25~ , ACTIVLST+27*, ACTIVLST+28*, ACTIVLST+29, ACTIVLST+31, ACTIVLST+32 |
| IENS | GETCODES+6~, GETCODES+7*, GETCODES+8, GETCODES+9, GETCODES+10, GETCODES+11, GETCODES+12, GETCODES+13, GETCODES+14, GETCODES+15 , GETCODES+16, GETDEG+2~, GETDEG+3*, GETDEG+4, GETDEG+5, GETDEG+6, ISNURSE+12~, ISACTIVE+15~, ISACTIVE+23*, ISACTIVE+24 , ISACTIVE+25, ISACTIVE+26 |
| INSIEN | ISACTIVE+15~, ISACTIVE+29*, ISACTIVE+30, ISACTIVE+31, ISACTIVE+32 |
| ISNURSE | ISNURSE+12~, ISNURSE+13*, ISNURSE+14, ISNURSE+30, ISNURSE+32, ISNURSE+34, ISNURSE+36, ISNURSE+37, NURSTYP+3* |
| KEY | ISNURSE+11~, ISNURSE+29*, ISNURSE+30, ISNURSE+31*, ISNURSE+32, ISNURSE+33*, ISNURSE+34, ISNURSE+35*, ISNURSE+36, NURSTYP+2 |
| LASTDT | POCRANGE+11~, POCRANGE+16*, POCRANGE+31, POCRANGE+53 |
| LD | POCRANGE+11~, POCRANGE+15*, POCRANGE+16, POCRANGE+30, POCRANGE+52 |
| LIEN | ISACTIVE~, ISACTIVE+14, ISACTIVE+18, ISACTIVE+22, ISACTIVE+23, ISACTIVE+29, ISACTPP~, ISACTPP+20 |
| LOCE | ISACTIVE+15~, ISACTIVE+25*, ISACTIVE+32 |
| LPPI | POCRANGE+11~, POCRANGE+14*, POCRANGE+15 |
| NODE0 | ISNURSE+12~ |
| OCC | GETCODES+6~, GETCODES+10*, GETCODES+17, ISNURSE+11~, ISNURSE+17*, ISNURSE+29, ISNURSE+31, ISNURSE+33, ISNURSE+35 |
| OCCE | GETCODES+6~, GETCODES+14*, GETCODES+17 |
| OUT | POCRANGE+22~, POCRANGE+23*, POCRANGE+24, POCRANGE+26*, POCRANGE+33, POCRANGE+45*, POCRANGE+46, POCRANGE+48*, POCRANGE+55 |
| PPI | ISACTPP+12~, ISACTPP+13*, ISACTPP+15, ISACTPP+17*, ISACTPP+18 |
| PRSDT | ACTIVLOC~, ACTIVLOC+21*, ACTIVLOC+27, ACTIVLST~, ACTIVLST+23*, ACTIVLST+29, ISACTIVE~, ISACTIVE+16*, ISACTIVE+17*, ISACTIVE+18* , ISACTIVE+19, ISACTIVE+22, ISACTPP~, ISACTPP+13, ISACTPP+16*, ISACTPP+17, ISACTPP+19*, ISACTPP+20 |
| PRSDYS | ISACTPP+12~, ISACTPP+18*, ISACTPP+19 |
| PRSIEN | GETCODES~, GETCODES+7, GETDEG~, GETDEG+3, ISNURSE~, ISNURSE+14, ISNURSE+15 |
| SDTE | POCRANGE+22~, POCRANGE+56*, POCRANGE+58 |
| STARTDT | POCRANGE+22~, POCRANGE+27*, POCRANGE+28, POCRANGE+30, POCRANGE+35, POCRANGE+56, POCRANGE+58 |
| STATNUM | ISACTIVE+15~, ISACTIVE+31*, ISACTIVE+32 |
| STATUS | ISACTIVE+15~, ISACTIVE+20*, ISACTIVE+22*, ISACTIVE+32 |
| SUCCESS | POCRANGE+22~, POCRANGE+23*, POCRANGE+24, POCRANGE+32*, POCRANGE+45*, POCRANGE+46, POCRANGE+54* |
| U | GETCODES+17, GETDEG+7, ISNURSE+16, ISNURSE+17, ISNURSE+18, ISNURSE+19, NURSTYP+3, ACTIVLOC+30, ACTIVLST+32, ISACTIVE+14 , ISACTIVE+32, ISACTPP+13, ISACTPP+17, ISACTPP+19, POCRANGE+13, POCRANGE+15, POCRANGE+58 |
| X | POCRANGE+3~, POCRANGE+39~ |
| Y | POCRANGE+3~, POCRANGE+16*, POCRANGE+19*, POCRANGE+26, POCRANGE+27, POCRANGE+36*, POCRANGE+39~, POCRANGE+48, POCRANGE+49, POCRANGE+56* , POCRANGE+57* |
| YEAR | GETDEG+2~, GETDEG+6*, GETDEG+7 |