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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^IBE(358.3

Package: Automated Information Collection System

Global: ^IBE(358.3


Information

FileMan FileNo FileMan Filename Package
358.3 IMP/EXP SELECTION Automated Information Collection System

Description

Directly Accessed By Routines, Total: 3

Package Total Routines
Integrated Billing 2 CPT MODIFIER    SUBCOLUMN VALUE    
Automated Information Collection System 1 ^IBE(358.3    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Automated Information Collection System 2 IMP/EXP SELECTION LIST(#358.2)[.03]    IMP/EXP SELECTION GROUP(#358.4)[.04]    
Lexicon Utility 1 EXPRESSIONS(#757.01)[2.02]    

Fields, Total: 15

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  NOV 19, 1992
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    The ID passed by the package.
  • CROSS-REFERENCE:  358.3^B
    1)= S ^IBE(358.3,"B",$E(X,1,30),DA)=""
    2)= K ^IBE(358.3,"B",$E(X,1,30),DA)
.02 PLACE HOLDER ONLY 0;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUL 17, 1995
  • HELP-PROMPT:  Enter YES if this is a place holder, used to add some space to the list.
.03 SELECTION LIST 0;3 POINTER TO IMP/EXP SELECTION LIST FILE (#358.2)
************************REQUIRED FIELD************************
IMP/EXP SELECTION LIST(#358.2)

  • LAST EDITED:  APR 03, 1996
  • DESCRIPTION:  
    Identifies the selection list that this selection belongs on.
  • CROSS-REFERENCE:  358.3^C
    1)= S ^IBE(358.3,"C",$E(X,1,30),DA)=""
    2)= K ^IBE(358.3,"C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  358.3^APO^MUMPS
    1)= I $P($G(^IBE(358.3,DA,0)),U,5)]"",$P(^(0),U,4) S ^IBE(358.3,"APO",X,$P(^(0),U,4),$P(^(0),U,5),DA)=""
    2)= I $P($G(^IBE(358.3,DA,0)),U,5)]"",$P(^(0),U,4) K ^IBE(358.3,"APO",X,$P(^(0),U,4),$P(^(0),U,5),DA)
.04 SELECTION GROUP 0;4 POINTER TO IMP/EXP SELECTION GROUP FILE (#358.4)
************************REQUIRED FIELD************************
IMP/EXP SELECTION GROUP(#358.4)

  • LAST EDITED:  APR 03, 1996
  • HELP-PROMPT:  Entries on a list are grouped under group headers - under which header should this entry appear?
  • DESCRIPTION:  
    The SELECTION GROUP that the selection belongs to.The selection will appear under the group header on the form.
  • CROSS-REFERENCE:  358.3^D
    1)= S ^IBE(358.3,"D",$E(X,1,30),DA)=""
    2)= K ^IBE(358.3,"D",$E(X,1,30),DA)
  • CROSS-REFERENCE:  358.3^APO1^MUMPS
    1)= I $P($G(^IBE(358.3,DA,0)),U,5)]"",$P(^(0),U,3) S ^IBE(358.3,"APO",$P(^(0),U,3),X,$P(^(0),U,5),DA)=""
    2)= I $P($G(^IBE(358.3,DA,0)),U,5)]"",$P(^(0),U,3) K ^IBE(358.3,"APO",$P(^(0),U,3),X,$P(^(0),U,5),DA)
.05 PRINT ORDER WITHIN GROUP 0;5 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999.99)!(X<0)!(X?.E1"."3N.N) X
  • LAST EDITED:  APR 03, 1996
  • HELP-PROMPT:  Type a Number between 0 and 999.99, 2 Decimal Digits
  • DESCRIPTION:  
    Determines the order that this selection entry will appear in under the header for the selection group.
  • CROSS-REFERENCE:  358.3^APO2^MUMPS
    1)= I $P($G(^IBE(358.3,DA,0)),U,3),$P(^(0),U,4) S ^IBE(358.3,"APO",$P(^(0),U,3),$P(^(0),U,4),X,DA)=""
    2)= I $P(^IBE(358.3,DA,0),U,3),$P(^(0),U,4) K ^IBE(358.3,"APO",$P(^(0),U,3),$P(^(0),U,4),X,DA)
.06 PLACE HOLDER TEXT 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>75!($L(X)<1) X
  • LAST EDITED:  JUL 17, 1995
  • HELP-PROMPT:  What text should be displayed for the place holder?
.07 USE AS PLACE HOLDER 0;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  SEP 28, 1995
  • HELP-PROMPT:  Does the place holder serve as a subheader?
  • DESCRIPTION:  
    If the place holder is being used as a subheader its text should be included with the narrative. This field implements that.
.08 END USE AS SUBHEADER? 0;8 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  OCT 02, 1995
  • HELP-PROMPT:  Should the prior subheader be discarded?
  • DESCRIPTION:  
    This field is used to end the use of any prior subheader that is in effect. Applies only to selections defined to be place holders.
.09 QUANTITY 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 31, 1996
  • HELP-PROMPT:  Type a Number between 1 and 999, 0 Decimal Digits
  • DESCRIPTION:  
    This field contains the number of occurrences for a particular selection.  A value placed in this field will be passed to PCE as the quantity.  Presently, the quantity field will only be asked for CPT codes.
1 SUBCOLUMN VALUE 1;0 Multiple #358.31 358.31

  • DESCRIPTION:  
    The selection can be composed of multiple fields. Each field occupies its own subcolumn on the form.
  • IDENTIFIED BY:  SUBCOLUMN VALUE(#.02)
2.01 NARRATIVE TO SEND TO PCE 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>150!($L(X)<1) X
  • LAST EDITED:  JAN 23, 1996
  • HELP-PROMPT:  Enter the narrative to send to PCE if a provider narrative different from the description is desired. Answer must be 3-80 characters in length.
  • DESCRIPTION:  Enter the narrative that should be sent to PCE when this selection is scanned. This will be the provider narrative that is shown in PCE and Problem List. If there is no entry in this field the text as it appears on the
    form will be sent as the narrative.  This field can only be entered for the type of interfaces that allow adding this narrative, and then send the narrative to PCE.
2.02 CLINICAL LEXICON ENTRY 2;2 POINTER TO EXPRESSIONS FILE (#757.01) EXPRESSIONS(#757.01)

  • LAST EDITED:  JAN 31, 1996
  • DESCRIPTION:  This is the clinical lexicon entry this term should be associated with. Generally this is only completed for selections based on diagnosis. The clinical lexicon entry will be passed to pce when this selection is scanned.
    This allows maintaining the patient problem list associated with clinical terms.
2.03 SECOND CODE 2;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  OCT 31, 1996
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    Used to send additional codes along when one entry is bubbled.
2.04 THIRD CODE 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  OCT 31, 1996
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    Answer must be 1-10 characters in length.
3 CPT MODIFIER 3;0 Multiple #358.33 358.33

  • DESCRIPTION:  
    CPT Modifier multiple - entries will be associated with selection.  Only used when selection is a CPT Code.

External References

Name Field # of Occurrence
Y^DIQ ID.03+1, ID.04+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(358.2 ID.03+1
^DD(358.4 ID.04+1
^IBE(358.2 - [#358.2] ID.03+1
^IBE(358.3 - [#358.3] .01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K)
.05(XREF 1S), .05(XREF 1K)
^IBE(358.4 - [#358.4] ID.04+1

Naked Globals

Name Field # of Occurrence
^(0 ID.03+1, ID.04+1, .03(XREF 2S), .03(XREF 2K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1S), .05(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%I ID.03+1*!, ID.04+1*!
>> C ID.03+1*, ID.04+1*
>> DA .01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S), .04(XREF 2K)
.05(XREF 1S), .05(XREF 1K)
>> DIC ID.03+1, ID.04+1
U ID.03+1, ID.04+1, .03(XREF 2S), .03(XREF 2K), .04(XREF 2S), .04(XREF 2K), .05(XREF 1S), .05(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), .04(XREF 1S), .04(XREF 1K), .04(XREF 2S)
.04(XREF 2K), .05+1!, .05(XREF 1S), .05(XREF 1K), .06+1!, .09+1!, 2.01+1!, 2.03+1!, 2.04+1!
>> Y ID.03+1*, ID.04+1*
Info |  Desc |  Directly Accessed By Routines |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All