STANDARD DATA DICTIONARY #358 -- IMP/EXP ENCOUNTER FORM FILE                                                      3/24/25    PAGE 1
STORED IN ^IBE(358,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                         (VERSION 3.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Used by the import/export utility as a workspace.  


              DD ACCESS: @
              RD ACCESS: @
              WR ACCESS: @
             DEL ACCESS: @
           LAYGO ACCESS: @
           AUDIT ACCESS: @
IDENTIFIED BY: BRIEF DESCRIPTION (#.03)[R]

POINTED TO BY: FORM field (#.02) of the IMP/EXP ENCOUNTER FORM BLOCK File (#358.1) 
               

CROSS
REFERENCED BY: NAME(AB), NAME(AC), NAME(AG), NAME(AT), NAME(AU), NAME(B), TOOL KIT(C), TYPE OF USE(D)



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

              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3) X
              LAST EDITED:      JUN 06, 1994 
              HELP-PROMPT:      The form name must be 3-30 uppercase characters in length. 
              DESCRIPTION:
                                 The name of the encounter form.  

              DELETE TEST:      1,0)= I 1 W "...Encounter Forms can only be deleted through the",!," DELETE UNUSED FORM action in t
                                he Encounter Form Utilities!"

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

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

              CROSS-REFERENCE:  358^AT^MUMPS 
                                1)= Q
                                2)= Q
                                This cross-reference will be used to store the text of the compiled form.  The format will be
                                ..."AT",form ien,row #)=text line. The index will be created by the 'compile' action of the
                                encounter form utilities - it is optional.  


              CROSS-REFERENCE:  358^AC^MUMPS 
                                1)= Q
                                2)= Q
                                This cross-reference will be used to store the special controls needed (bold on, bold off, etc.) to
                                print the compiled form. The format will be ..."AC",form ien,row #,column # )=controls. The index
                                will be created by the 'compile' action of the encounter form utilities - it is optional.  


              CROSS-REFERENCE:  358^AU^MUMPS 
                                1)= Q
                                2)= Q
                                This cross-reference will be used to store the underlining of the compiled form. The format will be
                                ...,"AU",form ien,row #)=underlining . The index will be created by the 'compile' action of the
                                encounter form utilities - it is optional.  


              CROSS-REFERENCE:  358^AG^MUMPS 
                                1)= Q
                                2)= Q
                                This cross-reference will be used to store strings of graphics characters (TLC,TRC, etc.) needed
                                for the compiled form. The format will be ..."AG",form ien,row #,column # )=graphics string . The
                                index will be created by the 'compile' action of the encounter form utilities - it is optional.  


              CROSS-REFERENCE:  358^AB^MUMPS 
                                1)= Q
                                2)= Q
                                This cross-reference will be used to store the boxes needed for the compiled forms. The format will
                                be ..."AB",form ien,row #,column #, Block ien)= box width^box height. The index will be created by
                                the 'compile' action of the encounter form utilities.  



358,.02       SIMPLEX/DUPLEX         0;2 SET

                                '0' FOR SIMPLEX; 
                                '1' FOR DUPLEX,LONG-EDGE BINDING; 
                                '2' FOR DUPLEX,SHORT-EDGE BINDING; 
              LAST EDITED:      JUN 28, 1994 
              HELP-PROMPT:      SIMPLEX means one-sided, DUPLEX means two-sided. SHORT-EDGE BINDING is for attaching forms by the 
                                top, LONG-EDGE BINDING is for attaching forms along the side. 
              DESCRIPTION:
                                Allows forms to be printed either one-sided or two-sided.  


358,.03       BRIEF DESCRIPTION      0;3 FREE TEXT (Required)

              BRIEF DESCRIPTION OF FORM'S USE & CONTENT   
              INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
              LAST EDITED:      MAR 09, 1994 
              HELP-PROMPT:      Enter a brief description of the intended use of the form or its contents. 
              DESCRIPTION:       A brief description of the contents of the form and its intended use. This description will be
                                displayed to the user.  


358,.04       TYPE OF USE            0;4 SET (Required)

                                '0' FOR RESERVED FOR UTILITY; 
                                '1' FOR OUTPATIENT ENCOUNTER FORM; 
              LAST EDITED:      AUG 25, 1993 
              HELP-PROMPT:      How will the form be used? 
              DESCRIPTION:      This field will be used to categorize forms by type of use. It is possible that the form generator
                                that is part of the Encounter Form Utilities may be used to create forms other than encounter
                                forms.  The utilities use a couple of forms (WORKCOPY, TOOL KIT), TYPE OF USE is RESERVED FOR
                                UTILITY, that are not real forms.  

              TECHNICAL DESCR:
                                 

              SCREEN:           S DIC("S")="I Y'=0"
              EXPLANATION:      Does not allow users to choose RESERVED FOR UTILITY
              CROSS-REFERENCE:  358^D 
                                1)= S ^IBE(358,"D",$E(X,1,30),DA)=""
                                2)= K ^IBE(358,"D",$E(X,1,30),DA)
                                Used to find forms of a particular type.  



358,.05       COMPILED?              0;5 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
                                'F' FOR COMPILATION FAILED; 
              LAST EDITED:      JUL 14, 1994 
              HELP-PROMPT:      Enter yes if a compiled copy of the form should be created and stored. 
              DESCRIPTION:      This indicates whether a compiled version of the form exists. The compiled version is much faster
                                to print.  


358,.06       USE ICR?               0;6 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      JUL 17, 1995 
              HELP-PROMPT:      Enter YES if you want to use ICR to read had print. 

358,.07       TOOL KIT               0;7 SET (Required)

              SHOULD THIS FORM BE PART OF THE TOOL KIT?   
                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      DEC 20, 1993 
              HELP-PROMPT:      Is this form part of the tool kit? 
              DESCRIPTION:       This field, if set to YES, means that the form can not be deleted and can not be added to a clinic
                                setup.  

              CROSS-REFERENCE:  358^C 
                                1)= S ^IBE(358,"C",$E(X,1,30),DA)=""
                                2)= K ^IBE(358,"C",$E(X,1,30),DA)
                                Used to find all of the tool kit forms.  



358,.09       RIGHT MARGIN           0;9 NUMBER (Required)

              FORM'S RIGHT MARGIN (WIDTH IN CHARACTERS)   
              INPUT TRANSFORM:  K:+X'=X!(X>200)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUL 11, 1994 
              DESCRIPTION:
                                 The number of characters wide the form is.  

              EXECUTABLE HELP:  W !,"How many columns (characters) wide should the form be?"
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


358,.1        PAGE LENGTH            0;10 NUMBER (Required)

              FORM'S PAGE LENGTH (IN LINES)   
              INPUT TRANSFORM:  K:+X'=X!(X>300)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      APR 20, 1993 
              HELP-PROMPT:      How many lines should the form have? 
              DESCRIPTION:
                                 This is the number of usable lines on the page.  


358,.11       NUMBER OF PAGES        0;11 NUMBER (Required)

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUN 02, 1993 
              HELP-PROMPT:      How many pages should the encounter form have? 
              DESCRIPTION:
                                The encounter form may have multiple pages.  


358,.12       SCANNABLE?             0;12 SET

                                '0' FOR NO; 
                                '1' FOR YES; 
              LAST EDITED:      MAY 20, 1994 
              HELP-PROMPT:      Answer YES if the form will be scanned to accomplish data entry, NO otherwise. 

358,.13       FORM TYPE ID           0;13 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUN 09, 1994 
              HELP-PROMPT:      Type a Number between 1 and 999999999, 0 Decimal Digits 

358,.14       PAPER SIZE             0;14 SET

                                '1' FOR LETTER (8 1/2 x 11); 
              LAST EDITED:      JUN 14, 1994 
              HELP-PROMPT:      What size paper should be used? 

358,.15       ORIENTATION            0;15 SET

                                'p' FOR PORTRAIT; 
              LAST EDITED:      JUN 14, 1994 
              HELP-PROMPT:      How should the form be oriented? 

358,.16       TEXT SIZE              0;16 SET (Required)

                                '1' FOR 132 COLUMNS x 80 LINES; 
                                '2' FOR 96 COLUMNS x 72 LINES; 
                                '3' FOR 80 COLUMNS x 60 LINES; 
              LAST EDITED:      JUL 11, 1994 
              HELP-PROMPT:      This choice will determine the size of the print and how much text will fit on the form. 

358,.17       VERSION                0;17 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."2N.N) X
              LAST EDITED:      OCT 24, 1995 
              HELP-PROMPT:      Type a Number between 0 and 99, 1 Decimal Digit 
              DESCRIPTION:      This is the version of AICS that created this form.  This is used to prevent trying to import
                                incompatible form formats.  This is implemented in version 2.1.  Null entries can be assumed to be 
                                version 2.0.  


358,1         EXPORT NOTES           1;0   WORD-PROCESSING #358.01

              DESCRIPTION:      Used to describe the form to other sites. The form can not be displayed until after it is imported.
                                Maybe if they knew more about it they wouldn't want to import it! They will be able to read the
                                EXPORT NOTES before importing it.  


                LAST EDITED:      AUG 06, 1993 
                HELP-PROMPT:      What should other sites know about this form before importing it? The other site will not be able 
                                  to display it until after they import it. 



358,2         PAGE INFORMATION       2;0 Multiple #358.02


358.02,.01      PAGE NUMBER            0;1 NUMBER (Multiply asked)

                INPUT TRANSFORM:  K:+X'=X!(X>8)!(X<1)!(X?.E1"."1N.N) X
                LAST EDITED:      JUL 17, 1995 
                HELP-PROMPT:      Enter the pages that should be scanned. 
                CROSS-REFERENCE:  358.02^B 
                                  1)= S ^IBE(358,DA(1),2,"B",$E(X,1,30),DA)=""
                                  2)= K ^IBE(358,DA(1),2,"B",$E(X,1,30),DA)


358.02,.02      SCANNABLE?             0;2 SET

                                  '0' FOR NO; 
                                  '1' FOR YES; 
                LAST EDITED:      JUL 17, 1995 
                HELP-PROMPT:      Is this page meant to be scanned? 




INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):