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 |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^LEX(757.03

Package: Lexicon Utility

Global: ^LEX(757.03


Information

FileMan FileNo FileMan Filename Package
757.03 CODING SYSTEMS Lexicon Utility

Description

Directly Accessed By Routines, Total: 51

Package Total Routines
Lexicon Utility 50 LEX10CS    LEX10CS2    LEX10CX    LEX10CX2    LEX10CX3    LEX10CX4    LEX10CX5    LEX10TAX
LEXA1    LEXABC    LEXABC2    LEXAR5    LEXASO    LEXCODE    LEXDCCC    LEXDDSS
LEXDDTF    LEXDFSO    LEXDFSS    LEXDMGS    LEXINF    LEXINF2    LEXINF3    LEXINF4
LEXINF5    LEXLK2    LEXNDX8    LEXQC    LEXQC6    LEXQSC    LEXQSCA    LEXRXD2
LEXRXD4    LEXRXG    LEXSRC    LEXSRC2    LEXTRAN    LEXTRAN1    LEXU    LEXU2
LEXU3    LEXU4    LEXU5    LEXU6    LEXU7    LEXWUI    LEXXGI3    SDO VERSION
^LEX(757.02    ^LEX(757.03    
Emergency Department Integration Software 1 EDPLEX    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Lexicon Utility 3 LEX10CX4    LEXDMGS    LEXU5    

Pointed To By FileMan Files, Total: 4

Package Total FileMan Files
Lexicon Utility 4 EXPRESSIONS(#757.01)[#757.118(1)]    CODES(#757.02)[2]    CHARACTER POSITIONS(#757.033)[.04]    MAPPING DEFINITIONS(#757.32)[34]    

Fields, Total: 11

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

  • INPUT TRANSFORM:  K:$L(X)>7!($L(X)<3) X
  • LAST EDITED:  JAN 28, 2008
  • HELP-PROMPT:  Answer must be 3-7 characters in length.
  • DESCRIPTION:  Three to six character identifier for the source of the classification code located in the Codes file (#757.02). The normal format is a three character mnemonic for the classification source, appended with the year of
    publication of the source (i.e., ICD89).
  • CROSS-REFERENCE:  757.03^B
    1)= S ^LEX(757.03,"B",$E(X,1,30),DA)=""
    2)= K ^LEX(757.03,"B",$E(X,1,30),DA)
    ^LEX(757.03,"B",SAB,IEN) - where SAB is the Source Abbreviation and IEN is the Internal Entry Number in the Coding Systems file #757.03 where the Source is located.
  • CROSS-REFERENCE:  757.03^ASAB^MUMPS
    1)= S ^LEX(757.03,"ASAB",$E(X,1,3),DA)=""
    2)= K ^LEX(757.03,"ASAB",$E(X,1,3),DA)
    ^LEX(757.03,"ASAB",SAB,IEN) - where SAB is a three representation of the Source Abbreviation as used in the search filter DIC("S"), and IEN is the Internal Entry Number in the Coding Systems file #757.03 where the Source
    is located.
1 NOMENCLATURE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>11!($L(X)<2) X
  • LAST EDITED:  APR 30, 1997
  • HELP-PROMPT:  Answer must be 2-11 characters in length.
  • DESCRIPTION:  
    Short title for the classification source.  This is the name normally used to refer to the source (i.e., ICD-9, CPT-4, DSM-IIIR, SNOMED etc.)
  • CROSS-REFERENCE:  757.03^C
    1)= S ^LEX(757.03,"C",$E(X,1,30),DA)=""
    2)= K ^LEX(757.03,"C",$E(X,1,30),DA)
    ^LEX(757.03,"C",NOM,IEN) - Where NOM is the abbreviated nomenclature for a specified coding or classification system and IEN is the Internal Entry Number where the nomenclature is located.
2 SOURCE TITLE 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>70!($L(X)<2) X
  • LAST EDITED:  JUL 31, 2012
  • HELP-PROMPT:  Answer must be 2-70 characters in length.
  • DESCRIPTION:  
    Full title of source.  Also includes edition/revision and year of publication when available.
3 SOURCE 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<2) X
  • LAST EDITED:  SEP 19, 1995
  • HELP-PROMPT:  Answer must be 2-50 characters in length.
  • DESCRIPTION:  
    This is source of the named coding system.
4 ACTIVE CODES 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1.N) X
  • LAST EDITED:  FEB 15, 2017
  • HELP-PROMPT:  Type a number between 0 and 9999999999, 0 decimal digits.
  • DESCRIPTION:  
    This is the number of active codes found in the CODES file 757.02 for a specified Coding System.
5 CODES 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1.N) X
  • LAST EDITED:  FEB 15, 2017
  • HELP-PROMPT:  Type a number between 0 and 9999999999, 0 decimal digits.
  • DESCRIPTION:  
    This is the total number of codes found in the CODES file 757.02 for a specified Coding System.
6 INACTIVE VERSION 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  APR 15, 1996
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    This represents the version number of the source file for which inactivated codes are derived.
7 HL7 CODING SYSTEM 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<2) X
  • LAST EDITED:  JAN 18, 2002
  • HELP-PROMPT:  Answer must be 2-40 characters in length
  • DESCRIPTION:  
    This is the HL7 coding system mnemonic for the Lexicon coding system
  • CROSS-REFERENCE:  757.03^D
    1)= S ^LEX(757.03,"D",$E(X,1,30),DA)=""
    2)= K ^LEX(757.03,"D",$E(X,1,30),DA)
    HL7 Coding System cross reference
10 SDO VERSION 1;0 DATE Multiple #757.08 757.08

  • LAST EDITED:  OCT 18, 2006
  • DESCRIPTION:  This multiple stores the Standards Development Organization's (SDO) nomenclature that identifies the versions of their code systems and their associated dates. This information will be essential to applications that share
    code systems data with external agencies.
11 IMPLEMENTATION DATE 2;1 DATE

  • INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JAN 05, 2012
  • HELP-PROMPT:  Enter the Coding System Implementation Date.
  • DESCRIPTION:  This is either the VistA implementation date or the initial publication date. If the VistA implementation date is different from the initial publication date then the VistA date will be used, i.e.
    ICD-10 Published (world wide)  Jan 1, 1992
    ICD-10 VistA Implementation    Oct 1, 2013
    Oct 1, 2013 is used for ICD-10
    UMDNS Published (world-wide)   Jan 1, 1993
    UMDNS VistA Implementation         N/A
    Jan 1, 1993 is used for UMDNS
12 SEARCH THRESHOLD 2;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>10000000)!(X<3000)!(X?.E1"."1.N) X
  • LAST EDITED:  MAR 06, 2012
  • HELP-PROMPT:  Enter a number between 3000 and 10000000, 0 decimal digits.
  • DESCRIPTION:  This number is the maximum number of terms that should be looked at before a warning is issued to the user. The application would ask the user if they wanted to continue with the search (knowing in advance that it will
    take quite some time) or if they wanted to further specify the input search parameter.  This is a site editable field.

Found Entries, Total: 36

SOURCE ABBREVIATION: 10D    SOURCE ABBREVIATION: 10P    SOURCE ABBREVIATION: ACR    SOURCE ABBREVIATION: AIR    SOURCE ABBREVIATION: BIR    SOURCE ABBREVIATION: COS    SOURCE ABBREVIATION: CPC    SOURCE ABBREVIATION: CPT    
SOURCE ABBREVIATION: CSP    SOURCE ABBREVIATION: CST    SOURCE ABBREVIATION: DMI    SOURCE ABBREVIATION: DOR    SOURCE ABBREVIATION: DS3    SOURCE ABBREVIATION: DS4    SOURCE ABBREVIATION: DXP    SOURCE ABBREVIATION: HHC    
SOURCE ABBREVIATION: ICD    SOURCE ABBREVIATION: ICP    SOURCE ABBREVIATION: LCH    SOURCE ABBREVIATION: LNC    SOURCE ABBREVIATION: MCM    SOURCE ABBREVIATION: MSH    SOURCE ABBREVIATION: MTF    SOURCE ABBREVIATION: MTH    
SOURCE ABBREVIATION: NAN    SOURCE ABBREVIATION: NIC    SOURCE ABBREVIATION: NOC    SOURCE ABBREVIATION: OMA    SOURCE ABBREVIATION: PRB    SOURCE ABBREVIATION: RVC    SOURCE ABBREVIATION: SCC    SOURCE ABBREVIATION: SCT    
SOURCE ABBREVIATION: SNM    SOURCE ABBREVIATION: UMD    SOURCE ABBREVIATION: UND    SOURCE ABBREVIATION: UWA    

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #5387
  • RADIOLOGY/NUCLEAR MEDICINE
  • External References

    Name Field # of Occurrence
    ^%DT 11+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^LEX(757.03 - [#757.03] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 1K), 7(XREF 1S), 7(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, ID2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 11+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1(XREF 1S), 1(XREF 1K), 7(XREF 1S), 7(XREF 1K)
    U ID1+1, ID2+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1+1!, 1(XREF 1S), 1(XREF 1K), 2+1!, 3+1!
    , 4+1!, 5+1!, 6+1!, 7+1!, 7(XREF 1S), 7(XREF 1K), 11+1*!, 12+1!
    >> Y 11+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All