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 |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^ENG(6910.9

Package: Engineering

Global: ^ENG(6910.9


Information

FileMan FileNo FileMan Filename Package
6910.9 ENG DJ SCREEN Engineering

Description

Directly Accessed By Routines, Total: 22

Package Total Routines
Engineering 21 ENJ    ENJDPL    ENJINJ    ENJINJ1    ENJINJ2    ENJINJ3    ENJINK    ENJINQ
ENJMUL    ENNEWPK2    ENTRY DEFINITIONS    ENX2IPR    ENX3IPS    ENX6IPR    ENX7IPR    ENXIP63
ENXOIPR    ENXPIPR    ENXVIPR    ^ENG(6910.9    ^OFM(7336.9    
Kernel 1 FILE    

Accessed By FileMan Db Calls, Total: 7

Package Total Routines
Engineering 7 ENJ    ENJDPL    ENPAT14    ENX2IPR    ENX6IPR    ENX7IPR    ENXIP63    

Fields, Total: 10

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

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>16!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  OCT 29, 1996
  • HELP-PROMPT:  ANSWER MUST BE 3-16 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field contains the screen name associated with a display of entries. The screen should be namespaced.
  • CROSS-REFERENCE:  6910.9^B
    1)= S ^ENG(6910.9,"B",$E(X,1,30),DA)=""
    2)= K ^ENG(6910.9,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  6910.9^AC^MUMPS
    1)= Q
    2)= Q
    Obsolete x-ref. No API available to delete it.
.02 MAXLINE 0;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>15)!(X<15)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 15 AND 15
  • DESCRIPTION:  
    This field specifies the number of lines usable for data entry. It cannot exceed 15 lines. The system computes this field automatically.
.03 PREVIOUS 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>16!($L(X)<1) X I $D(X),'$D(^ENG(6910.9,"B",X)) S DIC(0)="L",DIC="^ENG(6910.9," D ^DIC
  • LAST EDITED:  OCT 29, 1996
  • HELP-PROMPT:  ANSWER MUST BE 1-16 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field is only applicable to multiple page screens. This field points to the previous screen name. It is a free text pointer entered by the system automatically.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  6910.9^AP^MUMPS
    1)= N ENDJP S:X]"" ENDJP=$O(^ENG(6910.9,"B",X,0)) S:$G(ENDJP) $P(^ENG(6910.9,ENDJP,0),U,5)=$P($G(^ENG(6910.9,DA,0)),U) Q
    2)= N ENDJP S:X]"" ENDJP=$O(^ENG(6910.9,"B",X,0)) S:$G(ENDJP) ENDJP("RL")=$P(^ENG(6910.9,ENDJP,0),U,5) S:$G(ENDJP("RL"))=$P($G(^ENG(6910.9,DA,0)),U) $P(^ENG(6910.9,ENDJP,0),U,5)="" Q
    Updates RIGHTLINKED field of 'previous' screen.
.04 SECURITY 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  APR 28, 1993
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    This field is set automatically to the write (WR) security of the file selected by the user, at the time the file is created.
.05 RIGHTLINKED 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>16!($L(X)<1) X I $D(X),'$D(^ENG(6910.9,"B",X)) S DIC(0)="L",DIC="^ENG(6910.9," D ^DIC
  • LAST EDITED:  OCT 29, 1996
  • HELP-PROMPT:  ANSWER MUST BE 1-16 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This field is only applicable to multiple page screens. This field contains the name of the screen to be executed next. It is a free text pointer entered by the system automatically.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  6910.9^AR^MUMPS
    1)= N ENDJR S:X]"" ENDJR=$O(^ENG(6910.9,"B",X,0)) S:$G(ENDJR) $P(^ENG(6910.9,ENDJR,0),U,3)=$P($G(^ENG(6910.9,DA,0)),U) Q
    2)= N ENDJR S:X]"" ENDJR=$O(^ENG(6910.9,"B",X,0)) S:$G(ENDJR) ENDJR("PR")=$P(^ENG(6910.9,ENDJR,0),U,3) S:$G(ENDJR("PR"))=$P($G(^ENG(6910.9,DA,0)),U) $P(^ENG(6910.9,ENDJR,0),U,3)="" Q
    Updates PREVIOUS field of 'rightlinked' screen.
.06 DD NUMBER 0;6 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S DIC="^DIC(",DIC(0)="ENQ",DIC("S")=$S(DUZ(0)'="@":"I 1 Q:'$D(^DIC(+Y,0,""WR"")) F DJX=1:1:$L(^(""WR"")) I DUZ(0)[$E(^(""WR""),DJX) Q",1:"I Y-1") D ^DIC S X=+Y K:Y'>0 X
  • LAST EDITED:  JAN 21, 1988
  • HELP-PROMPT:  TYPE A LEGAL DATA DEFINITION NUMBER BETWEEN 0 AND 99999999
  • DESCRIPTION:  
    The contents of this field should be a legal Data Definition (DD) number. It could be a first level .
  • EXECUTABLE HELP:  S ZD=D,X="?" S DIC="^DIC(",DIC(0)="ENQ",DIC("S")=$S(DUZ(0)'="@":"I 1 Q:'$D(^DIC(+Y,0,""WR"")) F DJX=1:1:$L(^(""WR"")) I DUZ(0)[$E(^(""WR""),DJX) Q",1:"I Y-1") D ^DIC S DIC=DIE,D=ZD K ZD,DIC("S")
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 ENTRY DEFINITIONS 1;0 Multiple #6910.97 6910.97

  • DESCRIPTION:  
    Definition of each line item on a data entry screen.
.08 DESCRIPTION 0;7 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>64!($L(X)<2) X
  • HELP-PROMPT:  ANSWER MUST BE 2-64 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    The data entered in this field will be displayed at the top of the screen display as a title with the current date.
.09 FILE LEVEL 0;8 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 0 AND 9
  • DESCRIPTION:  
    This field keeps track of the level of the screen display with respect to the hierarchy of the file.
.1 HIGHEST NUMBER USED 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<.1)!(X?.E1"."3N.N) X
  • HELP-PROMPT:  TYPE A NUMBER BETWEEN .1 AND 99
  • DESCRIPTION:  
    This field contains the highest number used in the screen display. It is used when continuing adding entries.

External References

Name Field # of Occurrence
^DIC .03+1, .05+1, .06+1, .06(HELP )

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENG(6910.9 - [#6910.9] .01(XREF 1S), .01(XREF 1K), .03+1, .03(XREF 1S), .03(XREF 1K), .05+1, .05(XREF 1S), .05(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 ID.06+1, ID.08+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D .06(HELP )
>> DA .01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K), .05(XREF 1S), .05(XREF 1K)
>> DIC .03+1*, .05+1*, .06+1*, .06(HELP )
>> DIC("S" .06+1*, .06(HELP )
>> DIC(0 .03+1*, .05+1*, .06+1*, .06(HELP )
>> DIE .06(HELP )
DUZ(0 .06+1, .06(HELP )
ENDJP .03(XREF 1S), .03(XREF 1K)
ENDJP("RL" .03(XREF 1K)
ENDJR .05(XREF 1S), .05(XREF 1K)
ENDJR("PR" .05(XREF 1K)
U ID.06+1, ID.08+1, .03(XREF 1S), .03(XREF 1K), .05(XREF 1S), .05(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .03+1!, .03(XREF 1S), .03(XREF 1K), .04+1!, .05+1!, .05(XREF 1S)
.05(XREF 1K), .06+1*!, .06(HELP ), .08+1!, .09+1!, .1+1!
>> Y .06+1
ZD .06(HELP )
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All