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    ^ENG("EMP"    ^OFM(7336.9    ENWOUTL    ENY2K3    ENY2K5    TECHNICIANS ASSIGNED    

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