Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^ENG("EMP"

Package: Engineering

Global: ^ENG("EMP"


Information

FileMan FileNo FileMan Filename Package
6929 ENG EMPLOYEE Engineering

Description

Directly Accessed By Routines, Total: 31

Package Total Routines
Engineering 31 ENARG21    ENARG23    ENBCPM1    ENBCPM4    ENBCPM5    ENBCPM6    ENBCPM7    ENEQHS
ENEQPMP3    ENEQPMS2    ENEQPMS5    ENEQRP5    ENLIB1    ENSA1    ENSA4    ENSA5
ENSA6    ENSA8    ENSA9    ENWOD2    ENWONEW3    ENWOP2    ENWOP3    ENXIP65
ENY2K1    ENY2K5    TECHNICIANS ASSIGNED    ^ENG("EMP"    ENWOUTL    ^OFM(7336.9    ENY2K3    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Engineering 1 ENY2K1    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Engineering 4 ENGINEERING SECTION LIST(#6922)[#6922.31(.01)]    EQUIPMENT CATEGORY(#6911)[#6911.01(1)]    EQUIPMENT INV.(#6914)[75#6914.04(1)]    WORK ORDER #(#6920)[16#6920.02(.01)]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Engineering 1 ENGINEERING SECTION LIST(#6922)[.3]    
IFCAP 1 COST CENTER(#420.1)[5]    

Fields, Total: 20

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X[",")!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH AND CONTAIN A COMMA -IE. LAST NAME, FIRST NAME
  • DESCRIPTION:  
    Name of Engineering Service employee. Last name, first name and middle initial.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  6929^B
    1)= S ^ENG("EMP","B",$E(X,1,30),DA)=""
    2)= K ^ENG("EMP","B",$E(X,1,30),DA)
.1 ORGANIZATIONAL TITLE .1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>27!($L(X)<3)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-27 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Informal job title.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.3 SHOP 0;10 POINTER TO ENGINEERING SECTION LIST FILE (#6922)
************************REQUIRED FIELD************************
ENGINEERING SECTION LIST(#6922)

  • DESCRIPTION:  
    Engineering shop to which this employee is assigned.
.5 HOME STREET ADDRESS 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X?.ANP) X
  • LAST EDITED:  OCT 23, 1996
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  
    Street address, including house number, apartment number, etc.
.6 HOME CITY, STATE ZIP 1;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    City, state and zip code of employee's residence.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.7 HOME PHONE 1;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<7)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 7-12 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Employee's home telephone number, including area code.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
1 GRADE/STEP 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>8!($L(X)<3)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-8 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Payroll grade and step.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
2 WAGE 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>100)!(X<1) X
  • LAST EDITED:  APR 30, 1993
  • HELP-PROMPT:  Type a Dollar Amount between 1 and 100, 2 Decimal Digits
  • DESCRIPTION:  
    Hourly wage (base pay).
2.1 OT RATE COMPUTED

  • MUMPS CODE:  S Y(2.1,1)=$S($D(^ENG("EMP",D0,0)):^(0),1:"") S X=1.5*$P(Y(2.1,1),U,3) S X=$J(X,0,2)
  • ALGORITHM:  (1.5*WAGE) (ALWAYS 2 DECIMAL DIGITS)
  • DESCRIPTION:  
    Overtime wage, computed from base pay.
2.4 STATION 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  OCT 19, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Name of permanent duty station.
3 ACTIVITY 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  NOV 08, 1995
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    Number of the shop to which employee is assigned.
4 ID# 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  NOV 21, 1996
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    Unique identification number. Assigned by Engineering Service.
5 COST CENTER 0;6 POINTER TO COST CENTER FILE (#420.1) COST CENTER(#420.1)

  • LAST EDITED:  APR 03, 1986
  • DESCRIPTION:  
    Standardized cost center to which this employee's time is most often charged.
7 STATUS 0;7 SET
  • 'T' FOR TEMP;
  • 'P' FOR PERM;
  • 'V' FOR VACATED;

  • LAST EDITED:  SEP 14, 1984
  • DESCRIPTION:  
    Employment status.
8 HOURLYRATE COMPUTED

  • MUMPS CODE:  S Y(8,1)=$S($D(^ENG("EMP",D0,0)):^(0),1:""),X=$P(Y(8,1),U,3)*1.085*100+.5\1/100 K Y(8)
  • ALGORITHM:  WAGE*1.085*100+.5\1/100
  • DESCRIPTION:  
    Actual cost of this employee, including benefits. Formula is not universally agreed to, so the Engineering Package bases calculations of labor costs on WAGE only.
8.1 ANNUALIZED ESTIMATE COMPUTED

  • MUMPS CODE:  S Y(6929,8.1,1)=$S($D(^ENG("EMP",D0,0)):^(0),1:"") S X=$P(Y(6929,8.1,1),U,3)*2087
  • ALGORITHM:  WAGE*2087
  • LAST EDITED:  NOV 14, 1990
  • DESCRIPTION:  
    Annual salary, based on hourly wage. Computed automatically.
10.5 CLASSIFICATION SERIES 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 1-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Personnel classification series applicable to this employee.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
11 POS. # 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>6!($L(X)<3)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-6 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Position number. Assigned by the facility.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
12 CLASSIFICATION TITLE 0;12 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Formal title of the position being filled by this employee.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
13 HOSP.TELE.EXT. 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<4)!(X'?.ANP) X
  • LAST EDITED:  DEC 06, 1984
  • HELP-PROMPT:  ANSWER MUST BE 4-10 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Telephone extension on which this employee may be reached.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG("EMP" - [#6929] .01(XREF 1S), .01(XREF 1K), 2.1+1, 8+1, 8.1+1

Naked Globals

Name Field # of Occurrence
^(0 2.1+1, 8+1, 8.1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 2.1+1, 8+1, 8.1+1
>> DA .01(XREF 1S), .01(XREF 1K)
U 2.1+1, 8+1, 8.1+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .1+1!, .5+1!, .6+1!, .7+1!, 1+1!, 2+1*!, 2.1+1*
, 2.4+1!, 3+1!, 4+1!, 8+1*, 8.1+1*, 10.5+1!, 11+1!, 12+1!, 13+1!
>> Y( 2.1+1*
>> Y(6929 8.1+1*
>> Y(8 8+1*!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All