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

Package: Patient Data Exchange

Global: ^VAT(394.62


Information

FileMan FileNo FileMan Filename Package
394.62 VAQ - DATA Patient Data Exchange

Description

Directly Accessed By Routines, Total: 11

Package Total Routines
Patient Data Exchange 11 VAQFIL17    VAQFILE    VAQFILE1    VAQPRE34    VAQUPD1    VAQUPD2    VAQUPD25    VAQUTL92
VAQXRF1    VAQXRF3    ^VAT(394.62    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Patient Data Exchange 2 VAQFILE1    VAQPRE39    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Patient Data Exchange 2 VAQ - TRANSACTION(#394.61)[40]    VAQ - DATA SEGMENT(#394.71)[.02]    

Fields, Total: 10

Field # Name Loc Type Details
.01 Data 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 08, 1992
  • HELP-PROMPT:  Type a Number between 1 and 999999999999, 0 Decimal Digits
  • DESCRIPTION:  
    Incrementing number (used to uniquely identify each value).
  • PRE-LOOKUP:  I X="+" S X=$$AUTO^VAQXRF2(2) K:(X<0) X
  • CROSS-REFERENCE:  394.62^B
    1)= S ^VAT(394.62,"B",$E(X,1,30),DA)=""
    2)= K ^VAT(394.62,"B",$E(X,1,30),DA)
.02 Segment 0;2 POINTER TO VAQ - DATA SEGMENT FILE (#394.71) VAQ - DATA SEGMENT(#394.71)

  • LAST EDITED:  APR 09, 1993
  • DESCRIPTION:  
    Data segment to which the information belongs.
  • CROSS-REFERENCE:  394.62^AF1^MUMPS
    1)= S VAQXRF=$$AF^VAQXRF3(DA,1) K VAQXRF
    2)= S VAQXRF=$$AF^VAQXRF3(DA,0,.02,X) K VAQXRF
    Creates a cross reference of all data segments for a given transaction that are stored in displayable format. This cross reference is only set if the field Display Ready (.05) is set to 'YES'.
    Resulting node ==> ^VAT(394.62,"A-DISPLAY",[40],[.02],DA)
    Where: [.02] is field number .02
    [40] is field number 40
    DA is the entry number
    The resulting node is created by the AF1 and AF2 cross references. Re-indexing either of these cross references will correctly update/create the resulting node.
  • CROSS-REFERENCE:  394.62^AC1^MUMPS
    1)= S VAQXRF=$$AC^VAQXRF1(DA,1) K VAQXRF
    2)= S VAQXRF=$$AC^VAQXRF1(DA,0,.02,X) K VAQXRF
    Creates a cross reference of all data segments for a given transaction.
    Resulting node ==> ^VAT(394.62,"A-SEGMENT",[40],[.02],DA)
    Where: [.02] is field number .02
    [40] is field number 40
    DA is the entry number
    The resulting node is created by the AC1 and AC2 cross references. Re-indexing either of these cross references will correctly update/create the resulting node.
.03 File Number 0;3 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."10N.N) X
  • LAST EDITED:  APR 09, 1993
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 9 Decimal Digits
  • DESCRIPTION:  
    File number from which the information came.
.04 Field Number 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."10N.N) X
  • LAST EDITED:  NOV 25, 1992
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 9 Decimal Digits
  • DESCRIPTION:  
    Field number from which the information came.
.05 Display Ready 0;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 17, 1993
  • DESCRIPTION:  
    Set to 'YES' if the segment is being stored in display ready format. Set to 'NO' if segment is being stored as individual pieces of information.
  • CROSS-REFERENCE:  394.62^AG^MUMPS
    1)= Q
    2)= S VAQXRF=$$AG^VAQXRF3(DA) K VAQXRF
10 Value VAL;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  NOV 25, 1992
  • HELP-PROMPT:  Answer must be 1-240 characters in length.
  • DESCRIPTION:  
    Information that was stored in the specified field of the specified file.
20 Identifier IDNT1;1 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  APR 09, 1993
  • HELP-PROMPT:  Answer must be 1-240 characters in length.
  • DESCRIPTION:  
    This field uniquely identifies the "master" value (to whom the information pertains).
30 Sequence Number SQNCE;1 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 09, 1993
  • HELP-PROMPT:  Type a Number between 0 and 9999999999, 0 Decimal Digits
  • DESCRIPTION:  
    Sequencing number used when more than one value came from the same file/field.
40 Transaction Number TRNS;1 POINTER TO VAQ - TRANSACTION FILE (#394.61) VAQ - TRANSACTION(#394.61)

  • LAST EDITED:  APR 09, 1993
  • DESCRIPTION:  
    Transaction from which the information came.
  • CROSS-REFERENCE:  394.62^AF2^MUMPS
    1)= S VAQXRF=$$AF^VAQXRF3(DA,1) K VAQXRF
    2)= S VAQXRF=$$AF^VAQXRF3(DA,0,40,X) K VAQXRF
    Creates a cross reference of all data segments for a given transaction that are stored in displayable format. This cross reference is only set if the field Display Ready (.05) is set to 'YES'.
    Resulting node ==> ^VAT(394.62,"A-DISPLAY",[40],[.02],DA)
    Where: [.02] is field number .02
    [40] is field number 40
    DA is the entry number
    The resulting node is created by the AF1 and AF2 cross references. Re-indexing either of these cross references will correctly update/create the resulting node.
  • CROSS-REFERENCE:  394.62^AC2^MUMPS
    1)= S VAQXRF=$$AC^VAQXRF1(DA,1) K VAQXRF
    2)= S VAQXRF=$$AC^VAQXRF1(DA,0,40,X) K VAQXRF
    Creates a cross reference of all data segments for a given transaction.
    Resulting node ==> ^VAT(394.62,"A-SEGMENT",[40],[.02],DA)
    Where: [.02] is field number .02
    [40] is field number 40
    DA is the entry number
    The resulting node is created by the AC1 and AC2 cross references. Re-indexing either of these cross references will correctly update/create the resulting node.
50 Displayable Segment DSP;0 WORD-PROCESSING #394.625

  • DESCRIPTION:  
    Segment in display ready format.
  • LAST EDITED:  FEB 16, 1993

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #444
  • Pharmacy Prescription Practice
    		•  Data (.01).
    Access: Direct Global Read & w/Fileman

    Data (.01).
    Access: Direct Global Read & w/Fileman

    Value (10).
    Access: Direct Global Read & w/Fileman

    Sequence number (30).
    Access: Direct Global Read & w/Fileman

    External References

    Name Field # of Occurrence
    $$AC^VAQXRF1 .02(XREF 3S), .02(XREF 3K), 40(XREF 3S), 40(XREF 3K)
    $$AUTO^VAQXRF2 .01TPL+1
    $$AF^VAQXRF3 .02(XREF 2S), .02(XREF 2K), 40(XREF 2S), 40(XREF 2K)
    $$AG^VAQXRF3 .05(XREF 1K)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^VAT(394.62 - [#394.62] .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), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .05(XREF 1K), 40(XREF 2S), 40(XREF 2K), 40(XREF 3S)
    , 40(XREF 3K)
    VAQXRF .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .05(XREF 1K), 40(XREF 2S), 40(XREF 2K), 40(XREF 3S), 40(XREF 3K)
    X .01+1!, .01TPL+1*!, .01(XREF 1S), .01(XREF 1K), .02(XREF 2K), .02(XREF 3K), .03+1!, .04+1!, 10+1!, 20+1!
    , 30+1!, 40(XREF 2K), 40(XREF 3K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Local Variables  | All