STANDARD DATA DICTIONARY #357.6 -- PACKAGE INTERFACE FILE                                                         3/24/25    PAGE 1
STORED IN ^IBE(357.6,  (122 ENTRIES)   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                                    (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains a description of all of the interfaces with other packages.  The form will invoke the proper interface routines
by doing a lookup on this file and then calling the routine by indirection. The Data will be exchanged between the encounter form
utilities and other packages by putting the data in at @IBARY. Interfaces that pass a single value or record will will reference
data as in: S DATA=@IBARY. Interfaces that pass lists of records or values will reference the data as in: S DATA=@IBARY@().  
 
Note that multiple entries in this file can have the same entry points into routines. This is for efficiency purposes. For example,
patient name, DOB and sex are all located on the same node of the Patient file. Each of these items of data can have its own entry
in the Package Interface file, but by using the same entry point there is a savings because all of the data on that node can be
obtained at once. The routine that invokes the entry points keeps track of those already invoked so that they are not repeated.  


POST-SELECTION ACTION  : D ASK^IBDFU9
              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: ACTION TYPE (#.06)[R]
      "WRITE": Q  N IBDWNAM S IBDWNAM=$E($P(^(0),U),1,40) D EN^DDIOL(IBDWNAM,"","!?0")
     "WRITE1": N IBDWTYPE S IBDWTYPE=$S($P(^(0),"^",6)=1:"INPUT",$P(^(0),"^",6)=2:"OUTPUT",$P(^(0),"^",6)=3:"SELECTION",1:"REPORT")
               _$S($P(^(0),"^",6)=3&'$P(^(0),"^",13):"  ** NOT SCANNABLE **",1:"") D EN^DDIOL("TYPE="_IBDWTYPE,"","?45")

POINTED TO BY: TYPE OF DATA field (#.03) of the COMPILED BUBBLES sub-field (#357.13) of the ENCOUNTER FORM BLOCK File (#357.1) 
               TYPE OF DATA field (#.04) of the COMPILED HAND PRINT FIELDS sub-field (#357.14) of the ENCOUNTER FORM BLOCK File 
                   (#357.1) 
               SELECTION INTERFACE field (#.11) of the SELECTION LIST File (#357.2) 
               TYPE OF DATA field (#.03) of the DATA FIELD File (#357.5) 
               PACKAGE INTERFACE FOR INPUT field (#.13) of the PACKAGE INTERFACE File (#357.6) 
               TYPE OF DATA field (#.06) of the MULTIPLE CHOICE FIELD File (#357.93) 
               TYPE OF DATA field (#.03) of the BUBBLES sub-field (#357.951) of the FORM DEFINITION File (#357.95) 
               TYPE OF DATA field (#.04) of the HAND PRINT FIELDS sub-field (#357.952) of the FORM DEFINITION File (#357.95) 
               DATA TYPE field (#.03) of the DYNAMIC LIST ITEMS sub-field (#357.961) of the ENCOUNTER FORM TRACKING File (#357.96) 
               DATA TYPE field (#.03) of the OVERFLOW DATA sub-field (#357.962) of the ENCOUNTER FORM TRACKING File (#357.96) 
               TYPE OF DATA field (#.06) of the IMP/EXP HAND PRINT FIELD File (#358.94) 
               PACKAGE INTERFACE field (#.1) of the AICS ERROR AND WARNING LOG File (#359.3) 
               TYPE OF DATA field (#.06) of the HAND PRINT FIELD File (#359.94) 
               REPORT field (#.01) of the REPORT sub-field (#409.9501) of the PRINT MANAGER CLINIC SETUP File (#409.95) 
               EXCLUDED REPORT field (#.01) of the EXCLUDED REPORT sub-field (#409.9502) of the PRINT MANAGER CLINIC SETUP File 
                   (#409.95) 
               REPORT field (#.01) of the REPORT sub-field (#409.961) of the PRINT MANAGER DIVISION SETUP File (#409.96) 
               

CROSS
REFERENCED BY: NAME(B), CUSTODIAL PACKAGE(C), USER LOOKUP(D), NAME(E)



357.6,.01     NAME                   0;1 FREE TEXT (Required)

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3)!'(X'?1P.E) X
              LAST EDITED:      JUL 11, 1997 
              HELP-PROMPT:      The name should be prefixed with the namespace of the package that provides the data. 
              DESCRIPTION:
                                 The name of the Package Interface. The name should be preceded with the namespace of the package.  

              TECHNICAL DESCR:
                                 

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  357.6^B 
                                1)= S ^IBE(357.6,"B",$E(X,1,30),DA)=""
                                2)= K ^IBE(357.6,"B",$E(X,1,30),DA)

              CROSS-REFERENCE:  357.6^E^MUMPS 
                                1)= N IBDXE S IBDXE=$E(X,$F(X," "),40) S:$A(IBDXE)<33 IBDXE=X S ^IBE(357.6,"E",IBDXE,DA)=""
                                2)= N IBDXE S IBDXE=$E(X,$F(X," "),40) S:$A(IBDXE)<33 IBDXE=X K ^IBE(357.6,"E",IBDXE,DA)
                                 For package interfaces that are output routines the name has the custodial package's name space as
                                a prefix. This cross-reference removes that prefix. It is used to improve the display of output
                                routines for the user.  



357.6,.02     ENTRY POINT            0;2 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
              LAST EDITED:      OCT 18, 1994 
              HELP-PROMPT:      What entry point into the routine does this package interface use? 
              DESCRIPTION:
                                 The entry point in the routine that should be called.  


357.6,.03     ROUTINE                0;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
              LAST EDITED:      NOV 25, 1992 
              HELP-PROMPT:      What routine does this package interface use? 
              DESCRIPTION:
                                 The routine that should be called.  


357.6,.04     CUSTODIAL PACKAGE      0;4 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:      This is a free text pointer to the package file. It serves only to document the custodial package
                                of the data.  

              CROSS-REFERENCE:  357.6^C 
                                1)= S ^IBE(357.6,"C",$E(X,1,30),DA)=""
                                2)= K ^IBE(357.6,"C",$E(X,1,30),DA)


357.6,.05     VARIABLE DATA?         0;5 SET

              DOES THE DATA VARY FROM PATIENT TO PATIENT?   
                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      NOV 24, 1993 
              HELP-PROMPT:      Enter YES if the data returned is variable, NO if the data is always the same. 
              DESCRIPTION:      This field is used in the batch printing of encounter forms. The purpose is to avoid recomputing
                                fields whose data does not change from patient to patient.  


357.6,.06     ACTION TYPE            0;6 SET (Required)

                                '1' FOR INPUT; 
                                '2' FOR DISPLAY; 
                                '3' FOR SELECTION; 
                                '4' FOR PRINT REPORT; 
              LAST EDITED:      AUG 25, 1995 
              HELP-PROMPT:      Is this interface for inputting data, displaying data to a form, for creating lists that will 
                                appear on a form, or for printing reports? 
              DESCRIPTION:       Enter 1 for INPUT if the interface accepts data input from the user 
                                        and transmits the data to the appropriate package. Enter 2 for DISPLAY if the interface
                                retrieves data for display to a form.  Enter 3 for SELECTION if the interface is for building a
                                list to display 
                                        to a form.  Enter 4 if the interface is for printing a report.  
                                 
                                If the ACTION TYPE is SELECTION then the data type must be a record and the first piece must be the
                                ID use to uniquely identify the selection.  

              TECHNICAL DESCR:
                                 


357.6,.07     DATA TYPE              0;7 SET

              WHAT FORMAT WILL THE DATA BE IN?   
                                '1' FOR SINGLE VALUE; 
                                '2' FOR RECORD; 
                                '3' FOR LIST OF SINGLE VALUES; 
                                '4' FOR LIST OF RECORDS; 
                                '5' FOR WORD PROCESSING; 
              LAST EDITED:      JUL 26, 1993 
              HELP-PROMPT:      What format will the data be in? 
              DESCRIPTION:      Only applies to selection or display interfaces, both of which retrieve data for display to a form.
                                It is the type of format the data should be in.  
                                 
                                A single value is a string without pieces. A record is a set of strings concatenated together with
                                "^" separating the pieces. A list is an indefinite number of values, each numbered, each containing
                                the same type of information. A word processing data type will be in FM format.  If the ACTION TYPE
                                is SELECTION then the data type must be record.  


357.6,.08     PRINT COMPLETE         0;8 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      MAY 07, 1993 
              HELP-PROMPT:      If there is insufficient room on the form to print the data, should it be re-printed in full on a 
                                separate page? 
              DESCRIPTION:       This field is used to determine what should happen if the data does not fit in the space allocated
                                to it on the form. If answered YES the data will be printed on another page.  


357.6,.09     AVAILABLE? (Y/N)       0;9 SET (Required)

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      DEC 13, 1992 
              HELP-PROMPT:      Is this package interface now available for use? 
              DESCRIPTION:       This field should be set to YES if the interface is available, NO if it is not available.
                                Interfaces that are not available are not called.  


357.6,.1      HEALTH SUMMARY?        0;10 SET

              ARE YOU REQUESTING A HEALTH SUMMARY?   
                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      JUN 16, 1993 
              HELP-PROMPT:       Are you requesting a HEALTH SUMMARY to print? 
              DESCRIPTION:       This field will determine how to go about printing the report or form. It applies only to Package
                                Interfaces of ACTION TYPE = PRINT REPORT. Health Summaries use the field HEALTH SUMMARY to
                                determine the type of Health Summary to print. The process of printing Health Summaries dos not use
                                the fields ENTRY POINT or ROUTINE, since all Health Summaries are printed in the same way.  


357.6,.11     TYPE OF HEALTH SUMMARY 0;11 POINTER TO HEALTH SUMMARY TYPE FILE (#142)

              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U)'=""GMTS HS ADHOC OPTION""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      JUN 17, 1993 
              HELP-PROMPT:      Which Health Summary do you want printed? 
              DESCRIPTION:       This identifies the Health Summary that should be printed when this Package Interface is invoked.
                                It should be null unless the HEALTH SUMMARY? field #.1 is coded YES.  

              SCREEN:           S DIC("S")="I $P(^(0),U)'=""GMTS HS ADHOC OPTION"""
              EXPLANATION:      EXCLUDES AD HOC HEALTH SUMMARIES

357.6,.12     TOOLKIT MEMBER?        0;12 SET

              SHOULD THIS PACKAGE INTERFACE BE PART OF THE TOOLKIT?   
                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      JUL 11, 1995 
              HELP-PROMPT:      Enter YES if this PACKAGE INTERFACE was added by the package developers as part of the toolkit, 
                                enter NO otherwise. 
              DESCRIPTION:       Package Interfaces that are developed for national use will be documented as being part of the
                                toolkit.  


357.6,.13     PACKAGE INTERFACE FOR INPUT 0;13 POINTER TO PACKAGE INTERFACE FILE (#357.6)

              WHICH INTERFACE SHOULD THIS LIST USE FOR PASSING DATA TO THE DATA BASE?   
              INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""S""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 
                                X
              LAST EDITED:      AUG 25, 1995 
              HELP-PROMPT:      What interface should be used for inputting data entered on the selection list? 
              DESCRIPTION:
                                Used to map scanned data to DHCP.  

              SCREEN:           S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""S"""
              EXPLANATION:      Must be an available interfaces for accepting input from selection lists.

357.6,.14     DYNAMIC SELECTIONS     0;14 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      DEC 21, 1994 
              HELP-PROMPT:      Only for selection routines. Enter YES if the Package Interface builds the selection list each time 
                                the form is printed. 
              DESCRIPTION:
                                This is used to indicate whether the interface is used to build selection lists at print time.  


357.6,.15     DO NOT USE DFN AS A SUBSCRIPT 0;15 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      APR 13, 1995 
              HELP-PROMPT:      If the patient DFN should not be used as a subscript when passing data enter YES. 
              DESCRIPTION:      Originally, the patient DFN was used as a subscript when returning data for Package Interfaces of
                                type output, but not for other types of interfaces. It is no longer necessary for any new Package
                                Interface to use DFN as a subscript, but, to maintain compatibilty, output routines must set this
                                field to YES if DFN is not to be used as a subscript. This field has no effect on other types of
                                interfaces.  

              SCREEN:           S DIC("S")="I (Y=1)!($P(^IBE(357.6,DA,0),U,6)=2)"
              EXPLANATION:      If the action type is not OUTPUT ROUTINE then this field should not be set to NO.

357.6,.16     ALLOWED OBJECT USE     0;16 FREE TEXT

              INPUT TRANSFORM:  S X=$$UPPER^VALM1(X) K:$L(X)>4!("SMHP"'[$E(X,1))!("SMHP"'[$E(X,2))!("SMHP"'[$E(X,3))!("SMHP"'[$E(X,
                                4)) X
              LAST EDITED:      SEP 13, 1995 
              DESCRIPTION:      This field applies only to package interfaces for input and is used to determine which package
                                interfaces a particular type of form object may point to. Some combinations don't make sense. For
                                example, it would not make sense to allow a multiple choice question to point to vitals, which is
                                used to input data such as temperature and blood pressure.  

              EXECUTABLE HELP:  D HELP7^IBDFU5A
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


357.6,.17     ASK FOR ADDITIONAL NARRATIVE 0;17 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      DEC 07, 1995 
              DESCRIPTION:      Enter whether users should be prompt for specifying the provider narrative that will be sent to PCE
                                (and problem list) when creating a selection list.  If this is answered no and the narrative is
                                sent to PCE then the text as it appears on the form will be used as the provider narrative.  
                                 
                                Generally only dianosis and clinical lexicon entries will want this field set to Yes.  


357.6,.18     ASK FOR CLINICAL LEXICON 0;18 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      FEB 05, 1996 
              HELP-PROMPT:      Enter 'Yes' if you want to map entries from this interface to the clinical lexicon 
              DESCRIPTION:      If this field is answered 'Yes' then users who are editing or creating selection lists based on
                                this interface will be asked to map each entry (thought it is optional) to a clinical lexicon
                                entry.  This is highly recommended for user who are scanning diagnosis entries and trying to add
                                entries to the Patients Problem list.  
                                 
                                The primary purpose of this field is to allow sites who have built selection lists using the ICD9
                                Diagnosis file to map each entry to the clinical lexicon.  The Problem List EP has recommended that
                                each problem added to the problem list be associated with a clinical lexicon entry.  


357.6,.19     DQ REQUIRED            0;19 SET

                                '1' FOR YES; 
              LAST EDITED:      FEB 12, 1996 
              DESCRIPTION:
                                Field used to determine if a data qualifier is required for this input interface.  


357.6,.2      ASK FOR CLINICAL REMINDERS 0;20 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      OCT 02, 1997 
              HELP-PROMPT:      If this package interface is for display of clinical reminders answer yes, otherwise answer no. 
              DESCRIPTION:
                                If this package interface is for display of clinical reminders answer yes, otherwise answer no.  


357.6,.21     ASK FOR CPT MODIFIERS? 0;21 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      MAY 24, 1999 
              HELP-PROMPT:      If this package interface is to prompt for CPT Modifiers, answer yes, otherwise answer no. 
              DESCRIPTION:      ASK FOR CPT MODIFIERS field will be used when selecting CPT codes.  If answered "YES" and data is a
                                procedure, CPT Modifiers should be asked during Forms Design and Manual Data Entry.  


357.6,.22     ICD CODING SYSTEM      0;22 POINTER TO ICD CODING SYSTEMS FILE (#80.4)

              LAST EDITED:      FEB 06, 2012 
              HELP-PROMPT:      Select ICD coding system to use with the package interface. 
              DESCRIPTION:
                                This field is used to indicate the ICD coding system that should be used for the package interface.  


357.6,1       DESCRIPTION            1;0   WORD-PROCESSING #357.61

              DESCRIPTION:
                                Should describe the data being exchanged by the package interface.  


                LAST EDITED:      FEB 10, 1993 
                HELP-PROMPT:      Enter a description of the data being exchanged. 
                DESCRIPTION:
                                  This should describe the data being exchanged b the package interface.  




357.6,2.01    PIECE 1 DESCRIPTIVE NAME 2;1 FREE TEXT

              WHAT IS THE FIRST PIECE OF DATA RETURNED BY THE INTERFACE?   
              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      JUL 26, 1993 
              HELP-PROMPT:      Answer must be 3-30 characters in length. 
              DESCRIPTION:
                                 Should be a descriptive name of the first field in the record returned by the interface.  


357.6,2.02    PIECE 1 MAXIMUM LENGTH 2;2 NUMBER

              WHAT IS ITS MAXIMUM LENGTH?   
              INPUT TRANSFORM:  K:+X'=X!(X>210)!(X<0)!(X?.E1"."1N.N) X
              LAST EDITED:      JUL 26, 1993 
              HELP-PROMPT:      Type a Number between 0 and 210, 0 Decimal Digits 
              DESCRIPTION:
                                 The maximum length of the first field of the record returned by the interface.  


357.6,2.16    PIECE 1 RECOMMENDED HEADER 2;16 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
              LAST EDITED:      APR 17, 1995 
              HELP-PROMPT:      Answer must be 1-20 characters in length. 
              DESCRIPTION:
                                The recommended header will be used as the default when designing a form.  


357.6,2.17    IS PIECE 1 DISPLAYABLE? 2;17 SET

              CAN THIS FIELD BE DISPLAYED TO THE USER?   
                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      AUG 10, 1993 
              HELP-PROMPT:      The first piece of the returned record is reserved for the unique id of the selection. Enter no if 
                                it should not be displayed, for example, if it is a pointer. 
              DESCRIPTION:      This is used only for selection type interfaces. If NO, then the value can not be displayed to the
                                encounter form.  The first piece must contain the unique id of the selection.  


357.6,2.18    EXPORT SELECTIONS/CHOICES? 2;18 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      AUG 25, 1995 
              HELP-PROMPT:      Enter NO if the ID returned by the PACKAGE INTERFACE is not constant between sites, for example, if 
                                it is a pointer. Otherwise answer YES. 
              DESCRIPTION:       
                                 
                                Applies to selection and input routines. Determines whether selections appearing on selection lists
                                and choices in a multiple choice field will be exported along with the form that they appear on.
                                The import/export utility will not resolve pointers, so if the id used by the package interface is
                                a pointer that differs between sites this field should contain NO.  


357.6,3       USER LOOKUP            3;1 FREE TEXT

              LIST OF WORDS TO MAKE LOOK-UPS EASIER   
              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>240!($L(X)<1) X
              LAST EDITED:      JUL 26, 1993 
              HELP-PROMPT:      Enter words separated with spaces. They will be indexed to assist in lookup. 
              DESCRIPTION:       This field is used to create a KWIC index for this file. The purpose is to assist the user in
                                locating the package interface he needs to display a particular item of data to a form.  

              EXECUTABLE HELP:  D LOOKUP^IBDF16
              CROSS-REFERENCE:  357.6^D^KWIC 
                                1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)
                                >2,^DD("KWIC")'[I S ^IBE(357.6,"D",I,DA)=""

                                2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "(,.?! '-/&:;)"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)
                                >2 K ^IBE(357.6,"D",I,DA)
                                 This index is meant to assist the user in locating the correct package interface needed to display
                                a particular item of data to a form.  



357.6,4.01    ENTRY ACTION           4;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      MAY 21, 1993 
              HELP-PROMPT:      This is Standard MUMPS code. 
              DESCRIPTION:       This code will be executed after the PROTECTED VARIABLES are newed, but before the interface
                                routine is called.  

              WRITE AUTHORITY:  @

357.6,5.01    EXIT ACTION            5;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      MAY 18, 1993 
              HELP-PROMPT:      This is Standard MUMPS code. 
              DESCRIPTION:       This code will be executed after the interface routine is called.  The effect of the NEW done on
                                the PROTECTED VARIABLES is still in effect.  

              WRITE AUTHORITY:  @

357.6,6       PROTECTED LOCAL VARIABLES 6;0 Multiple #357.66

              DESCRIPTION:       This is a list of variables that should be newed before the entry action or calling the interface
                                routine. It is protection against interfaces that alter or kill variables, or entry actions that do
                                so. Note that REQUIRED VARIABLES should not also be PROTECTED VARIABLES. If an interface routine 
                                changes a required variable, however, there is a way to protect it.  Supposing, for example, DFN is
                                killed by the interface. This will protect it: 
                                     PROTECTED VARIABLE:   IBDFN 
                                     ENTRY ACTION:  S IBDFN=DFN 
                                     EXIT ACTION:   S DFN=IBDFN 


357.66,.01      PROTECTED LOCAL VARIABLES 0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:'$$VARIABLE^IBDFU5(X) X
                LAST EDITED:      JUN 08, 1993 
                HELP-PROMPT:      Enter variables that should be NEWED before the entry action or calling the interface. 
                DESCRIPTION:
                                   A list of variables that should be newed before the entry action or calling the interface.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  357.66^B 
                                  1)= S ^IBE(357.6,DA(1),6,"B",$E(X,1,30),DA)=""
                                  2)= K ^IBE(357.6,DA(1),6,"B",$E(X,1,30),DA)




357.6,7       REQUIRED LOCAL VARIABLES 7;0 Multiple #357.67

              DESCRIPTION:       The interface may require inputs. This field is a list of the required local variables. The
                                interface will not be called unless the variables are determined to exist.  


357.67,.01      REQUIRED LOCAL VARIABLE 0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:'$$VARIABLE^IBDFU5(X) X
                LAST EDITED:      MAY 21, 1993 
                HELP-PROMPT:      Enter any variables that must exist before the Package Interface routine is called. 
                DESCRIPTION:       A variable that is required input to the interface routine. The interface routine will not be
                                  called if all of the required variables are not defined.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  357.67^B 
                                  1)= S ^IBE(357.6,DA(1),7,"B",$E(X,1,30),DA)=""
                                  2)= K ^IBE(357.6,DA(1),7,"B",$E(X,1,30),DA)




357.6,9       PCE DIM INPUT TRANSFORM 9;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      The input transform should transform X to the value that should be passed. 
              DESCRIPTION:      Used to transform X, the identifier stored with the form object, to the form that should be passed
                                to the PCE Device Interface Module. It may, for example, transform a code to an ien.  

              WRITE AUTHORITY:  @

357.6,10      HELP TEXT              10;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
              LAST EDITED:      MAY 22, 1995 
              HELP-PROMPT:      This should provide some help to the user who is trying to enter a value associated with a bubble. 
              DESCRIPTION:
                                This should provide some help to the user who is trying to enter a value associated with a bubble.  


357.6,11      VALIDATOR              11;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      SEP 08, 1995 
              HELP-PROMPT:      This is Standard MUMPS code will kill X if X no longer identifies a valid code. 
              DESCRIPTION:      This field is used to validate codes currently on a form. The variable X should be set to the
                                identifier that was returned by the Package Interface. For selection interfaces, the identifier is
                                always piece 1 of the 0 node of the entry in the selection list. Xecuting this field will result in
                                X being killed if the value is not valid. This is used by the maintanance utility, for example, to
                                find CPT codes that have been inactivated.  

              WRITE AUTHORITY:  @

357.6,12.01   PCE DIM NODE           12;1 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      What node will be used to pass the data? 
              DESCRIPTION:
                                The node used to pass the data to PCE, using the PCE DEVICE INTERFACE MODULE.  


357.6,12.02   PCE DIM PIECE, VALUE   12;2 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      What piece should be used to pass the value? 
              DESCRIPTION:
                                The piece in the PXCA node used to pass the input value.  


357.6,12.03   PCE DIM PIECE, NARRATIVE 12;3 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      What piece should be used to pass the text displayed on the form? 
              DESCRIPTION:
                                The piece in the PCXA node used to pass the text displayed on the form.  


357.6,12.04   PCE DIM PIECE, HEADER  12;4 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      What piece should be used to pass the header displayed on the form? 
              DESCRIPTION:
                                The piece on the node specified by the PCE DIM that the header is mapped to.  


357.6,12.05   PCE DIM PIECE, DATA QUALIFIER 12;5 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 17, 1995 
              HELP-PROMPT:      What piece should be used to pass the data qualifier? 
              DESCRIPTION:
                                The piece of the PXCA node where the data modifier belongs.  


357.6,12.06   PCE DIM PIECE, QUANTITY 12;6 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      OCT 15, 1996 
              HELP-PROMPT:      Type a Number between 1 and 99, 0 Decimal Digits 
              DESCRIPTION:      An entry in this field indicates which piece of the array the quantity should be passed on when
                                sending data to PCE.  


357.6,13      ALLOWABLE QUALIFIERS   13;0         VARIABLE POINTER  Multiple #357.613
              DESCRIPTION:
                                This mulitiple contains the list of qualifiers that may apply to the data.  


357.613,.01     ALLOWABLE QUALIFIERS   0;1        VARIABLE POINTER (Multiply asked)

                FILE  ORDER  PREFIX    LAYGO  MESSAGE
              357.98    1    Q            n   DATA QUALIFIER 
               359.1    2    D            n   TYPE OF DATA 
                                         
                LAST EDITED:      APR 26, 1995 
                HELP-PROMPT:      Which qualifiers can apply to the data? 
                DESCRIPTION:
                                  A qualifier that can be used by this package interface.  

                CROSS-REFERENCE:  357.613^B 
                                  1)= S ^IBE(357.6,DA(1),13,"B",$E(X,1,30),DA)=""
                                  2)= K ^IBE(357.6,DA(1),13,"B",$E(X,1,30),DA)
                                  3)= Required Index for Variable Pointer


357.613,.03     INDEPENDENT MAPPING INFO? 0;3 SET (Required)

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                LAST EDITED:      APR 26, 1995 
                HELP-PROMPT:      YES means that fields on the form associated with this qualifier will have its own rules for 
                                  entering the data to the database. 
                DESCRIPTION:
                                  YES means that data can be mapped into the PCE DIM based on the qualifier.  


357.613,.04     PCE DIM NODE           0;4 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      OCT 17, 1995 
                HELP-PROMPT:      What node should the qualifier be placed on? 
                DESCRIPTION:
                                  The node where the data should be placed.  


357.613,.05     PCE DIM PIECE, VALUE   0;5 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      OCT 17, 1995 
                HELP-PROMPT:      What piece should the primary value be located? 
                DESCRIPTION:
                                  The piece on the node where the value should be placed.  


357.613,.07     PCE DIM PIECE, HEADER  0;7 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      OCT 17, 1995 
                HELP-PROMPT:      What piece should the header be located on? 
                DESCRIPTION:
                                  The piece on the node where the associated header should be placed.  


357.613,.08     PCE DIM PIECE, QUALIFIER 0;8 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      OCT 17, 1995 
                HELP-PROMPT:      What piece should the qualifier be located on? 
                DESCRIPTION:
                                  The piece where the qualifier should go.  




357.6,14      PCE DIM OUTPUT TRANSFORM 14;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      APR 01, 1996 
              HELP-PROMPT:      This should change Y, the value to be passed, to a value suitable for display. 
              DESCRIPTION:      This transform should set Y, the value to be passed to the PCE Device Interface Module (DIM), to a
                                value that is suitable for display. It may, for example, change an ien to a code.  

              WRITE AUTHORITY:  @

357.6,15      DATA DESCRIPTION       15;0 Multiple #357.615

              DESCRIPTION:      For interfaces that return records, this multiple stores information on the fields, other than the
                                first field.  

              IDENTIFIED BY:    
                    "WRITE":    D EN^DDIOL("   PIECE="_$P(^(0),U,3),"","?0")

357.615,.01     DATA                   0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
                LAST EDITED:      MAR 20, 1995 
                HELP-PROMPT:      Enter a descriptive name for this data field, up to 30 characters. 
                DESCRIPTION:
                                  A descriptive name for the data.  

                CROSS-REFERENCE:  357.615^B 
                                  1)= S ^IBE(357.6,DA(1),15,"B",$E(X,1,30),DA)=""
                                  2)= K ^IBE(357.6,DA(1),15,"B",$E(X,1,30),DA)


357.615,.02     MAXIMUM LENGTH         0;2 NUMBER (Required)

                INPUT TRANSFORM:  K:+X'=X!(X>210)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      MAR 20, 1995 
                HELP-PROMPT:      What is the maximum length of this field? 
                DESCRIPTION:
                                  The maximum length of the data.  


357.615,.03     PIECE                  0;3 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>8)!(X<2)!(X?.E1"."1N.N)!($D(^IBE(357.6,D0,15,"C",X))) X
                LAST EDITED:      APR 07, 1995 
                HELP-PROMPT:      In the returned record, which piece will this field be? 
                DESCRIPTION:      The piece that the data will be returned as. Doesn't allow piece 1 because that is stored in
                                  field #2.01.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  357.615^C 
                                  1)= S ^IBE(357.6,DA(1),15,"C",$E(X,1,30),DA)=""
                                  2)= K ^IBE(357.6,DA(1),15,"C",$E(X,1,30),DA)
                                  Indexes the field by piece.  



357.615,.04     ANNEX NODE             0;4 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
                LAST EDITED:      MAR 20, 1995 
                HELP-PROMPT:      You can optionally specify the subscript to store the data. Use this when the entire record won't 
                                  fit on one node. 
                DESCRIPTION:      In case all the returned data can not be returned on a single node an annex node can be
                                  specified.  


357.615,.05     RECOMMENDED HEADER     0;5 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
                LAST EDITED:      APR 17, 1995 
                HELP-PROMPT:      Answer must be 1-40 characters in length. 
                DESCRIPTION:
                                  The recommended header will be used as the default when designing a form.  




357.6,16.1    ALLOW INPUT OF NARRATIVE? 16;1 SET

                                'n' FOR NO; 
                                'o' FOR OPTIONAL; 
                                'r' FOR REQUIRED; 
              LAST EDITED:      APR 21, 1995 
              HELP-PROMPT:      Should the user be allowed to enter a narrative? Answer n=NO, o=OPTIONAL, r=REQUIRED 
              DESCRIPTION:      For selection interfaces, this field determines whether a narrative is allowed by the PCE Generic
                                Device Interface.  


357.6,16.2    NARRATIVE DATA TYPE    16;2 POINTER TO AICS DATA ELEMENTS FILE (#359.1)

              LAST EDITED:      APR 26, 1995 
              HELP-PROMPT:      What data type definition describes the narrative? 
              DESCRIPTION:
                                This determines, among other things, how much space to allocate for the narrative.  


357.6,16.3    NARRATIVE HEADER       16;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
              LAST EDITED:      AUG 15, 1995 
              HELP-PROMPT:      Answer must be 1-40 characters in length. 
              DESCRIPTION:
                                Used to label the narrative field.  


357.6,16.5    ALLOW INPUT OF PRIMARY VALUE? 16;5 SET

                                'n' FOR NO; 
                                'o' FOR OPTIONAL; 
                                'r' FOR REQUIRED; 
              LAST EDITED:      APR 26, 1995 
              HELP-PROMPT:      Should a code be entered? n=NO, o=OPTIONAL, r=REQUIRED 
              DESCRIPTION:
                                For selectin interfaces this determines whether a value, other than a narrative, can be entered.  


357.6,16.6    PRIMARY VALUE DATA TYPE 16;6 POINTER TO AICS DATA ELEMENTS FILE (#359.1)

              LAST EDITED:      APR 26, 1995 
              HELP-PROMPT:      What type of data is the primary value? 
              DESCRIPTION:      For selection interfaces this determines, among other things, the data type of the value to be
                                entered.  


357.6,16.7    PRIMARY VALUE HEADER   16;7 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1) X
              LAST EDITED:      AUG 15, 1995 
              HELP-PROMPT:      Answer must be 1-40 characters in length. 
              DESCRIPTION:
                                Used to label the primary value field.  


357.6,16.8    ALLOW MULTIPLIERS      16;8 SET

                                '1' FOR YES; 
              LAST EDITED:      OCT 08, 1996 
              HELP-PROMPT:      Enter yes if this interface will allow entry of quantity at form development time. 
              DESCRIPTION:      For selection interfaces, this determines whether 'quantity' should be asked at form development
                                time to pass multiple occurrences of a selection to PCE.  


357.6,16.9    ALLOW INPUT OF MULTIPLE CODES? 16;9 SET

                                '1' FOR YES; 
              LAST EDITED:      OCT 21, 1996 
              HELP-PROMPT:      Enter a 1 for 'YES'. 
              DESCRIPTION:      Enter a one in this field if the users will be allowed to add more than one code to pass along to
                                PCE when one entry is bubbled.  Data in this field REQUIRES that field 17 be populated with mumps
                                code that will allow selection of the code if the entry is edited.  


357.6,17      SELECTOR               17;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      SEP 08, 1995 
              HELP-PROMPT:      Enter mumps code that will allow the form designer to add a choice to a multiple choice field. 
              DESCRIPTION:      This field only applies to input interfaces. It is executed as by an input transform when creating
                                a multiple choice field. It should: 1) Kill X if an nothing is selected, otherwise set X to a value
                                suitable for display, perhaps the code.  2) Set IBLABEL to a suitable label for the choice.  3) Set
                                IBID to an identifier. The identifier should ideally be exportable, meaning the same from site to
                                site. This usually means a coded value rather than an ien. The identfier should match that of a
                                corresponding selection interface, if there is one.  

              WRITE AUTHORITY:  @

357.6,18      MANUAL DATA ENTRY ROUTINE 18;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      DEC 08, 1995 
              HELP-PROMPT:      Enter the code to be executed during manual data entry for this interface.  This is Standard MUMPS 
                                code. 
              DESCRIPTION:      Enter the code to be executed to do manual data entry for this interface.  
                                 
                                This field should only be completed for input package interfaces.  This code will be executed to
                                provide quick data entry for a user trying to input data for a form.  It is expected that the
                                output of this field will be used to format the PXCA array prior to calling PCE to file the data 
                                for the encounter.  
                                 
                                Developers writing routines for this entry should provide a roll and scroll interface for manaul
                                entry of items only on the form.  

              WRITE AUTHORITY:  @

357.6,19      EXTERNAL DISPLAY VALUES 19;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      FEB 14, 1996 
              HELP-PROMPT:      This is Standard MUMPS code. 
              DESCRIPTION:      Executable code used to translate the internal value that is to be passed to PCE into its external
                                value for display purposes.  It is used by the data validation routines to display the external 
                                values and descriptions of what is to be passed, to the user for verification.  

              WRITE AUTHORITY:  @

357.6,20      PASS DQ AS VALUE       20;1 SET

                                '1' FOR YES; 
              LAST EDITED:      OCT 01, 1996 
              HELP-PROMPT:      Enter Yes if the Data Qualifier should be passed as the Value when sending data to PCE. 
              DESCRIPTION:      If the value of the Data Qualifier shall be passed to PCE as the VALUE, this field should be set to
                                one.  Doing so will prevent the data in the VALUE from populating the PCE DIM NODE, but instead,
                                will allow the Data Qualifier to pass as the VALUE.  This is used mostly for YES/NO Data
                                Qualifiers, where the value may be a question, and the Data Qualifier Value, if bubbled, is the
                                value that must be placed on the PCE DIM NODE.  


357.6,21      PCE DIM PIECE, VARIABLE VALUE 21;E1,245 MUMPS

              INPUT TRANSFORM:  K:$L(X)>245 X D:$D(X) ^DIM
              LAST EDITED:      OCT 01, 1996 
              HELP-PROMPT:      This is Standard MUMPS code. 
              DESCRIPTION:      This field should be populated when the PCE DIM PIECE VALUE is not constant.  If the value of that
                                field is dependent upon specific conditions, those conditions may be evaluated by placing the MUMPS
                                code in this field.  Ultimately, the code should return a value that will be used as the PCE DIM
                                PIECE VALUE.  If the return value is null, the original PCE DIM PIECE VALUE field will be used to
                                determine the piece location to pass the VALUE on.  

              WRITE AUTHORITY:  @


      FILES POINTED TO                      FIELDS

AICS DATA ELEMENTS (#359.1)       NARRATIVE DATA TYPE (#16.2)
                                  PRIMARY VALUE DATA TYPE (#16.6)

HEALTH SUMMARY TYPE (#142)        TYPE OF HEALTH SUMMARY (#.11)

ICD CODING SYSTEMS (#80.4)        ICD CODING SYSTEM (#.22)

PACKAGE INTERFACE (#357.6)        PACKAGE INTERFACE FOR INPUT (#.13)



INPUT TEMPLATE(S):
IBDF EDIT AVAILABLE HLTH SMRY MAR 26, 1997@09:24  USER #0    
     Used to define a package interface that prints a Health Summary.
IBDF EDIT AVAILABLE REPORT    SEP 24, 1993@13:37  USER #0    
     Used to define a package interface that prints a report other than a
     Health Summary.
IBDF EDIT OUTPUT/SELECTION RTNAUG 07, 1995@08:37  USER #0    
     Used to define a package interface of the type output routine or selection
     routine.

PRINT TEMPLATE(S):

SORT TEMPLATE(S):
IBD PRIM CARE SEARCH          MAY 30, 1996@15:26  USER #0      NAME CONTAINS "PRIMARY CARE"
     List of new primary care interfaces for patch.


FORM(S)/BLOCK(S):