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 |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^LEX(757.033

Package: Lexicon Utility

Global: ^LEX(757.033


Information

FileMan FileNo FileMan Filename Package
757.033 CHARACTER POSITIONS Lexicon Utility

Description

Directly Accessed By Routines, Total: 17

Package Total Routines
Lexicon Utility 17 DESCRIPTION    EXPLANATION    INCLUDE    INCLUDES    LEX10CS    LEX10DBR    LEX10DL    LEX10DU
LEX10PL    LEX10PLS    LEX10PR    LEXINF2    LEXU4    LINKAGES    ^LEX(757.033    NAME/TITLE
STATUS    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Lexicon Utility 1 CODING SYSTEMS(#757.03)[.04]    

Fields, Total: 10

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<4)!'(X'?1P.E) X
  • LAST EDITED:  MAR 18, 2012
  • HELP-PROMPT:  Enter a unique identifier, 4-30 characters in length.
  • DESCRIPTION:  
    This is a unique identifier consisting of the source abbreviation and a code fragment.
  • CROSS-REFERENCE:  757.033^B
    1)= S ^LEX(757.033,"B",$E(X,1,30),DA)=""
    2)= K ^LEX(757.033,"B",$E(X,1,30),DA)
    ^LEX(757.033,"B",UID,IEN) - Where UID is a unique identifier for a character position and IEN is the internal entry number where the unique identifier is stored.
.02 FRAGMENT 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  MAR 18, 2012
  • HELP-PROMPT:  Enter a code fragment, 1-30 characters in length.
  • DESCRIPTION:  
    This is a portion of a code (fragment) that specifies a character (last character of the fragment) and a character position (length of fragment).
.03 DATE ENTERED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:3110913>X X
  • LAST EDITED:  MAR 17, 2012
  • HELP-PROMPT:  Enter a date, not earlier than SEP 13, 2011.
  • DESCRIPTION:  
    This is the date the code fragment was initially entered.
.04 SOURCE 0;4 POINTER TO CODING SYSTEMS FILE (#757.03) CODING SYSTEMS(#757.03)

  • LAST EDITED:  MAR 23, 2012
  • HELP-PROMPT:  Enter the coding system (source) for the code fragment.
  • DESCRIPTION:  
    This is the coding system (source) that the code fragment belongs to.
  • FIELD INDEX:  ACP (#1139) MUMPS IR SORTING ONLY
    Short Descr: Character/Position
    Description: ^LEX(757.033,"ACP",SRC,CP,IEN) - Where SRC is the coding system, CP is the leading character appended to the character position, and IEN is the Internal Entry Number where the character and character position is stored.
    This cross-reference supports data loading and verification (file maintenance only).
    Set Logic: S ^LEX(757.033,"ACP",X(1),X(2),DA)=""
    Kill Logic: K ^LEX(757.033,"ACP",X(1),X(2),DA)
    Whole Kill: K ^LEX(757.033,"ACP")
    X(1): SOURCE (757.033,.04) (Subscr 1) (forwards)
    X(2): Computed Code: S X=$E($P($G(^LEX(757.033,DA,0)),U,2),1)_$L($P($G(^LEX(757.033,DA,0)),U,2))_" "
    (Subscr 2) (Len 3)
.05 DETAILS 0;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAR 18, 2012
  • HELP-PROMPT:  Enter 'Yes' if this code fragment has additional details.
  • DESCRIPTION:  
    This is a flag to indicate if the fragment should have additonal details, i.e., description, explanation or inclusions.
1 STATUS 1;0 DATE Multiple #757.331 757.331

  • DESCRIPTION:  
    This multiple tracks the activation status of a code fragment.
2 NAME/TITLE 2;0 DATE Multiple #757.332 757.332

  • DESCRIPTION:  
    This is a history of names/titles for a character position identified by a code fragment.
  • INDEXED BY:  NAME/TITLE (C)
3 DESCRIPTION 3;0 DATE Multiple #757.043 757.043

  • LAST EDITED:  MAR 18, 2012
  • DESCRIPTION:  
    This is a history of descriptions for a character position identified by a code fragment.
  • INDEXED BY:  DESCRIPTION (C)
4 EXPLANATION 4;0 DATE Multiple #757.334 757.334

  • LAST EDITED:  MAR 18, 2012
  • DESCRIPTION:  
    This is a history of Explanations for a character position identified by a code fragment.
  • INDEXED BY:  EXPLANATION (C)
5 INCLUDES 5;0 DATE Multiple #757.335 757.335

  • LAST EDITED:  MAR 18, 2012
  • DESCRIPTION:  
    This is a history of terminology synonyms for the character identified by the code fragment. There can be multiple synonyms.

External References

Name Field # of Occurrence
^%DT .03+1
$$UP^XLFSTR IXNAMEP1TS+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.033 - [#757.033] IXACPSL+1*, IXACPKL+1!, IXACPKEIC+1!, IXACPP2CC+1, IXAFRAGSL+1*, IXAFRAGSCC+1, IXAFRAGKL+1!, IXAFRAGKEIC+1!, IXAFRAGP1CC+1, IXAFRAGP2CC+1
, IXNAMESL+1*, IXNAMEKL+1!, IXNAMEKEIC+1!, .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .03+1*
>> DA IXACPSL+1, IXACPKL+1, IXACPP2CC+1, IXAFRAGSL+1, IXAFRAGSCC+1, IXAFRAGKL+1, IXNAMESL+1, IXNAMEKL+1, .01(XREF 1S), .01(XREF 1K)
>> DA(1 IXAFRAGSL+1, IXAFRAGSCC+1, IXAFRAGKL+1, IXAFRAGP1CC+1, IXAFRAGP2CC+1, IXNAMESL+1, IXNAMEKL+1
U IXACPP2CC+1
X IXACPP2CC+1*, IXAFRAGSCC+1*, IXAFRAGP1CC+1*, IXAFRAGP2CC+1*, IXNAMESL+1, IXNAMEKL+1, IXNAMEP1TS+1*, .01+1!, .01(XREF 1S), .01(XREF 1K)
, .02+1!, .03+1*!
X(1 IXACPSL+1, IXACPKL+1, IXAFRAGSL+1, IXAFRAGKL+1
X(2 IXACPSL+1, IXACPKL+1, IXAFRAGSL+1, IXAFRAGKL+1
X(3 IXAFRAGSL+1, IXAFRAGKL+1
>> Y .03+1
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All