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 |  Fields |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^ECX(728.506

Package: DSS Extracts

Global: ^ECX(728.506


Information

FileMan FileNo FileMan Filename Package
728.506 DSS DRUG PRODUCT CODE DSS Extracts

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
DSS Extracts 3 ^ECX(728.506    ^ECX(729    IDENTIFIER    

Fields, Total: 3

Field # Name Loc Type Details
.01 DSS DRUG PRODUCT CODE 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>500)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
  • LAST EDITED:  MAR 14, 1995
  • HELP-PROMPT:  Type a Number between 1 and 500, 0 Decimal Digits
  • DESCRIPTION:  This is the product code as determined by the DSS pharmaceutical task force. The DESCRIPTION field (#1) indicates how this code is determined by a combination of VA drug classification, route of administration, and (in
    some cases) by specific generic name of a particular item.
    WRITE AUTHORITY: ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  728.506^B
    1)= S ^ECX(728.506,"B",$E(X,1,30),DA)=""
    2)= K ^ECX(728.506,"B",$E(X,1,30),DA)
1 DESCRIPTION 0;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>200!($L(X)<3) X
  • LAST EDITED:  MAY 14, 1990
  • HELP-PROMPT:  Answer must be 3-200 characters in length.
  • DESCRIPTION:  
    VA classification description.
    UNEDITABLE
2 IDENTIFIER 1;0 Multiple #728.5061 728.5061

  • DESCRIPTION:  
    Drug identifier composed of two numbers, separated by the letter "A", that represents drug and dose form from the NATIONAL DRUG file (#50.6).
    WRITE AUTHORITY: ^

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(728.506 - [#728.506] .01(XREF 1S), .01(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K)
>> DINUM .01+1*
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!
Info |  Desc |  Directly Accessed By Routines |  Fields |  Global Variables Directly Accessed |  Local Variables  | All