ࡱ>  WOPQRBqbjbjt+t+w#AA)]nnnn4h<%*R#*~`,`,`,Q ]Xa %%%%%%$)*%DcH( QDcDc%onn`,`,. #HoooDc n`,n8`,N@NnnnnDcooRvt,/n`,NlX HL7 V2.5 Style Guide  Co-Chair:Helen Stevens McKesson HBOCCo-Chair:Klaus D. Veil HL7S&SEditor:Frank Oemig KIS Laufenberg GmbH & Co. KGStyle Guide Contents  VERZEICHNIS \t " berschrift 2;1;berschrift 3;2" 1.1 Style Guide Contents  SEITENREF _Toc1051686 \h 1-1 1.2 Purpose  SEITENREF _Toc1051687 \h 1-4 1.3 General Rules  SEITENREF _Toc1051688 \h 1-4 1.3.1 Exceptions  SEITENREF _Toc1051689 \h 1-4 1.3.2 General Specifications and Settings  SEITENREF _Toc1051690 \h 1-4 1.3.3 Heading Capitalization  SEITENREF _Toc1051691 \h 1-5 1.3.4 Enabling Macros  SEITENREF _Toc1051692 \h 1-5 1.4 Document Structure  SEITENREF _Toc1051693 \h 1-6 1.4.1 Introductory Page  SEITENREF _Toc1051694 \h 1-6 1.4.2 Table of Contents  SEITENREF _Toc1051695 \h 1-6 1.4.3 Statement of Purpose  SEITENREF _Toc1051696 \h 1-7 1.4.4 Notes to Balloters  SEITENREF _Toc1051697 \h 1-7 1.4.5 Preparing documents for publishing  SEITENREF _Toc1051698 \h 1-7 1.4.6 Event/Message and Segment Definition  SEITENREF _Toc1051699 \h 1-8 1.4.7 Field Definitions  SEITENREF _Toc1051700 \h 1-8 1.5 Document properties  SEITENREF _Toc1051701 \h 1-8 1.6 Formatting  SEITENREF _Toc1051702 \h 1-8 1.6.1 Text Indentation  SEITENREF _Toc1051703 \h 1-8 1.6.2 Message Definitions  SEITENREF _Toc1051704 \h 1-9 1.6.3 Segment Definitions  SEITENREF _Toc1051705 \h 1-9 1.6.4 Field Definitions  SEITENREF _Toc1051706 \h 1-10 1.6.5 Components  SEITENREF _Toc1051707 \h 1-10 1.6.6 Components (Data type)  SEITENREF _Toc1051708 \h 1-10 1.6.7 Component Definitions  SEITENREF _Toc1051709 \h 1-11 1.6.8 Table Definitions  SEITENREF _Toc1051710 \h 1-11 1.6.9 Table Value Definitions  SEITENREF _Toc1051711 \h 1-13 1.6.10 References to Data Elements  SEITENREF _Toc1051712 \h 1-13 1.6.11 References to HL7 Tables  SEITENREF _Toc1051713 \h 1-13 1.6.12 References to User Tables  SEITENREF _Toc1051714 \h 1-13 1.6.13 Notes  SEITENREF _Toc1051715 \h 1-13 1.6.14 Examples  SEITENREF _Toc1051716 \h 1-13 1.6.15 Page Headers  SEITENREF _Toc1051717 \h 1-14 1.6.16 Page Footers  SEITENREF _Toc1051718 \h 1-14 1.6.17 Setting Bookmarks  SEITENREF _Toc1051719 \h 1-14 1.7 Lists  SEITENREF _Toc1051720 \h 1-15 1.8 Indexing  SEITENREF _Toc1051721 \h 1-15 1.8.1 Data Types  SEITENREF _Toc1051722 \h 1-15 1.8.2 Data Elements  SEITENREF _Toc1051723 \h 1-16 1.8.3 Segments  SEITENREF _Toc1051724 \h 1-16 1.8.4 Attribute Tables  SEITENREF _Toc1051725 \h 1-16 1.8.5 Events  SEITENREF _Toc1051726 \h 1-16 1.8.6 Tables  SEITENREF _Toc1051727 \h 1-16 1.8.7 Message Types  SEITENREF _Toc1051728 \h 1-16 1.9 Conformance Statements  SEITENREF _Toc1051729 \h 1-16 1.9.1 Distinct Parts of a Conformance Statement  SEITENREF _Toc1051730 \h 1-16 1.9.2 Formatting the different parts of a conformance statement with styles  SEITENREF _Toc1051731 \h 1-17 1.10 Other EDITING TASKS and Issues  SEITENREF _Toc1051732 \h 1-19 2.1 Authorized Paragraph Styles for the HL7-2 Template  SEITENREF _Toc1051733 \h 21 2.1.1 Style Name Notes  SEITENREF _Toc1051734 \h 25 2.1.2 Font  SEITENREF _Toc1051735 \h 25 2.1.3 Kern  SEITENREF _Toc1051736 \h 25 2.1.4 Line Spacing  SEITENREF _Toc1051737 \h 25 2.1.5 Space Before  SEITENREF _Toc1051738 \h 25 2.1.6 Space After  SEITENREF _Toc1051739 \h 25 2.1.7 Justification  SEITENREF _Toc1051740 \h 25 2.1.8 Other  SEITENREF _Toc1051741 \h 25 2.1.9 Indent  SEITENREF _Toc1051742 \h 25 2.1.10 Tabs  SEITENREF _Toc1051743 \h 25 2.1.11 Base Style  SEITENREF _Toc1051744 \h 25 2.1.12 Style for Following Paragraph  SEITENREF _Toc1051745 \h 25 2.2 Authorized Character Styles for the HL7-2 Template  SEITENREF _Toc1051746 \h 25 2.3 Withdrawn Styles for the HL7-2 Template  SEITENREF _Toc1051747 \h 26 2.4 List of new styles for the Conformance Statement  SEITENREF _Toc1051748 \h 26 2.5 List of column widths for all tables  SEITENREF _Toc1051749 \h 27 2.6 REMARKS  SEITENREF _Toc1051750 \h 27 2.7 A NOTE ON HTML STYLE SHEETS  SEITENREF _Toc1051751 \h 27 2.8 Formatting Macros (Style Fixer)  SEITENREF _Toc1051752 \h 28 2.8.1 Enabling Macros  SEITENREF _Toc1051753 \h 28 2.8.2 General Remarks  SEITENREF _Toc1051754 \h 28 2.8.3 Adjust the properties of the styles  SEITENREF _Toc1051755 \h 28 2.8.4 Format all Tables within the document  SEITENREF _Toc1051756 \h 28 2.8.5 References  SEITENREF _Toc1051757 \h 29 2.8.6 Adjust the numbering of the headings  SEITENREF _Toc1051758 \h 29 2.8.7 Adjust the Number Gallery  SEITENREF _Toc1051759 \h 29 2.8.8 Delete unused styles  SEITENREF _Toc1051760 \h 29 2.8.9 Convert message tables into 5 column format  SEITENREF _Toc1051761 \h 29 2.8.10 Add 3rd column to tables  SEITENREF _Toc1051762 \h 30 2.8.11 Reformat Message table  SEITENREF _Toc1051763 \h 30  MAKROSCHALTFLCHE gotoTable go to Table  What table is this  SEITENREF _Toc1051764 \h 30 2.8.13 Goto a specific table  SEITENREF _Toc1051765 \h 30 2.8.14 Get All Formats  SEITENREF _Toc1051766 \h 30 2.8.15 Requirements to run the macros  SEITENREF _Toc1051767 \h 30 2.8.16 Manually Correcting Styles  SEITENREF _Toc1051768 \h 30 2.8.17 Questions/Errors  SEITENREF _Toc1051769 \h 31 2.8.18 History (last changes at the end)  SEITENREF _Toc1051770 \h 31 2.9 Procedures  SEITENREF _Toc1051771 \h 31 2.9.1 Procedure for Troubleshooting Normal List Alpha  SEITENREF _Toc1051772 \h 31 2.9.2 Troubleshooting styles that change erratically  SEITENREF _Toc1051773 \h 32 2.9.3 Procedure for inserting a picture  SEITENREF _Toc1051774 \h 32 2.9.4 Troubleshooting the macro Format All Tables  SEITENREF _Toc1051775 \h 33  Purpose This document describes how HL7 Version 2.5 Chapters should be formatted in order to get a uniform layout, which in turn allows automatic generation of the HL7 V2.5 Database. For the automatic scanning and data extraction processing it is important to maintain consistency across all HL7 chapters. To demonstrate the styles this document uses the same formatting rules. All formatting is set by MS Word styles. (The use of a MS Word .DOT template file was found to be too unreliable). A set of macros is available (see the end of this document) to apply the styles to the document. General Rules To reduce the amount of formatting effort and to allow easy processing of HL7 Chapters no direct formatting should be applied. All necessary formatting shall be done by the help of MS Word styles. Exceptions Only a few exceptions are accepted. One is the numbering of the chapter. Others are identified later. General Specifications and Settings This HL7 Style Guide is for HL7 V2.5 documents. This Style Guide assumes the use of MS Word 97 SR-2 or a later version of MS word (Office 2000, etc.). Some settings are standard: The language is American English Hyphenation is enabled. Paper orientation is portrait Fast saves are disabled (keeps the documents to a minimum size) Templates and Add-Ins ( automatic updates is disabled. Page Setup Top margin: 0.4" (1,016 cm) Bottom margin: 0.5" (1.27 cm) Left margin: 0.75" (1.905 cm) Right margin: 0.75" (1.905 cm) Gutter (for binding): 0.5" (1.27 cm) Header: 0.6 (1.524 cm) Footer: 0.6 (1.524 cm) Filename Conventions The naming convention for the files is: Ch<99>.docfor the chapters including a two digit chapter numberAppendix.docfor the appendices including a one character appendix number This convention is necessary to achieve hyperlinking across the different chapters. Heading Capitalization Capitalize the first and last words and all others except articles, prepositions, the to in infinitives and coordinate conjunctions (such as and, but, or and yet2). The same should be applied to data elements and segment names. Enabling Macros Regarding disabled macros. Word 97 (I don't know about later versions) will (is suppose to ask) if you want to enable/disable macros when you open a document that contains macros. The prompt can be turned on/off by checking/unchecking Macro Virus Protection in the General tab of Tools:Options. But, it you are not getting the prompt, the macros are suppose to be enabled. You can get to the macros directly (not using the buttons) by going to Tools:Macro:Macros or pressing Alt+F8. The window will list the available macros. If the window is empty, then the macros have been disabled via Word's virus protection: Enable Macro Virus Protection (check it) in Tools:Options:General, then close and re-openthe document and click Enable on the dialog. If the dialog still doesn't show up then get a "fresh" copy of the style guide either re-extract it from the zip or download the zip again. (On the copy that I use I don't get the macro disable dialog, but I do get the dialog when I open a new copy out of the zip file.) Document Structure Introductory Page Every chapter begins with an introductory page which names the number of the chapter, the name of the chapter and the responsible chairs and editors. Table of Contents A Table of Contents appears after the introductory information. The TOC lists the chapter contents at the Heading 2 and Heading 3 levels. The TOC is constructed as follows: Select and delete the current TOC. From the Insert menu, select Index and Tables Select the Table of Contents menu. Select From Template as the format Show Page Number should be checked Right Align Page Number should be checked Show levels should be set to (WHAT) Tab Leader should be set to dots Select the Options menu Etc  Heading 2 3.2 CHAPTER xx CONTENTS { VERZEICHNIS \T "Heading 2,1,Heading 3,2,Heading 4,3" } Another important issue is to move the level down, i.e. make Heading 2 TOC 1. Statement of Purpose Except for chapter 2, the first paragraph specifies the purpose of the chapter. The formatting is as follows:  Heading 1 (consists of a soft end of line [SHIIFT+RETURN] and the heading, but is auto-numbered and sets the number "base" for the whole chapter) 3. Patient Administration  Chapter Chair:Freida B. Hall Ernest & YoungChapter Chair:Michael Hawver Eclipsys CorporationEditor:Klaus D. Veil HL7S&S 3.2 PURPOSE Heading 2 The black horizontal line is built up by a graphical box across the page with 5 mm in height. The list of chairs and the editors is a table with no borderlines. This allows for easy alignment. To set the "base" numbering for a chapter, set the number a *one* place in each chapter, namely in the actual chapter number ("3.") with the style of "Heading 1". Go to Format->Bullets and Numbering->Customize->Start at.  Heading 3 Notes to Balloters Preparing a document for balloting often requires some additional information which should be taken care of when reading the document. This initial section appears directly below the list of co-chairs and editors, but before the table of contents. This ensures that everybody is aware of this additional information.  Notes to Balloters This is the Member Ballot for V2.x. Please ballot on chapter content only. The formatting of the chapters is mainly driven by the requirement to automatically extract data for automatic consistency checking and to build the HL7 V2.4 Database. The format has been reviewed by the HL7 Architectural Review Board. As HL7 also intends to publish the Standard in PDF and HTML/XML format, variations in presentation may not be avoidable. For this reason, not all style enhancements have change marks. HL7 HQ, the TC Chairs and the International Affiliates thank you for your consideration! This section is makes use of the available styles. Afterwards the whole section (without a section heading) is shaded in grey 15% and border lines are 1 points. Preparing documents for publishing Run Macros Clear number gallery (seep rocedure in section 1.7.1) Correct typos Make technical corrections approved by ARB that do not need to be balloted Make any sections moves that do not involve content change Make any other styleguide changes that do not involve content change Set place holders for new sections Check and correct bookmarks Check that Header is correct Check that the Footer indicates the proper ballot name or final name and the date Turn Tracking (Checkmarking) on Make content changes as needed Event/Message and Segment Definition The structure of the HL7 chapters consists of two parts. The first lists events, triggers and messages with the relevant message structures; the second part defines the segments, elements, components and subcomponents in detail. Field Definitions The field definitions for a segment have to be appended to the segment definition. It starts with the level 4 heading naming the segment after which the fields/elements are defined. No text is necessary. Heading 4 PID-1 Set ID  PID (SI) 00104 XE "Set ID  PID" All field definitions start with a level 4 heading consisting of four parts: The data element identifier the name of the data element the type of the data element (in brackets) the data element ID number The four heading parts are separated by three spaces each. The field definition header also contains an invisible entry for index generation. Look at the Set ID PID heading above with Tools -> Options -> View -> All checked on. Document properties Title: The contents of this document, i.e. the name of the chapter Topic: HL7 and the corresponding version number Author: The name of the editors. Formatting Text Indentation Text following headings level 1 and 2 are flush left with no indentation; the MS Word style is Normal. Text following level 3 headings and lower is formatted using "Normal Indented", indented 1/4" (0.63cm). Message Definitions Message definitions are in form of a table to simplify the document data extraction This table consists of three columns and as many rows as necessary. The first row (Msg Table Header) describes: in the first column the message type, the event/trigger code and the message structure ID separated by "^", in the second column a short description in the third column the group name to identify logical groups of segments in the fourth column a status concerning backward compatibility in the fifth column the corresponding HL7 chapter. All subsequent rows are used for the message description (Msg Table Body). The segments used and structure symbols are listed in the left column. The middle column holds the segment name. If this message applies to more than one event, all event codes are listed within the second field of the first column in the first row. Ranges are separated by dashes (-) and single values by commas. The message definition tables are indented by 1/4" (0.63cm). Msg Table Header Hyperlink to EVN Msg Table Body  ADT^A01^ADT_A01ADT MessageGroup NameStatusChapterMSHMessage Header2 HYPERLINK \l "EVN" EVNEvent Type3PIDPatient Identification3[PD1]Additional Demographics3[ { NK1 } ]Next of Kin /Associated Parties3PV1Patient Visit3[ PV2 ]Patient Visit - Additional Info.3[ { DB1 } ]Disability Information3[ { OBX } ]Observation/Result7[ { AL1 } ]Allergy Information3[ { DG1 } ]Diagnosis Information6[ DRG ]Diagnosis Related Group6[PROCEDURE { PR1 Procedures6 [{ROL}]Role12 }][ { GT1 } ]Guarantor6[ INSURANCE { IN1Insurance6 [ IN2 ]Insurance Additional Info.6 [ {IN3} ]Insurance Additional Info. - Cert.6 } ]Columns 1 and 2 are left justified and columns 3 to 5 are centered. It is required that all segments in the message structure that are defined in the same chapter have a hyperlink to the segment attribute table. Whenever brackets are used for one segment only they should appear within the same cell. Otherwise separate rows should be used. Indentation can use tabs or spaces. The latter are preferred. If possible the closing brackets should appear below the corresponding opening bracket. Segment Definitions Attribute headers start on a new page. The attribute tables, i.e. the list of data elements used, are indented 1/4" (0.63cm) and should be formatted as follows: Attribute Table Caption Attribute Table Header Attribute Table Body Bookmark (EVN) Index information Hyperlink to ID  HL7 Attribute Table EVN Events {XE HL7 Attribute Table: EVN }{XE EVN attributes} XE "HL7 Attribute Table: EVN"  XE " EVN attributes "  SEQLENDTOPTRP/#TBL#ITEM#ELEMENT NAME13HYPERLINK \l "ID"IDB000300099Event Type Code226TSR00100Recorded Date/Time 326TSO00101Date/Time Planned Event43ISO006200102Event Reason Code560XCNOY018800103Operator ID626TSO01278Event Occurred The attribute table caption line information is used to generate the index of HL7 attribute tables. Therefore the complete caption is repeated in the index field. To facilitate the generation of the database the index field must be positioned at the end of the line! The attribute table caption line must be bookmarked with the 3-letter segment ID (i.e. "EVN") for referencing by the message structure tables. The header is shaded 10%. The attribute table grid lines are points, and the border is a dual point line. Additional index information is added at the end of the paragraph. This kind of information is hidden and therefore only visible when switching on all in Extras->Options->non-printable characters. (The information above is formatted as normal text so it appears in the printed version of this document.) Field Definitions Style Heading 4 1.5.10.0 starts with zero to ensure that field definitions after a HL7 Attribute Table are automatically renumbered. Where a zero-numbered heading is not desired, hide it with Format -> Font -> Hidden. The Field Definition heading now consists of 5 components: Section heading number: 3.3.2.3 (automatically generated by Word) Element name: PID-3 Element description: Patient Identifier List (Use Title Case) Element data type: (CX) Unique data element identifier: 00106 The 5 heading components are separated by 3 spaces each. The complete heading looks as follows: 3.3.2.3 PID-3 Patient Identifier List XE "Patient identifier list" (CX) 00106 Components Whenever a data element consists of components, they are defined first within the description. This definition is done in a paragraph like form. This definition also applies for subcomponents. Components: ^ ^ ^ ^ ^ Components The component definition, i.e. the list of components, is not repeated within each field definition since this functionality can be reached by hyperlinking! This change reduces drastically the amount of pages necessary for printing. Components (Data type) The components which make up a data type are specified in form of a table like segments or real tables. Component Table Caption Component Table Header Component Table Body Bookmark (CE) Index information Hyperlink to ST  HL7 Component Table - CE coded element{XE HL7 Component Table - CE } XE "HL7 Component Table - CE"  SEQLENDTOPTTBL#COMPONENT NAMECOMMENTSSEC.REF.1STRIdentifier2STOText3ISR0396Name Of Coding System4STOAlternate Identifier5STOAlternate Text6ISO0396Name Of Alternate Coding SystemLength: 250 Example: |F-11380^CREATININE^I9^2148-5^CREATININE^LN| The header is shaded 10%. Columns 6 and 7 are left justified. The attribute table grid lines are points, and the border is a dual point line. Within the comments column there is no hint whether this component is itself a complex data type. The user can find out by checking the underlying data type. Within the narrative a hint (note) can be found to give an indication the data type which embeds the current one. But this should only apply to sparsely use data types. See Bookmark procedure for setting a Bookmark in the caption. Component Definitions Style Heading 4 1.5.10.0 starts with zero to ensure that component definitions after a HL7 Component Table are automatically renumbered. Where a zero-numbered heading is not desired, hide it with Format -> Font -> Hidden. The Component Definition heading now consists of 4 components: Section heading number: 3.3.2.3 (automatically generated by Word) Component name: CE.1 Component description: Identifier (Use Title Case) Component data type: (ST) The 4 heading components are separated by 3 spaces each. The complete heading looks as follows: 3.3.2.3 CE.1 Identifier XE "Identifier" (ST) Table Definitions Whenever a table is referenced within a field description the first time (according to the sequence of chapters) the corresponding values have to be defined in form of a table. If no values can be identified this table should contain one entry saying no suggested values. General rules Tables with double borders are normative, tables with single borders are user-defined. Each table consists of a caption, a header and a body. The header part is shaded. Table structures are to be inserted in the standard, even if values have not been determined. HL7 Tables HL7 Table Caption HL7 Table Header HL7 Table Body Bookmark (HL70103) Index information  HL7 Table 0103 Processing ID{XE HL7 Table: 0103 - Processing ID }XE "HL7 Table: 0103 - Processing ID" ValueDescription01Patient request02Physician order03Census managementNote the index field in the HL7 table caption above. The HL7 table caption line must be bookmarked with the 7-character table ID (ie. "HL70103", see 2.8.3.3) for referencing by all references (ie.  HYPERLINK \l "HL70103" HL7 Table 0103 Processing ID) to that table within the same chapter. The header is shaded 10%. HL7 table grid lines are points, and the border is a dual point line. As the width of HL7 tables changes, they are centered. Note: HL7 Table 0136 - Yes/no Indicator should not be repeated with different values, rather the interpretations should be given in a normal list style. (This avoids the duplication of HL7 table 0136 with differing values.) Example: Definition: This field indicates whether or not the patients identity is known. Refer to HL7 Table 0136 - Yes/no indicator for suggested values. Y the patients identity is unknown N the patients identity is known User-defined Tables User Table Caption User Table Header User Table Body Bookmark (HL70062) Index information   User-defined Table 0062 - Event reason{XE User-defined Table: 0062-Event reason }XE "User-defined Table: 0062-Event reason" ValueDescription01Patient request02Physician order03Census managementNote the index field in the User Table caption above. The user-defined table caption line must be bookmarked with the 7-character table ID (ie. "HL70062", see 2.8.3.3) for referencing by all references (ie. HYPERLINK \l "HL70062"User-defined Table 0062 Event Reason) to that table within the same chapter. The header is shaded 10%. User Table grid lines are points, and the border is a 1 point line. As the width of User-defined tables changes, they are centered. It is a requirement that all user-defined tables are included in a chapter, even if values have not been determined. The tables should be formatted the same as any other user-defined table, but there should be only one "User Table Body" row, which should read: "No suggested values defined." Other Tables All other tables use the styles Other Table Caption Other Table Header Other Table Body Table Value Definitions We propose the following notation: The basic structure of a table is value in the left-most column and the description in the 2nd-leftmost column. Only one value pair per row is allowed. If comments, etc. are required, these can be entered in additional columns on the right. A range of values is indicated by three dots separated by spaces from the first and last value: A dash ("-") seems to be a bad solution because it may indicate a negative value. Different values with the same description can be separated by commas, eg. NO, NIL, NONE. References to Data Elements References to data elements are used within standard text shall be formatted like in PV1-6 - Prior Patient Location.  Reference Attribute Here the character style Reference Attribute is used. This assignment of styles will be used later to identify incorrect references of data elements in accordance with the definition. References to HL7 Tables References to HL7 Tables should be done by hyperlinking. If this cannot be achieved the references within text like  HYPERLINK \l "HL70103" HL7 Table 0103 - Processing ID shall be formatted using the MS Word Style Reference HL7 Table. References to User Tables The same applies to the references to User Tables. If no hyperlinking is applied the text like HYPERLINK \l "HL70062"User-defined Table 0062 Event Reason shall be formatted using the MS Word Style Reference User Table. Notes Note Note: The official title of UB is National Uniform Billing Data Element Specifications. Most of the codes added came from the UB-92 specification, but some came from the UB-82. The note box is aligned with the text indentation. The bolded initial text "Note:" is followed by two spaces after the colon. The Note style has 4 points before and 3 after each paragraph. Examples If an example is necessary to illustrate the meaning of a message the style Example should be used. Example MSH|.|..|... EVN|..|..|... PID|||..... ..... Examples and use cases should be placed as close to the relevant chapter section as possible. Page Headers The header line consists of a point border line below. It merely names the document. (This header is hidden!) First Page Headers The first page does not have a header. Odd Page Headers Chapter 3: Patient Administration The number and name of the chapter is shown in the page header, right justified Even Page Headers Chapter 3: Patient Administration The number and name of the chapter is shown in the page header, left justified. Page Footers Footer lines consist of two lines. The first lists a copyright statement and the page number with total number separated by a dash. The second line contains the status of this document as well as the issue date. Odd pages and first page The footer consists of different parts: the copyright notice including the year and "All rights reserved." a reference to Health Level Seven, Inc. the version number  Health Level Seven, Version 2.5 2001. All rights reserved Page 3-5 Ballot May 2001 the release status (i.e. one of: Draft, Ballot, Final Standard) the chapter and page number formatted as -. the month and year of release, Yk2 compliant and internationally readable. Even pages Page 3-6 Health Level Seven, Version 2.5 2001. All rights reserved May 2001 Ballot Setting Bookmarks Word gives only limited help on how to set bookmarks. The following list might assist you: Highlight the text that you want to bookmark Go to the Insert->Bookmark Enter the name of your bookmark Select ADD The text will appear in brackets [ ] when you have the bookmark view or all hidden characters turned on Lists For listing items we provide four different styles: Normal List Normal List Alpha Normal List Numbered Normal List Roman Normal List Bullets Here is some technical information on lists: ListGalleryNormal-AlphaNumber 5NumberedNumber 2RomanNumber 7BulletBullet 7 Lists should be standardized in its usage. Alpha, numbered and roman lists represents a hierarchy, also in their indentation. Therefore, whenever possible try to use alpha lists first. Use Normal List Alpha under the following circumstances: The items occur in a definite sequential order A large number of items are being enumerated. Use Normal List Numbered under the following circumstances: Steps in a procedure or process are being enumerated Lists embedded within alpha lists Use Normal List Bullets under the following circumstances: Fewer than 6 (or perhaps 7 or fewer) items are listed and they do not meet above criteria Avoid using the Normal List. Consider using a table instead. Avoid deeply indented lists. Please the procedures section for trouble shooting. Indexing Another important point for documentation is the generation of an index. For this a lot of additional information is necessary. To get a consistent result some rules have to be established how to formulate such entries. In order not to interrupt the parsing process this information must be placed at specific points within the text. The use of a colon (:) build up groups like a list of all tables. Data Types Data Types: + + - + + - + Data Elements The name of the data element is repeated within the title. Segments Within the title three different entries are necessary: Segments: + + ( + +) Attribute Tables The index information must be added at the end of the paragraph (i.e. line). HL7 Attribute Table: + Events Events: + Tables Tables: User or HL7 defined: + + - +
+ ( +
+) Message Types Message Types: + Conformance Statements Conformance Statements are a new construct in version 2.4. Three different conformance statements do exist: Query with tabular response Query with segment pattern response Query with display response Every conformance statement consists of several distinct parts identified within the next section. Distinct Parts of a Conformance Statement The numbers within the right three columns specify the sequence order of the part within the conformance statement. No.PartTabular responseSegment pattern responseDisplay response1introduction (= main table conformance statement)1112query grammar2223response grammar3334QPD input parameter specification4445QPD input parameter field description and commentary5556output specification and commentary667virtual table78RCP Response Control Parameter Field Description and Commentary8 Formatting the different parts of a conformance statement with styles Some fields are divided into two parts, i.e. the row now contains more cells A style is assigned to each field Some rows are inserted due to layout Some fields are spread over separate rows due to storage reasons for the database The applied styles are inserted into the text and marked in red. Some rows can be repeated as often as necessary. These rows are marked by a red arrow on the right side. The table border is a dual point line. The grid lines are points single line. Introduction Conformance Statement (Qry Table Caption) Query Statement ID:Q31 (Qry Table ID)Type:Query (or Publish) (Qry Table Type)Query Name:Dispense History (Qry Table Name)Query Trigger (= MSH-9):QBP^Q11^QBP_Q31 (Qry Table Trigger Query)Query Mode:Both (Qry Table Mode)Response Trigger (= MSH-9):RSP^K31^RSP_K31 (Qry Table Response Trigger)Query Characteristics:Returns response sorted by Medication Dispensed unless otherwise specified. (Qry Table Characteristics Query)Purpose:Find medications dispensed between specified date range for specified medical record numbers (Qry Table Purpose)Response Characteristics:Returns response sorted by Medication Dispensed unless otherwise specified. (Qry Table Characteristics Response)Based on Segment Pattern:RDS_O01 (Qry Table Segment Pattern)Response Control Characteristics:[RCP segment options go here] (Qry Table Response Control Characteristics)RCP Constraints:(Qry Table RP Constraints)Modify Indicator:(Qry Table Modify Indicator) Query Grammar The query grammar is exactly the same as any normal message definition. This is especially true for the used styles. If a message should be used, which is defined somewhere else no additional definition is required because the definition in the main table refers to it. Please see section 1.5.2. QPD Input Parameter Specification Field SeqField Name (Qry Table Input Header)Key/ SearchSortLENTYPEOptRepMatch OpTBLSegment Field NameLOINC or HL7 CodeElement Name1PatientList (Qry Table Input)SY20CXOPID-3Patient Identifier List2MedicationDispensedSY100CEO=RXD-2Dispense/Give Code3DispenseDate.LLSY26TSO> =RXD-3Date/Time Dispensed4DispenseDate.ULSY26TSO< =RXD-3Date/Time Dispensed5SortControlSRTONNNN QPD Input Parameter Field Description and Commentary Input Parameter (Qry Table Input Param Header)Comp. NameDTDescriptionPatientList (Qry Table Input Param)CXComponents: ^ ^ ^ < assigning authority (HD)> ^ ^ < assigning facility (HD)>The combination of values for PatientID, and PatientIDAssigningAuthority, are intended to identify a unique entry on the PATIENT_MASTER table. The PatientIDTypeCode is useful for further filtering or to supply uniqueness in the event that the assigning authority may have more than one coding system. (The PATIENT_MASTER table contains a constraint that prevents multiple patients from being identified by the same combination of field values.) This PATIENT_MASTER entry will be searched against on the PHARMACY_DISPENSE_TRANSACTION table to retrieve the rows fulfilling the query conditions.If this field is not valued, all values for this field are considered to be a match.IDSTIf this field, PID.3.1, is not valued, all values for this field are considered to be a match.Assigning AuthorityHDIf this field, PID.3.4, is not valued, all values for this field are considered to be a match. Response Grammar The response grammar is much like any normal message definition, except the three additional columns. Please see section 1.5.2. If a conformance statements can make use of response message definition which is defined somewhere else, no additional specification is necessary. Output specification and commentary If the message contains a DSP segment for displaying data it looks like the next table. Please consider that each line is represented by one row. The data will display as follows: (Q13) (Qry Table DisplayLine Header)DSP|| GENERAL HOSPITAL PHARMACY DEPARTMENT DATE:mm-dd-yy (Qry Table DisplayLine)DSP|| DISPENSE HISTORY REPORT PAGE nDSP||MRN Patient Name MEDICATION DISPENSED DISP-DATEDSP||XXXXX XXXXXx, XXXXX XXXXXXXXXXXXXXXX mm/dd/ccyyDSP|| << END OF REPORT >> RCP Response Control Parameter Field Description and Commentary Field SeqNameComponent NameLENDTDescription1Query Priority1IDD(eferred) or I(mmediate). Default is I2Quantity Limited Request10CQQuantityNMNumber of unitsUnitsCECH, LI, PG, RD. Default is LI.3Response Modality60CE Virtual Table A virtual is identical to the input parameter specification. In order to distinguish both, please use different styles: Column Name (Qry Table Virtual Header)Key/ SearchSortLENTYPEOptRepMatch OpTBLSegment Field NameLOINC or HL7 CodeElement NamePatientList (Qry Table Virtual)SY20CXOPID-3Patient Identifier ListMedicationDispensedSY100CEO=RXD-2Dispense/Give CodeDispenseDate.LLSY26TSO> =RXD-3Date/Time DispensedDispenseDate.ULSY26TSO< =RXD-3Date/Time DispensedSortControlSRTONNNN Other EDITING TASKS and Issues Ensure any new or changed datatypes are communicated to the C/Q TC for inclusion in Chapter 2. Check if any changes to the datatypes are required to any other chapters. Check example messages for compliance with any changes made to the chapter content. Any new triggers must be included in Table 0354 (Message Structure, the 3rd component of MSH-9) in Chapter 2. Any new style elements introduced into the standard must be checked with the Publishing Committee to ensure a uniform layout and future integration into the database. HL7 STYLE SHEET Authorized Paragraph Styles for the HL7-2 Template Style NameAttributes (Where none listed, follows base style)FontKernLine SpacingSpace BeforeSpace AfterJustificationOther IndentTabsBase StyleStyle for following ParagraphAttribute Table BodyArial 8 pt8 pt9 pt2 pt1.5 ptCenteredNormalAttribute Table CaptionTimes New Roman 10 pt9 pt3 ptCenteredKeep with nextAttribute Table BodyAttribute Table HeaderArial 8 pt bold2 pt1.5 ptCenteredKeep with nextAttribute Table CaptionComponentsCourier New 8 pt7 pt8 pt6 pt6 ptKeep lines togetherLeft 0.75 Hanging 0.75NormalComponent Table BodyArial 8 pt8 pt9 pt3 pt0 ptCenteredNormalComponent Table CaptionArial 10 pt9 pt3 ptCenteredKeep with nextComponent Table BodyComponent Table HeaderArial 8 pt bold2 ptCenteredKeep with nextComponent Table CaptionExampleLinePrinter 8 pt (no proofing)8.5 pt0 pt0 ptKeep lines togetherLeft 1.3 Hanging 0.25NormalFooterArial 8 pt0 pt0 pt6.5 right flushNormalFootnote textArial 8 pt10 ptHanging 0.250.25NormalHeaderArial Bold10 pt0 pt18 ptBorder: bottom (single solid line); Border spacing: 1 pt6.35 right flushNormalHeading 1 RightTimes New Roman 36 pt bold36 pt12 ptFlush rightNoneHeading 1HL7 Table BodyArial 8 pt1 pt0.5 ptNormalHL7 Table CaptionTimes New Roman 10 pt9 pt3 ptCenteredKeep with nextHL7 Table BodyHL7 Table HeaderArial 8 pt bold2 pt1 ptCenteredKeep with nextHL7 Table CaptionMsg Table BodyCourier New 8 ptsingle0 pt0 ptNormalMsg Table CaptionTimes New Roman 10 pt9 pt0 pt3 ptKeep with nextMsg Table BodyMsg Table HeaderCourier New 8 pt bold underline6 pt2 ptKeep with nextMsg Table CaptionNormalTimes New Roman 10 pt10 ptsingle0 pt6 ptFlush leftWidow /orphan control Outline level body textNormal Indented0 pt6 ptLeft 0.5NormalNormal List0 pt6 ptLeft 0.5NormalNormal List Alpha6 pt6 ptNumbered (alpha): a), b), c)Left 0.7 Hanging 0.2.95 leftNormalNormal List AlphaNormal List Numbered6 pt6 ptNumbered (arabian numerals) 1), 2), 3)Left 0.9 Hanging 0.2NormalNormal List NumberedNormal List Roman6 pt6 ptNumbered (roman numerals) i), ii), iii)Left 1.4 Hanging 0.3NormalNormal List RomanNormal List Bullets6 pt6 ptBulletedLeft 0.7 Hanging 0.25NormalNormal List BulletsNoteArial 9 pt8 pt4 pt3 ptBorder single solid line pt line widthLeft 0.6 hanging 0.50.5 left 1 leftNormalNote IndentedArial 9 pt4 pt3 ptBorder single solid line pt line widthLeft 0.7 hanging 0.5NoteNormal IndentedOther Table Body9 pt3 pt3 ptNormalOther Table Caption9 pt3 ptCenteredKeep with nextNormalOther Table Header9 pt bold1 ptCenteredKeep with nextNormalTOC1Arial 12 pt bold all caps18 pt0 pt0.5 left 6.5 right flushNormalTOC2Arial Bold 10 pt bold all caps6 pt6 ptLeft 0.146.5 right flushTOC1TOC3Arial Bold 10 pt bold small caps0 pt0 ptLeft 0.286.5 right flushTOC2TOC4Arial 9 pt0 pt0 ptLeft 0.426.5 right flushTOC3TOC50 pt0 ptLeft 0.566.5 right flushTOC4TOC60 pt0 ptLeft 0.696.5 right flushTOC5TOC70 pt0 ptLeft 0.836.5 right flushTOC6TOC80 pt0 ptLeft 0.976.5 right flushTOC7TOC90 pt0 ptLeft 1.116.5 right flushTOC8User Table BodyArial 8 pt1 pt0.5 ptNormalUser Table CaptionTimes New Roman 10 pt9 pt 3 ptKeep with next0.63NormalUser Table HeaderArial 8 pt bold2 pt1 ptCenteredKeep with nextNormalHeading 1Times New Roman 36 pt bold14 pt18 pt6 ptFlush rightKeep with next Level 1 outline numbered. Follow with nothing.NoneNoneNormalNormalHeading 2Arial 14 pt bold all capsSingle18 pt3 ptKeep with next Level 2 outline numbered. Follow with tab.Hanging 0.70.7 leftHeading 1NormalHeading 3Arial 12 pt bold12 pt3 ptKeep with next Level 3 outline numbered. Follow with tab.Hanging 0.70.7 leftHeading 2Normal IndentedHeading 4 *Arial 10 point6 pt3 ptNo widow /orphan Keep with next Level 4 outline numbered. Follow with tab.Hanging 0.70.7 leftHeading 3Normal IndentedHeading 5Arial 10 point italic6 pt3 ptKeep with next Level 5 outline numbered. Follow with tab.Hanging 0.70.7 leftHeading 4Normal IndentedHeading 6Arial 10 point italicHanging 0.7Heading 5Heading 7Arial 10 point italicHanging 0.7Heading 6 Style Heading 4 N.N.N.0 starts with zero to ensure that field definitions after a HL7 Attribute Table are automatically renumbered. Where a zero-numbered heading is not desired, hide it with Format -> Font -> Hidden. Style NameAttributes (Where none listed, follows base style)FontSizeAttributeBase StyleStyle for following ParagraphHyperlinkTimes New Roman10 ptReference AttributeTimes New RomanHyperlinkReference HL7 TableTimes New RomanItalicsHyperlinkReference User TableTimes New RomanitalicsHyperlink Style Name Notes Style Heading 4 N.N.N.0 starts with zero to ensure that field definitions after a HL7 Attribute Table are automatically renumbered. Where a zero-numbered heading is not desired, hide it with Format -> Font -> Hidden. Font Where set: Format/Style/Modify/Font Kern Where set: Format/Style/Modify/Font/Character Spacing Line Spacing Where set: Format/Style/Modify/Paragraph/Indents and Spacing/Spacing:Line Spacing box Space Before Where set: Format/Style/Modify/ Paragraph/Indents and Spacing/Spacing:Before box Space After Where set: Format/Style/Modify/ Paragraph/Indents and Spacing/Spacing:After box Justification Where set: Format/Style/Modify/ Paragraph/Indents and Spacing/Alignment Other This includes notes for text control, borders and shading Text control Where set: Format/Style/Modify/paragraphs/Line and Page Breaks Border control Where set: Format/Style/Modify/Border Indent Where set: Format/Style/Modify/ Paragraph/Indents and Spacing/Indentation: Left Where set: Format/Style/Modify/ Paragraph/Indents and Spacing/Indentation: Special and By Tabs Where set: Format/Style/Modify/Tabs Base Style Where set: Format/Style/Modify/Based On Style for Following Paragraph Where set: Format/Style/Modify/Style for Following Paragraph Authorized Character Styles for the HL7-2 Template Style NameAttributes (Where none listed, follows Normal)FontOtherBase StyleDefault Paragraph FontTimes New Roman 10 ptReference Data ElementTimes New Roman 10 ptItalicsDefault Paragraph FontReference HL7 TableTimes New Roman 10 ptItalicsDefault Paragraph FontReference User TableTimes New Roman 10 ptitalicsDefault Paragraph FontWithdrawn Styles for the HL7-2 Template Indent Normal ( Normal Indented MsgHeader ( Msg Table Header MsgStructure ( Msg Table Body Attribute Table Heading ( Attribute Table Header Msg Table Heading ( Msg Table Header List of new styles for the Conformance Statement Indent: 0 No tabs used. Other: nothing special Style NameFontLine SpacingSpace BeforeSpace AfterJustificationBase StyleQry Table CaptionTimes New Roman 12pt bold66CenteredQry Table HeaderQry Table Characteristics QueryArial 8pt16Qry Table NameQry Table Characteristics ResponseArial 8pt16Qry Table NameQry Table DisplayLineCourier New 8pt16Qry Table NameQry Table DisplayLine HeaderCourier New 8pt16Qry Table HeaderQry Table HeaderArial 8pt bold16StandardQry Table IDArial 8pt16Qry Table NameQry Table InputArial 8pt16Qry Table NameQry Table Input HeaderArial 8pt bold16Qry Table HeaderQry Table Input ParamArial 8pt16Qry Table NameQry Table Input Param HeaderArial 8pt bold16Qry Table HeaderQry Table ModeArial 8pt16Qry Table NameQry Table Modify IndicatorArial 8pt16Qry Table NameQry Table NameArial 8pt16StandardQry Table PurposeArial 8pt16Qry Table NameQry Table RCP Arial 8pt16Qry Table NameQry Table RCP HeaderArial 8pt bold16Qry Table HeaderQry Table RCP ConstraintsArial 8pt16Qry Table NameQry Table Response TriggerArial 8pt16Qry Table NameQry Table Response Control CharacteristicsArial 8pt16Qry Table NameQry Table Segment PatternArial 8pt16Qry Table NameQry Table Trigger QueryArial 8pt16Qry Table NameQry Table TypeArial 8pt16Qry Table NameQry Table VirtualArial 8pt16Qry Table NameQry Table Virtual HeaderArial 8pt bold16Qry Table Header List of column widths for all tables This table reflects the widths (in inches) of the different tables. Column Table12345678910111213Attribute Table 0.450.450.450.450.450.60.53-----Component Table 0.450.40.50.40.5210.7-----HL7 Table???----------Msg Table 1.5210.550.75--------Qry Table 23.2-----------Qry Table Input 0.450.90.550.20.40.50.20.20.50.50.60.50.7Qry Table Input Param 1.10.70.44---------Qry Table DisplayLine6------------Qry Table Virtual10.60.20.40.50.20.40.50.50.650.70.55-Qry Table RCP0.51.50.60.30.32-------User-defined Table???---------- REMARKS A NOTE ON HTML STYLE SHEETS Larry devised a style sheet that uses SOME of the above styles, with suitable modifications, for applying to HTML documents. Copies of this style sheet can be found in the HTML subdirectories where the HTML copies of the Standards Guide and Implementation Guide are saved. To imbed the style sheet into an HTML document, make sure it is copied into the same directory as that document. Then, just above the tag, type the following sequence: Styles for Heading 1-Heading 5 are in this sheet as modified -- since HTML does not support outline numbering, numbers must be manually added. The HL7 style Components is incorporated into the HTML stylesheet as definition. The HL7 style Example is incorporated into the HTML stylesheet as defined term. This has been modified to be in System font rather than LinePrinter, because the font the viewer sees it in depend on the fonts available on his machine; therefore Larry thinks it advisable to only use the most common fonts. Formatting Macros (Style Fixer) This part of this document contains the macros which help formatting the HL7 standard documents. These pages provide an easy access to the macros. In order to make use of the macros you have to enable them during loading this file. The macros operate on open files. Therefor the document(s) onto which these macros should be applied should be opened first. Macro Overview SequenceMacro NameComment1Adjust All Formats2Adjust Chapter Number3Adjust Number GalleryI found this needs to be done manually. See section 2.84Delete Unused Styles5Convert Message Tables into New Format6Add 3rd Column to Tables7Format All TablesYou will get an error if you do this one before Convert Message Tables into New FormatFormat Reference EntriesUse hyperlinking instead.Get All FormatsIt is not necessary to execute this macro Enabling Macros If you are not prompted to enable macros when opening this document, select Tools, Macro, Security and verify that your security level is not set to High (which automatically disables all macros). General Remarks It is not such easy to do some auto-format an already formatted documents. We can try to format tables if an indication is available. We also can try to adjust the properties of styles according to the rules established by the publishing committee. But I can not guarantee that this will work in any case since Word has a built-in automatism which tries to correct the actions we execute. Additionally some documents make intensive use of direct formatting, especially when creating numeric, alpha-numeric or bulleted lists without using the style Normal List xxxx. Another fact to mention is that these macros apply a huge amount of corrections. As a result an error may occur saying that Word is not able to keep track of all changes. A possible solution is to save the file to disc. Formatting tables assumes that the tables are real tables with the same number of columns each row (except conformance statements). Furthermore all cells within the same column should have the same width. If this requirement is NOT acceptable please let me know. I can change that but it would increase computation time! So, PLEASE execute these macros on safe copy of the document! Adjust the properties of the styles This macro was generated by the help of Get All Formats. In contrast to it this one adjusts the properties according to the style guide.  MAKROSCHALTFLCHE AdjustAllFormats Adjust All Formats Double click here. Whenever such a button-like frame appears, it hides the macros which can be activated by double-clicking onto the text inside! Currently the styles for lists do not adjust the numbering or bulleting due to problems with the rest of the styles! A lot of paragraphs are formatted directly so that such an approach surprisingly displays funny results. Format all Tables within the document This macro formats all relevant tables. First of all the user is asked for the document to which the formatting should be applied. For this purpose a combo box will be displayed. After selecting the file out of the list a new dialog box will appear asking the user for the range of tables. Per default all tables are formatted, but the user can also reduce the set of tables. On ok the formatting rules will be applied to all the requested tables within this document. Up to now I havent found a method to align the whole cell like it can be done by Table->Mark whole table and center, so this is left for manual correction. The correct rules are determined out of the formatting of the upper left cell of each table:  MAKROSCHALTFLCHE FormatTables Format all Tables This task will take up to 5 to 10 minutes to apply the rules to all tables! References The next macro provides a dialog which allows for modifying the reference entries. It starts with a combo box for selecting the document. Next a dialog will be shown which guides through the formatting process:  MAKROSCHALTFLCHE FormatText Format Reference Entries This Macro applies the styles! We have decided to use hyperlinking for references. Therefore this macro will NOT work. If the necessary character styles are not available they will be created automatically. The button next searches for the next text which corresponds to the format specified in the top frame (italics or bolded) and is not formatted as a reference (at least the left part of it). According to the text found the action to be performed will be selected automatically. The user has the opportunity to modify this selection by hand. On the one hand he can modify the action to be performed. On the other hand he can expand or shrink the selected text be the help of the four buttons at the top right corner of this dialog. The button apply performs the specified modification of the styles on the selected text. At this place it is important to mention that the styles are assigned to the exact selected text. Otherwise the usage of styles becomes worthless. Adjust the numbering of the headings The numbering of the different chapters requires a manual adaptation of the corresponding properties. This macro asks for the chapter number.  MAKROSCHALTFLCHE AdjustChapterNumber Adjust Chapter Number This macro currently does not adjust the tab stops. Therefor this macro should be applied before the following one. Adjust the Number Gallery To use lists (alpha, numeric or roman) requires to adjust the properties of the built-in galleries. It is possible to create own ones, but it seems to be too difficult to maintain them. This macro helps to adjust the number galleries 2, 5 and 7.  MAKROSCHALTFLCHE AdjustGallery Adjust Number Gallery Delete unused styles This macro deletes all styles which are not used an more.  MAKROSCHALTFLCHE DeleteStyles Delete Unused Styles This task will take up to 3 hours to check each paragraph separately! It would be quicker just to delete the styles, but we want to keep the layout information we have entered so far. This is the only solution if the old and the new style are used in parallel. Convert message tables into 5 column format This macro should be used to convert the message tables into the five column format. It also reformats the table and assigns the correct styles as well as inserts the necessary headings. The editor has to fill in the missing information by hand. In case of the six column representation the column with the comments will be deleted. The column for the support indicator will be reused for the status information.  MAKROSCHALTFLCHE InsertMsgTableColumns convert message tables into new format Add 3rd column to tables This macro should be used to add a third column to the tables containing table values. It also reformats the table and assigns the correct styles as well as inserts the necessary headings. The editor can now fill in the missing information (comments) by hand.  MAKROSCHALTFLCHE InsertTableColumn Add 3rd column  Reformat Message table This and the next macro has been provided by Scott Robertson: Well, this is my standard, segment groups are indented two spaces for each grouping. [{/{[ and }]/]} order is standardized. Segment identifiers within group line up. Unbalanced [/]/{/} are reported and stop at the point that the problem is noted (the actual problem will probably be somewhere above that point.) Note: the result looks really ugly if you have tracking on. Accepting (or hiding) the changes shows the nice, consistent Warning: this macro will remove any hyperlinking in the message structure Place the insertion point in the message structure table to adjust (any column/row/cell) Back in this document, double click on the shaded portion above You will be asked to select the document The message syntax will be adjusted to a standard form (left hand column of the message syntax table). While processing, the current message line will be displayed in the Status Bar at the bottom of the Work window.  MAKROSCHALTFLCHE ReformatSyntax Reformat Syntax   MAKROSCHALTFLCHE gotoTable go to Table What table is this Place the insertion point in the table in question. Back in this document, double click on the shaded portion above You will be asked to select the document The table number for the insertion point in that document will be determined and displayed in a dialog box (during the search, progress will be noted in the Status Bar at the bottom of the Word window  MAKROSCHALTFLCHE WhatTable What Table is this?  Goto a specific table It is almost not possible to select the current table. This macro should be used to jump to a specific table according to its number. By Try and Error one can approach the table he/she desires. The dialog provides to complete range. Please use the left field to enter the desired number.  MAKROSCHALTFLCHE gotoTable go to Table  Get All Formats This macro should be used to generate a VBA procedure which can be used to adjust the styles of other documents. This macro appends VBA-code which can be copied to a new module to the end of the document. This code allows for copying the properties listed in the style guide. This code does not adjust the properties, it just copies the values to the document in a readable form. Therefor it is not necessary to execute it!  MAKROSCHALTFLCHE GetAllFormats Get All Formats Requirements to run the macros Running of the macros above requires VBA. Manually Correcting Styles The styles can be corrected by hand, too. Using Format => Styles displays a list of all used styles. Here you can modify the name of the styles by just typing in the correct name. Wherever the styles is used the new name is assigned. Questions/Errors Please let me know if there are questions or errors in applying these macros: HYPERLINK "mailto:Frank.Oemig@laufenberg.com"Frank.Oemig@laufenberg.com It would be helpful to submit the name of the macro and the name of the function and the line number is possible. History (last changes at the end) formatting column width for attribute and message tables setting styles for conformance statements additional macro to insert three columns into message table (for group names), i.e. converting into 6 column format additional macro to insert fourth column to HL/ and user-defined tables for comment additional macro to jump to a specific table (go to table) formatting of TOC corrected description of TOC added formatting for component table styles added #20 note to balloters preparing documents for publishing no component definition within the field definitions filename conventions additional guidelines and formats on lists new macro for adjusting the necessary gallery entries heading and title capitalization #21 adjusting definition of message tables to fit the five column representation adjusting the macro to convert message tables into the five column representation adjusting the column width for message tables in the format table macro #22 Joanns comments added Scotts macros added Increased font size for components and HL7 and User-defined table captions #23 introduction on how to enable macros new page margins before/after paragraph spaces adjusted to normal, note and body of tables setting character styles Procedures This section is intended to give some hints how to fight Word best. Procedure for Troubleshooting Normal List Alpha Clearing Number Gallery Step IDStep DescriptionResultComment1After running the macros go to the first instance of Normal List Alpha in your document.2Highlight the first item and go to the Format tab.(You may optionally do a right click)3Select "Bullets and Numbering"4Select the Numbering tab8 boxes will appear5Select each box, in turn, except for "None" and do "Reset".6Select the "lower case alpha" box and go to customize7On the "Customized Numbered List", set Number Position Aligned At to .78Set Text Position Indent At to .99Return to previous window and select "Okay"This should clear the "gallery"10Go to the next instance of your Normal Alpha List11If the style looks correct except for the number, select Format -> Bullets and Numbering->12Select the correct box (lower case alpha) and select Restart Numbering13If the style was not correct in step 11, re-apply the style before going to step 13. Troubleshooting styles that change erratically Problem: A change is manually applied to the Style. When the document is saved and then re-opened, the style change is lost. Clearing Previous Templates Step IDStep DescriptionResultComment1Select Tools/Templates and Add-InsTemplates and Add-Ins window will display2Inspect Document Template box. Delete HL73.dot if it is there.HL73.dot was the template for the previous version.3Inspect the Automatically Update Document Styles indicator. It should not be activated.4Select okayIf you later return to this window you may find that Word has assigned the normal.dot template. However, this does not seem to interfere. The important thing is that the Auto Update flag is de-activated.5Return to document and manually correct any styles that are not right. In particular you may need to reset galleries. See table above.Procedure for inserting a picture This procedure should work for pictures, diagrams or flowcharts. Preparing and Inserting a Picture Step IDStep DescriptionResultComment1Create and save the picture in the appropriate application, e.g., Visio2Open the chapter and go to the place you want to insert the picture.HL73.dot was the template for the previous version.3Choose Insert/Object/Create From File Your visio file should be one of the choices4OpenYour picture should display.It should be visible in the normal view mode. Troubleshooting the macro Format All Tables Format All Tables: Common Errors Error IDDescriptionAction RequiredComment4605This command is not availableGo to Debug and read message"ForegroundPatternColorIndex = wdAuto" This statement seemed to be in the General Section; Format Tables in a subsection on formatting borders. I just went on to the next macro assuming I would take care of the problem manually later.Query tables in my chapter that do not conform to the standard formatting.I just had to re-start the macro with a table number past the messed up table.the table did not have columns with consistent widths. This took a little more investigation. I finally found that some of the added rows had an extra column at the end that was set to a 0" width. I had to insert some more rows, move the cells contents I wanted to keep, and then delete the offending rows."Message Table does not contain 5 columns! Abort?" Run "convert message tables into new format" first?5941The requested member of the collection does not exist.Go to Debug Chapter 1: HL7 V2.5 Style Guide Chapter 1: HL7 V2.5 Style Guide Page  SEITE 1-8 Health Level Seven, Version 2.5 2001. All rights reserved November 2001  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 Health Level Seven, Version 2.5 2001. All rights reserved Page  SEITE 1-7  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 November 2001 Health Level Seven, Version 2.5 2001. All rights reserved Page  SEITE 1-1  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 November 2001 Page  SEITE 24 Health Level Seven, Version 2.5 2001. All rights reserved October 2001  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 Health Level Seven, Version 2.5 2001. All rights reserved Page  SEITE 23  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 October 2001 Page  SEITE 32 Health Level Seven, Version 2.5 2001. All rights reserved November 2001  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 Health Level Seven, Version 2.5 2001. All rights reserved Page  SEITE 33  DOKEIGENSCHAFT Status \* FORMATVERBINDEN Draft  DOKEIGENSCHAFT Version \* FORMATVERBINDEN 22 November 2001 $%?@ADEXYstuxy12367NOijknojUhjOUjUj]UjUjkUjUjyUjU jUE$@AK`aiFz8pZKJ $$l 5&d$$@AK`aiFz8pZ-g G ǻzupkfa\WKLKKJJ,KfKKK9KvKKJ#K[KKKJMJ{Jm  mn              "89STUXYst  &'(+,EF`abef   % & @ j UjUjUjUj%UjUj3UjUjAU jUD-g G 2 q 3 v  T $ X +JK@ A B E F a b | } ~   * + , 0 1 N O i j k o p   + , - 1 2 S T n o p t u j UjJ Uj UjX Uj Ujf Uj Ujt UjU jUjUC 2 q 3 v  T $ X +[#1i)Ŀ~ytoje`[KKKK*KbJJKpKJK8KhKKKK;KoJJKK?KvKKKK`KKK"KaKKK!u      1 2 L M N R S h i      " # 5 6 P Q R V W l m j}UjUjUjUjUj UjUj.Uj Uj< U jUC  #$%)*89STUYZop!"op+jUjEUjUjSUjUjaUjUjoUjU jUE+[#1i)\L7ECJK+,-/0HIcdeghtu #$%'(;<VWXZ[pqjxUjUjUj UjUjUjUj)UjU jUj7UC)\L7ECO^4{AqĿ~ytoje`[JRKKKK_KKK5KtKKKDKKKKPKKK JNJJJJ\JJKGKzKKKK7Kj!+,FGHJKqr12356lm$%?@ACDijj2UjUj@UjUjNUjUj\UjUjjUjU jUC"#=>?ABop    ./IJKMNjkH*js#Uj"Uj"Uj"Uj!Uj!Uj Uj$ UjU jUECO^4{Aqg6 JK=>XYZ\]^_./023Z[uvwyz !;<=?@PQkj'Uj;'Uj&UjI&Uj%UjW%Uj$Uje$Uj#U jUEklmopFGabcef-'1''')))))*++++++++++ jUmH jB*UjB*UmH5CJOJQJB*j5CJOJQJU< jhnH j*Uj)Uj)Uj(U jUj-(U>">$>6>@>O>Q>R>S>T>U>k>l>>>>>>>j*0J"U0J" j0J"U>* jU jB*U jUNH 5>*CJ5B*hnH B*5CJOJQJj5CJOJQJU jUmHA++++ ,-,.,7,L,M,N,O,j,k,,- . .3.p/r////u1112q2222{vqc\RI   I ;   QR  v       AB]^_`  u  ~        N,O,j,k,,- . .3.p/r////u1112q22222.3 & FI$d %d &d 'd -D$d %d &d 'd -D$$d %d &d 'd -D22.3i3333 4\4|44455666 7<7Y777ĺ{vqe`YOE;  A  ^   z    "   g   qI  I  gI  I  I  I  I  CI  I  I  .3i3333 4\4|44455666 7<7Y7777888919  & F  & F & FI77888919<9M99:2:::d;;;<J<==>>O>S>e>q>{qlgb]XSLE     K  G      &  T     {   w%   y19<9M99:2:::d;;;<J<==>>O>S>e>q>|>>>>>`$$$l&"uU"$$$ hq>|>>>>>>>>>>>>>>>>>>>>>>>?????}vrkd]VOK        '  -.  0  1  2  I  MN  P  Q  R  ]  z{  }  ~            >>>>>>>>>>>>>>>>>>>????? ?@?A?B?$$l&"uU"$$$>>>>>A7BDDDD6D7DQDvDxDDDDDDDE E E!E"E#EOEPEQEUEVEhEiEjElEmEEEEEEEFF+F,FMFNFFYGZGGIIJJK KK7K[K`K5CJOJQJ 5OJQJhnH OJQJj*B*U 5OJQJ jUjB*UmH jUmH5B* jUB* jB*U50J" j0J"U?? ?@?A?B?D?E?I?W?X?Y?[?\?d????????????????Ľ}vohd]VOH  L  M  `  lm  o  p  q                                   B?D?E?I?W?X?Y?[?\?d???????????????????\$$$l&"uU"$$?????????@@@@!@"@,@D@E@F@H@I@K@L@V@W@X@Y@]@^@yrkd]YRK                                  #$  &  '  (  <  HI  K??????@@@@!@"@,@D@E@F@H@I@K@L@V@W@X@Y@]@^@_@`@@$$$l&"uU"$$$^@_@`@a@b@k@v@w@x@z@{@@@@@@@@@@@@@@@@@@@}vrkd]VOK}  ~                                            `@a@b@k@v@w@x@z@{@@@@@@@@@@@@@@@@@@@@d\$l$$$l&"uU"$$@@@@@@@@@@@@@@@@@@@@@@@@@@AAAĽ}vohd]VOH      $  01  3  4  5  ?  GH  I  J  K  L  PQ  R  S  ]  ^  ab  d  e  f  p  |@@@@@@@@@@@@@@@@@@@@@@@@@AAAD$\$$l&"uU"$$$AAA(AKALAMAOAPAUAVAWAXAYAZA\A]A^A_A`AaAA7BBOCcCDDD6D{vql^YTROK   ew                                AAA(AKALAMAOAPAUAVAWAXAYAZA\A]A^A_A`AaAA7BBOCcCD($$$l&"uU"$$DDD6DvDDD"E'E+E.E2E7E?  L  R  W  \  `  c  g  l{qEvE|EEEEEEEEEEEEEEEEEEEEEEEEל׬נ$$x1  pp#$$$EEEEEEEEEEEEEEEEEEEEFF F FFFFFĽzvohaZSL  z  |  ~                                          EEEEEFF F FFFFFF+F,F.F1F4F6F7F8F>FMFNFה׈$$x1  pp#$$$FF+F,F.F1F4F6F7F8F>FMFNFOFZGGHWHIIyJJJ KIKaKKKĽ|ukaWMH(  @           74?@A  P  V  W  X  Z  ]  `  bc  o  uNFOFZGGHWHIIyJJJ KIKaKKKO?OWOXOoOqOrOOOOOOOOPP/P0P1P3P#Q*QSSTTU U!U-URUWUUֲֽ 5OJQJ5 jUjB*UmH jU jUmHB* jB*U5B*B*cHdhrJ[gHjUcHdhrJ[gHNHcHdhrJ[gHcHdhrJ[gH5CJOJQJj5CJOJQJU5CJOJQJ2KOWOoOOOO1P7P;P>PBPGPVP_PhPiPkPlPoPqPrPyung`YR H  H  H  H  H  G  G  G  G  G  G  G  G  Fy}   s4R   MMMNN=O>OWOoOOOO1P7P;P>PBPGPVP_PhPG$$G$Feeee@&$$@&hPiPkPlPoPqPrP}P~PP\~~~~~yy~H$$H$~$$Tx44ִp p `$  rP}P~PPPPPPPPPPPPPPPPPPPPPPPPPPĽzsohaZSL H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H  H PPPPPPPPPPPPPPPPDH$$H$s$$Tx4ִp p `$PPPPPPPPPPPPPPPPls$$Tx4ִp p `$H$H$$PPPPPPPPPPPPPPPPPPQ Q!Q"Q#Q/Q8QeQfQQQQĽzsoje`[VQL'& H  H  H > H C H E H H H I H KL H M H N H ] H ^ H ` H c H d H fg H h H i H ~PPPPPPPPPPPPQ Q!Q"Qs$$Tx4ִp p `$H$$H$"Q#Q/Q8QeQfQQQQ?S}SSuTTT & F'&s$$Tx4ִp p `$Q?S}SSuTTT U>UXUUUU W WWrWWW"X-X@XQXXukaWID?<   I  d           V   I%?  r         FT U>UXUUUU W WWrWWW"X-X@XQXXXY YY$$$e & FUUUUUUsVtV W W-X.XQXRXhXXXXXXXXXXYYYYYYZZ8Z9Z:ZXZYZZ"[E[ \ \f\\\\\\\\\\\ ]] ]"]8]P]b]c]h6jZ+0J$U0J$ j0J$U55>* jU jU jUmH5B*B* jB*U<NH5CJOJQJj5CJOJQJU5CJOJQJ* jU jUmH;]]]^^^^&^'^*^<^=^s^w___`&      GmoH  ;  xgyg~gggdieili]jwjjjGkHkll m"mJmKm^m`mambmmmmmn>n?nnnnzz {{O{{~~~'5P`$@ƀ.AVẂ΁ Nz؂Ia҄"#DEUmHNHhnH  jUmH<jB*UmH5B* jB*UViiiij]jwjjjjj5kGkjkkkllll mJm^mam $ & F $ & F$$xx@&$xx@&'j]jwjjjjj5kGkjkkkllll mJm^mammmmn?nƸƪzpkfa\RH    ;>R  |            w   H   H     ammmmn?nnnnnnYooooo8p>prpppp  & FJ0( X$dx$d$ & F $ & F$x$d$x$d?nnnnnnYooooo8p>prpppppppqq qqqqĺxqgda^WPLE V &' U / U 45bcy   SH  J  (    ȓ L  +L  KL  fL   L [   E0   0]  ppppqq qqqqqq"q+q,q5q>q?qEqNqOqVq_q`qaq(@L@DV$$$TF U$$ hSqqq"q+q,q5q>q?qEqNqOqVq_q`qaqrrTrrrrr#sEsFsssst7t8tltÿ}spmc`]ZWT[\    J       V  V  V  V  V  V   V  V  V  aqrrTrrrrr#sEsFsssst7t8tltutQuuvvPv~vvvv  & FltutQuuvvPv~vvvvv w!w6wYwwwwx4x;xOx}ojcYKD " 8   8       !  !   !             e  e   vv w!w6wYwwwwx4x;xOxhxoxxxxy(y?yzyyy  & F  & F  & F"  & F   & F!Oxhxoxxxxy(y?yzyyyyzzkzz { {{{${={N{O{¸tole^WPIE * . * G * X * ] * ab   !=  a  }     ؊              "  yyzzkzz { {{{${={N{O{Q{{{{{{{{{{\+$$$$Fy% *d$O{Q{{{{{{{{{{{{{{{{{{{{{{{{{||!|#|$|&|J|L||wrmid_Z  !  E  GH  J  L  N                               +          *  * !{{{{{{{{{{{{{{{{||!|#|$|&|J|L|M|O|P|h߬߰T$$Fy%$L|M|O|P|R|`|b|c|d|e|g||||||||@}b}}}}~~~~~~~ytoj^PM     )&  #K  "m  !  {   {                        P|R|`|b|c|d|e|g||||||||@}b}}}}~~~~~$$Fy%$~~#67=abnABYǀجؼ،(0$4$2$6$,$8$$$l@ "7$.$/@&~#67=abnABYǀȀрBC]΁ρƿ~wple^ZS .  1  .  3  .  0  .  4  .  2  .  6 ; . TU , w .  8  .  7  . /ǀȀрBC]΁ρ 0{|؂قڂ0;$:$9$5$$$l4@ "1$3$.$$$l@ " 0{|؂قڂ34>bgnsw|ÿyrkd]VOH =  =  =  =  =  =  =  =  =  =          ; * . <= : X . ij 9  .  5 ڂ34>bgnsw|Ä=$ÄĄƄ*,.2578Ľzsle^WPI <  <  <  <  <  <  <  <  <  <  <  <  <  < ! < # < & < ) < + < - < K < MN = [ = m =  = ÄĄƄE@BBBBBB<$$$Tl44" W X tn>Z!'  R$$Tl4" W X tn>Z!'<$ *,.2578:;ABU<$ 8:;ABUVXhjlortuyzĽ~zsle^WPI < _ < b < e < g < i < y < {| <  <  <  <  <  <  <  <  <  <  <  <  <  <  <  <  <  < UVXhjlortuURRRRRRRR<$$$Tl4" W X tn>Z!' UV_`?]axyz VWYZz{Pjِ"#)*KL\]de’;*+67zו=UVWRgh hmHnHCJNH CJhnH CJ 5OJQJ6B*NH5WuyzR$$Tl4" W X tn>Z!'<$ Յ<$ Յօ؅./^ilĽ~wspb_XQJ >  >  >     <  <  <  < " < # < $ < & < * < + < , < - < 9 < ;< < P < Q < W < X < \ < ]Յօ؅URRRRRRRR<$$$Tl4" W X tn>Z!' .RPN$$Tl4" W X tn>Z!'<$./^ilxydefgͨ` '$$Tl F$ y%?$-$$Tl F$ y% >$lxydefgh|}~yung`YUN ? |} ?  ?  ?  ?  ? 9 ? : ? ; ? <= ?  ?  ?  ?  ? S ? T ? U ? VW ? X ? [ ? \ ?  > gh|}~dԜ'$$Tl F$ y%'$$Tl F$ y%?$~>Ќьyz VWYZz{|ǎ̾xtmifXUN D i   1 @  @  @  @ XY @  @  A IJ   o    ? d ? g ? {>Ќьyz V̈́ (,$$Tl4~)&$$Tl4~)@$($$Tl4~) A$VWYZz{|ǎ̎ێߎ D$@$$$Tl4~)ǎ̎ێߎ./1JKNQRSTU^_brstĽ}vohaZSOH E   E  E  E  E ' E ( E )* E + E . E 1 E 2 E K E MN E v E y E { E | E  E  D  D  D  D  D .E$a$$Fֈ7OJ T& ./1JKNQRSTU^_brs$$F7OJ T&E$Y$$Fֈ7OJ T&stu{|ˏCDkpw|tB$$$F7OJ T&E$tu{|ˏCDkpw|Ľ}vohaZSL B ' B 0 B 4 B 8 B = B A B F B M B R B yz(    E  E  E  E  E  E  E  E  E  E  E ̐͐N@$$Tl44   {v.$  B$̐͐1359<>?ABHĽzsle^WPI C { C | C ~ C  C  C  C  C  C  C  C  C  C  C  C  C  C  C  C  C  C  C  B  B  B #͐C$ 1359<>?AB`]]]]]]]]]C$$$Tl4   {v.$ BHI\]moqtwy]$$Tl4   {v.$C$ HI\]moqtwyz~ÑđĽzsle^WPI C  C  C  C  C  C  C  C  C  C  C "# C 7 C 8 C > C ? C C C D C F C I C L C N C P C `a C t C uyz~]$$Tl4   {v.$C$ Ñđّؑ]$$Tl4   {v.$C$ đّؑx’+,-.>Ľ~vnfa\XP   vF  F  8F  F   F   r C  C  C  C  C  C  C  C  C  C  C  C  C ّC$ x’+,`^\WWWWWU & FF$$Tl4   {v.$ ,-.>qr} $>qr}ƔӔ }vohaZSL   5   <   =   C   R   ^   k   x   }                                            ƔӔSPPPPPPPP $$$l44      3+}]"'+/ 4 9              78MXP,MM!$$$l44      3+}]"'+/ 4 9  $78MX]bgnwxyzƕՕ֕וĽzsle^WPI ! g ! h ! i ! x !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !    %   0X]bgnwxyzƕՕ֕ו׬פ%$$l4     3+}]"'+/ 4 9!$#,;<=UVWbsx}Ľzsle^WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! " ! ' ! ( ! ) ! 9 ! PQ ! R#,;<=UVWbsx}נ$%$$l4     3+}]"'+/ 4 9!$Ԗߖ ,-.38APQRghiüyrkd]VOK !  !  !  !  !  !  !  !  !  !  !  ! 67 ! 8 ! ? ! @ ! A ! B ! K ! P ! U ! Z ! _ ! j ! Ԗߖ ,-.38APQRghׄ%$$l4     3+}]"'+/ 4 9!$hiʗ˗̗ԗ23:ڌ!$%$$l4     3+}]"'+/ 4 9hiʗ˗̗3:;<nuvw(/01} dvwxtuRSΜϜQRϝН34no,-[\:;'(^_̡͡:;pqƢǢOJQJB*biʗ˗̗ԗ23:;<C~wpib[TPI !  !  !  !  ! $ ! 8 ! 9 ! > ! C ! D ! K ! j ! rs ! t !  !  !  !  !  !  !  !  !  !  ! :;<CNOPUZ[\]nuvw%$$l4     3+}]"'+/ 4 9!$CNOPUZ[\]nuvwɘ~wpib[WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ɘʘИ՘ۘܘ(/01A\]cijvwx`%$$l4     3+}]"'+/ 4 9!$ɘʘИ՘ۘܘ(/01A\]cijvwx}~wpib^WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !   !  !  ! ( ! ) ! b ! c ! i ! n ! t ! ux}Й |%$$l4     3+}]"'+/ 4 9!$Й .>?@~wpie^WPI !  !  !  ! !" ! # ! 2 ! 3 ! 4 ! C ! L ! Q ! V ! W ! X ! n !  !  !  !  !  !  !  !  !  !  .>?@EJSbcdvwxl%$$l4     3+}]"'+/ 4 9!$@EJSbcdvwxɚߚĽ~wple^WPI ! Y ! ^ ! _ ! u !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ɚߚ#CDEJOl׌%$$l4     3+}]"'+/ 4 9!$#CDEJOP_`astu|Ľ~wsle^WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ,- ! . ! = ! > ! ? ! N ! O ! TOP_`astu|%$$l4     3+}]"'+/ 4 9!$ +-/16;=Ľ~zsle^WPI !  !  !  !  !  !  !  ! ! ! ( ! ) ! 3 ! 5 ! 7 ! < ! A ! C ! E ! G ! WX ! Y ! Z ! [ ! \ !  !  +-/16;=?IJQRSegik%$$l4     3+}]"'+/ 4 9!$=?IJQRSegikpuwΜϜĽzsle^WPI ! H ! J ! O ! T ! V ! X ! Z ! op !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! kpuwΜϜ45<QRdfh %$$l4     3+}]"'+/ 4 9!$45<QRdfhjotvϝНĽzsle^WPI ! ? ! H ! J ! O ! T ! V ! X ! Z ! no !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! !hjotvϝН349Dא%$$l4     3+}]"'+/ 4 9!$349DIJOTU~ɞʞ˞О՞֞Ľzsle^WPI ! ( ! ? ! h ! i ! n ! s ! t ! u !  !  !  !  !  !  !  !  !  !  !  !  !  !   !  ! & ! 'DIJOTU~ɞʞ˞О՞֞,->׼%$$l4     3+}]"'+/ 4 9!$,->CDEJOPQRSZ[\pqrsx}Ľzsle^WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! " ! '>CDEJOPQRSZ[\pqrsx} %$$l4     3+}]"'+/ 4 9!$ğşΟݟޟߟ 29:Ľzsle^WPI !  !  ! ' ! ( ! ) ! * ! / ! 5 ! 6 ! 7 ! Q ! VW ! X ! _ ! ` ! a ! p ! y ! z !  !  !  !  !  ! ğşΟݟޟߟ 29:L%$$l4     3+}]"'+/ 4 9!$:;@_`afklmx àĠϠüyrkd]VOKX ! Y ! ^ ! o ! z ! { ! | !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! :;@_`afklmx àĠϠT\!$%$$l4     3+}]"'+/ 4 9!&'(-./05:;<GX%$$l4     3+}]"'+/ 4 9!$!&'(-./05:;<GX]^_d~wpib[TPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! . ! 9 ! : ! ; ! @ ! E ! F ! G ! R ! WX]^_defglqrs~%$$l4     3+}]"'+/ 4 9!$defglqrs~ơˡ̡͡ҡӡ~wpib[WPI ! l ! qr ! s ! x !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ơˡ̡͡ҡӡԡաڡߡ %$$l4     3+}]"'+/ 4 9!$ӡԡաڡߡ #49:;KVW~wpib^WPI !  !  !  !  !  !  ! & ! ' ! ( ! - ! 2 ! 3 ! 4 ! 5 ! :; ! < ! A ! R ! ] ! ^ ! _ ! d ! i ! j ! k#49:;KVWX]defghopqX%$$l4     3+}]"'+/ 4 9!$WX]defghopqŢƢǢ٢~wpie^WPI ! T ! U ! e ! wx ! y !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ŢƢǢ٢ "=CDJODh%$$l4     3+}]"'+/ 4 9!$ "=CDJO[֣ףޣĽ~wple^WPI ! ` ! g ! h !  !  !  !  !  !  !  !  !  !  !  !  !  ! &' ! ( ! / ! 0 ! 1 ! @ ! I ! N ! SO[֣ףޣ$1;ELMWhijplT%$$l4     3+}]"'+/ 4 9!$LM  _`Ƨȧ 4567cmnoNѯүӯԯ !MN`PaŴִ]_{|} !RS jU jUmHH*mH jB*Hh8BHB*KHmH hmHnH5 5OJQJcHdh7BgHB*L$1;ELMWhijpuvǤѤ Ľ~wsle^WPI ! : ! ? ! @ ! A ! P ! \] ! m ! w !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! T ! U ! ZpuvǤѤ Ublvהd%$$l4     3+}]"'+/ 4 9!$ Ublv *@ABCDEĽ~zsle^WPI !  !  !  !  !  !  !  ! / ! 9 ! C ! P !  !  !  !  !  !  !  !  !  !  !  !  ! 4 ! 5 *@ABCDEFST^_`j%$$l4     3+}]"'+/ 4 9!$EFST^_`j~Ľ~vsle^WPI   ~               F   !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  ! ~§çħŧ $ & FF%$$l4     3+}]"'+/ 4 9!$§çħŧƧǧȧɧΧӧݧާߧ '-./01Ľ~zsle^WPI !  !  !  !  !  ! ' ! 12   P   [   \   ]   ^   _   `   a   k   p   u   vw   x   y   z   {   |   }ŧƧǧȧɧΧӧݧާߧP$$l44      3+}]"'+/ 4 9             $ ߧ PM!$$$l44      3+}]"'+/ 4 9  $'-./01234567K[\]^_`abcmno%$$l4     3+}]"'+/ 4 9!$1234567K[\]^_`abcmnoĽzsle^WPI !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  !  oèӨԨܨݨިߨ%$$l4     3+}]"'+/ 4 9!$èӨԨܨݨިߨ ĽvjbTO   ^F    L= NOPQ ! R ! \ ! ] ! ^ ! _ ! ` ! a ! b ! j ! k ! { !  !  !  !  !  DQaoCx & FF%$$l4     3+}]"'+/ 4 9 DQaoCxϬ).R]ٽzupbTOA<l      y   t:         9J         5xϬ).R]NOPU[f`4$$l440j $  $NOPU[fg~Į̮-.CY|ung`\UN !  !  !  !  !  !  !  !  ! 2 ! IJ ! K ! L ! b ! yz                  N   Nfg~Į̮-.CYaxy4(,$$l4 j $!$$$$l44 j $ Yaxyů9`°ͰҰ߰$>?ACL]ǿzvqlgb]XS        !  "  <  NO  Z  h  t           @  r           h !  ! yů9`°ͰҰ߰$>?0($$F4O+}% $ & F?ACL]^~˱̱αбѱ  $$FO+}%$]^~˱̱αбѱ :JKMOPabs|wrmha]X   *           &  CD  S  T  V  X  Y  i                              " :JKMOPabsݴ *d$$$FO+}%$sϲٲڲܲ޲߲,-CMNĿ{vqlhc^Y      34  E  F  H  J  K  Z  qr                                        "ϲٲڲܲ޲߲,-CMNPR$$FO+}%$NPRSbcóųƳճֳ *+-/{vrmhc^Y  3  5  6  @  OP  _  `  b  d  e  o                                      "RSbcóųƳճֳݼ$$FO+}%$ *+-/09:LVWY[\kl{ݤݼ$$FO+}%$/09:LVWY[\kl{´ĴŴִ״~zupkfa\W  _  `  b  d  e  o   *                                         &'  0  1"´ĴŴִ״,679;<K *d$$$$FO+}%,679;<KLwеѵ |wrmhc_Z  WX  g  h  j  l  m  w                                $  %  '  )  *  4  OP"KLwеѵ ,$$$FO+}% "#%'(78JTUWYZij$$FO+}%$"#%'(78JTUWYZijж"$&(*Ŀ~{xsnid_Z                                           ()  8  9  ;  =  >  H!ж"$&(*,.0247:=@ARW\5$$F  +b>u "%Q' $$$*,.0247:=@ARW\afkosuwy{}Ŀzupkfa\W                  +,  .  0  2  4  6  8  <  @  E  J  O  T  Y  jk  n  q  t  w  y  {  }    "\afkosuwy{}($$F  +b>u "%Q' $÷ŷǷɷ˷ͷϷѷӷշ׷ٷ۷ݷ޷ Ŀzupkfa\W                                                                "÷ŷǷɷ˷ͷϷѷӷշ׷ٷ۷ݷ޷ԔԸ($$F  +b>u "%Q' $ !#%')+-/134Ԡ ($$F  +b>u "%Q' $ !#%')+-/134EJNSW[_cgkosw{|Ŀzupkfb]X    /0  4  8  <  @  D  H  L  P  T  X  ]  a  f  wx  z  |  ~                        "4EJNSW[_cgkosw{|($$F  +b>u "%Q' $ʸ̸θиҸԸָظڸܸ޸ ÿ~yupkfa\W                                                                "ʸ̸θиҸԸָظڸܸ޸($$F  +b>u "%Q' $ "')*8<@DHLNPRTVX($$F  +b>u "%Q' $ "')*8<@DHLNPRTVXZ\]prtvxz|~Ŀzupkfa\W  +  -  /  1  3  5  7  9  ;  NO  Q  S  U  W  Y  [  ]  _  c  g  k  o  s                  "XZ\]prtvxz|~Ը($$F  +b>u "%Q' $ӺԺOPܽݽ߽}zwtfcO   ORS       !  #  %  '  )&ӺԺOPܽݽ߽dds|ÿٿ)*+-TUVXqrsuĿ}xsoje`\  X  j  lm  n                          6  89  :  M  OP  X  c  lT{M#ds|ÿٿ)*+-TUV\hDdݬt$$Tl Dw$$TVXqrsu%OPQa&6nJ߰$$Tl Dw$$%OPQa&6nJz{H&L! TUǹǶ|yvspm_\Y">   >   PQ   k                 "z{H&L! TU12$d!%d$&d"'d$-D$d!%d$&d!'d$-DAB~>? 46>?PW78jklmDEFIcdeHIvwxaNPuy DJhnH KH0J#j-UmH 5;B*5B*H* jUV12@A@AV @ʼ|yvheb_\*  67   wx        KLS   Sop!$@A@AV$d!%d$&d!'d$-D @WP4]67lHF\~ & FM & FN$d!%d$&d!'d$-D@WP4]67lHF\~cd{xurda^YVG*H4  4  Z[$M  NM  M   M s  s  N   N  LN   N lm  ~cdFG +dV & FD*d$d!%d$&d!'d$-DFG +dV+`u|tog_WOGD  D  D  D  D  *CD  \D  xD  D  D  {D  D   D    RS      H   H+`uH]aIJ & FP & FP1$*d & FDH]aIJz{Žsnib[TMI U  U  U  U T  4   4(P  rP  P   P D   D  #D  *'oD  D  D  *3D  iD  Jz{OPvwyxtؐV$$$Tl i /U$TOPvwy EFyrkd`YRK V  V ; V => V ? V @ V | V ~ V  V  V  V  V  V  V  V  V  V  V . V 01 V 2 V 3 V  V  EFGHJ4ޜ@$$Tl i /V$FGHJ ABCDGyung`YUN V  V  V  V  V  V  V  V ; V >? V _ V ` V  V  V  V  V  V  V  V  V  V  V  @GIAc `fqB| BFlr>48pqnrpqxy|}()+,qryz}~mH jUB*OJQJhmH nH B*OJQJhnH B*OJQJhmH nH hnH R ABCDGJKLMNބ4l$$Tl i /V$JKLMN}/6>?Ad´|unjc\UNJH V | V } V  V  V  V  V  V  U  U  U 0 U 8TT    V  V  V U V XY V Z V [ V N}/6>?Ad abcdfDtpV$$$Tl i{ U$T abcdfrs?@B/QYjqyz|zslhaZSLH V  V  V P V RS U [ U b U s U {T.   . V  V  V  V  V  V  V  V  V  V  V E V Gfrs?@B/QYjqyz|04$$Tl i U$T$$Tl i{ V$CDFm?HTdl`LU$TV$$$Tl i CDFm?HTdlmr|ungc\WRM  C  `  ~ V  U  U  U  U T     V  V ) V . V 01 V 2 V _ V  V  V  V  V  V lmr>5678qopqrt($V$$$Tl iL>5678qopqr&'()Ik-:»xtomkkikkkko V  V    V  V  V   I V ~ V  V      V  V     U V VW V   "&'()IJjk-.D &B8&d$$d$$$$Tl iLV$$67>?BCDEopuvwx>?DEFGrsuv'(*+?@GHJK?@GHJKLMwx}~mH jUbwx9:L &B8 0 000?&P0P/R / =!"#$;%ee.......)(/&P0/R = /!"#5$;%77,&P/R / =!"#$;%eeyDyK  _Toc1051686yDyK  _Toc1051687yDyK  _Toc1051688yDyK  _Toc1051689yDyK  _Toc1051690yDyK  _Toc1051691yDyK  _Toc1051692yDyK  _Toc1051693yDyK  _Toc1051694yDyK  _Toc1051695yDyK  _Toc1051696yDyK  _Toc1051697yDyK  _Toc1051698yDyK  _Toc1051699yDyK  _Toc1051700yDyK  _Toc1051701yDyK  _Toc1051702yDyK  _Toc1051703yDyK  _Toc1051704yDyK  _Toc1051705yDyK  _Toc1051706yDyK  _Toc1051707yDyK  _Toc1051708yDyK  _Toc1051709yDyK  _Toc1051710yDyK  _Toc1051711yDyK  _Toc1051712yDyK  _Toc1051713yDyK  _Toc1051714yDyK  _Toc1051715yDyK  _Toc1051716yDyK  _Toc1051717yDyK  _Toc1051718yDyK  _Toc1051719yDyK  _Toc1051720yDyK  _Toc1051721yDyK  _Toc1051722yDyK  _Toc1051723yDyK  _Toc1051724yDyK  _Toc1051725yDyK  _Toc1051726yDyK  _Toc1051727yDyK  _Toc1051728yDyK  _Toc1051729yDyK  _Toc1051730yDyK  _Toc1051731yDyK  _Toc1051732yDyK  _Toc1051733yDyK  _Toc1051734yDyK  _Toc1051735yDyK  _Toc1051736yDyK  _Toc1051737yDyK  _Toc1051738yDyK  _Toc1051739yDyK  _Toc1051740yDyK  _Toc1051741yDyK  _Toc1051742yDyK  _Toc1051743yDyK  _Toc1051744yDyK  _Toc1051745yDyK  _Toc1051746yDyK  _Toc1051747yDyK  _Toc1051748yDyK  _Toc1051749yDyK  _Toc1051750yDyK  _Toc1051751yDyK  _Toc1051752yDyK  _Toc1051753yDyK  _Toc1051754yDyK  _Toc1051755yDyK  _Toc1051756yDyK  _Toc1051757yDyK  _Toc1051758yDyK  _Toc1051759yDyK  _Toc1051760yDyK  _Toc1051761yDyK  _Toc1051762yDyK  _Toc1051763yDyK  _Toc1051764yDyK  _Toc1051765yDyK  _Toc1051766yDyK  _Toc1051767yDyK  _Toc1051768yDyK  _Toc1051769yDyK  _Toc1051770yDyK  _Toc1051771yDyK  _Toc1051772yDyK  _Toc1051773yDyK  _Toc1051774yDyK  _Toc1051775iDyK EVNgDyK IDqDyK HL70103qDyK HL70062qDyK HL70103qDyK HL70062DyK yK Dmailto:Frank.Oemig@laufenberg.comW [(@(StandardmH Z@Z berschrift 1$$ & F@& 5CJHKHmH Z@Z berschrift 2$ & F@&5;CJKHOJQJmH X@X berschrift 3$ & F@&5CJKHOJQJmH V@V berschrift 4$ & F1$@&5KHOJQJmH T@T berschrift 5$ & F@&5KHOJQJmH B@B berschrift 6 <@&6CJB@B berschrift 7 <@&OJQJF@F berschrift 8 <@& 6OJQJL @L berschrift 9 <@&56CJOJQJBA@BAbsatz-StandardschriftartBOBNormal Indented edKHmH B @BFuzeile$$d & CJOJQJ<@< Kopfzeile $&d CJOJQJTO"TNormal List Bullets & F1$x hKH6O26 Normal List xKHOBHeading 1 - RightM$d0 ;h8p @ xHP5CJHKHmH RORRNormal List Numbered & FL1$xxKHZOrZMsg Table Header $(x5>*CJKHOJQJmH NOrNMsg Table BodydL5CJKHOJQJmH XOXAttribute Table Caption$$<KHmH bObAttribute Table Header $$(5CJKHOJQJmH XOXAttribute Table Body $(CJKHOJQJmH HOH Components<CJKHOJQJmH LOLHL7 Table Caption$$<KHmH TOTHL7 Table Header $5CJKHOJQJmH HOHHL7 Table BodyCJKHOJQJmH VOVUser Table Caption$$< KHmH VOVUser Table Header $(5CJKHOJQJmH JOJUser Table Body!CJKHOJQJmH :O2!:Reference Attribute>*(U@1( Hyperlink>*B*<O2A<Reference HL7 Table6>*>O2Q>Reference User Table6>*TObTNote&&P<$d%d&d'dCJKHOJQJmH FOrFExample'$(CJKHOJ QJ mHPOPNormal List Alpha( & F1$x XKH>V@>GesichteterHyperlink>*B* >+@> Endnotentext*d8xxmH :@: Kommentartext +xxmH POPQry Table Name ,1$xCJKHOJQJmH ,,@,Zusatz 2 -8XOXQry Table Header .1$x5CJKHOJQJmH JOJQry Table Caption /$x CJOJQJRORQry Table Characteristics Query0XOX"Qry Table Characteristics Response10O"0Qry Table Mode26O26Qry Table Purpose3HOBHQry Table Response Trigger4FORFQry Table Segment Pattern5BObBQry Table Trigger Query6,Or, Qry Table ID70O0Qry Table Type8hOh*Qry Table Response Control Characteristics9FOFQry Table RCP Constraints:HOHQry Table Modify Indicator;2O2Qry Table Input<@O@Qry Table Input Header=LOLQry Table Input Param Header>>O>Qry Table Input Param?FOFQry Table DisplayLine@OJQJTOTQry Table DisplayLine HeaderAOJQJDO"DQry Table Virtual HeaderB6O26Qry Table VirtualC<OB<Qry Table RCP HeaderD.OR. Qry Table RCPEBObBComponent Table CaptionFDOrDComponent Table HeaderGxFOFComponent Table Body HdL<0B@0 TextkrperI5CJH@H Verzeichnis 1Jh X' 5:CJmHJ@J Verzeichnis 2Kxx X' 5mH2@2 Verzeichnis 3L2@2 Verzeichnis 4MX2@2 Verzeichnis 5N 2@2 Verzeichnis 6O2@2 Verzeichnis 7P2@2 Verzeichnis 8Qx2@2 Verzeichnis 9R@HO2HNormal List RomanS & FH1$xKHPOPOther Table CaptionT$$<KHmH VObVOther Table HeaderU$$x5CJKHmH HObHOther Table Body V<< CJKHmH . " # I# !    !%%%%%%%%%%! !!#  #&.6@=KS<]ekPr w~.(y޹!1og%6  ^ - l.$nZ6(i_ !BO@ u +k+>`KUc]xgUh?v+Cc!)N,.319>B??`@@ADqEENFMhPPPP"QTYY^aiampaqvy{P|~ǀڂÄUuՅ.gV.s͐Byّ,Xh:x OkhD>:XOpŧߧoxfy? RK \4XdV~JNfl    !#%')+-/13468:<>ACEGHIKMOQSTVXZ[]_`bdfgiklnprsuxy{} )q# '+27q>??^@@A6DEFKrPPQX]cj?nqltOxO{L|~8l~ǎtHđ>iCɘ@=:dӡW E1 Y]sN/* @F  "$&(*,.02579;=@BDFJLNPRUWY\^acehjmoqtwz|~Unknown Klaus Veil 6 Frank Oemig$@DXtx26Njn8TXs '+Eae %AEa}+0Njo,1Sot1MRh  " 5 Q V l  $ ) 8 T Y o  ! o  , / H d g t  $ ' ; W Z p +GJq25l$@Ci">Ao  .JMj=Y\^/2Zvy <?PloFbe:::UAiAlAV9VXV [&[M[ab0bbc-c| RA~> >7jlDdHw %T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T%T3D%T%T%T%T%T%T%T%T%T%T%T%TXXXXXX3333333333333XGOSHPTV FLNz}IL!n!#NTV!UU!UU!UU!UU!UU!UU!UU@  ji@H 0(  Oh*( P>z*zl>z  N / S  :N T S   Z  s *? .TB  c $D0TB  c $D 4NB  S D4NB @ S D /TB   c $D5TB   c $D4NB  @ S D6Z   s *? TB   c $D*.TB  c $D+0NB @ S D07TB  c $D?/TB  c $D@.TB @ c $D :ZB  s *D.TB  c $D4TB  c $D0NB  S D1TB  c $D51TB  c $D63ZB @ s *D31NB  S D26ZB @ s *D>2NB  S D95NB  S D=2TB @ c $D 0ZB   s *D2NB ! S D3TB "@ c $D2TB $@ c $DE1TB % c $DH/TB & c $DF0NB '@ S DD2TB ( c $DI9TB ) c $DK6TB + c $DJ3TB ,@ c $DA.N - S  B0N . S  C0TB 0@ c $D9TB 1@ c $D1N 2 S  G-N 3 S  L-TB 5@ c $D/*N 6 S  4"TB 8@ c $D%TB =@ c $DMTB ? c $D!TB @ c $D #NB A@ S D#%TB C@ c $D"%ZB F s *D)(NB G S D((TB H@ c $D!#TB I c $D& TB P@ c $DNB Q S DTB U@ c $D8 TB V c $DBr W 3 ZH X C  Br Y 3 Z Br Z 3 Z$ Br [ 3 Z% H \ C  'Br ] 3 Z, TB ^@ c $D. Br _ 3 Z- H ` C  1Br a 3 Z< TB b@ c $D7 Br c 3 Z: H d C  ;ZB g s *D NB h@ S D B S  ?%''''''.(O( *p+2:O:P:Q:S:T:@@6@v@w@@@@@"APAI>KWKoKpKqKKKKK1L2L-TQTTTTTTTTU XX Y Y!YbYdYfYgYYY`xcdefGg i!iJi^i_iaiiij{ `'<p@P0$t/`'tp>#Ltl&p@"P9pt @t! tQPsp3tn t@ tTp( t tGtt1 tP"7$eth"-$ tg"-"t { Vt @ t Vt8pt0 tYPp#HtWPHtV.tXSb$tBt/t!t?{ Vvt@ @ tH StCpptA tZ t[0tI.>t\] tG$tFTt OotPe4t]/t_/t^0@/t5 /t!t`u%t5Bt5,5t6N?*AttJ@ tb*jtU *+t`ptc!ftd!0tat t ]tPtHt,t-m.a&t.j4a&t' *t$0-dt&gt2v&7t% 1t(C"2t+0t)"t3Ev&Ft=tz _Toc1051686 _Toc1051687 _Toc1051688 _Toc1051689 _Toc1051690 _Toc1051691 _Toc1051692 _Toc1051693 _Toc442640852 _Toc1051694 _Toc1051695 _Toc1051696 _Toc348244974 _Toc348258162 _Toc348263345 _Toc348336758 _Toc348768071 _Toc380435620 _Toc359236116 _Ref421094984 _Toc441257912 _Toc1051697 _Toc442640853 _Toc1051698 _Toc1051699 _Toc1051700 _Toc1051701 _Toc1051702 _Toc1051703 _Toc442640854 _Toc1051704 _Hlt476164040 _Toc442640855 _Toc1051705 _Toc441258009EVN _Hlt476164043 _Hlt529934483 _Toc1051706 _Toc1051707 _Toc442640856 _Toc1051708 _Toc1051709 _Toc1051710HL70103 _Hlt476164060 _Hlt476309792 _Hlt476309795 _Hlt476309794 _Hlt476309841 _Hlt476309805 _Hlt476309810HL70062 _Hlt476341376 _Hlt476341363 _Toc1051711 _Toc1051712 _Toc1051713 _Toc1051714 _Toc442640857 _Toc1051715 _Toc1051716 _Toc1051717 _Toc442640858 _Toc1051718 _Toc1051719 _Toc1051720 _Toc1051721 _Toc1051722 _Toc1051723 _Toc1051724 _Toc1051725 _Toc1051726 _Toc1051727 _Toc1051728 _Toc1051729 _Toc1051730 _Toc1051731 _Toc1051732 _Toc1051733 _Toc1051734 _Toc1051735 _Toc1051736 _Toc1051737 _Toc1051738 _Toc1051739 _Toc1051740 _Toc1051741 _Toc1051742 _Toc1051743 _Toc1051744 _Toc1051745 _Toc1051746 _Toc1051747 _Toc1051748 _Toc1051749 _Toc1051750 _Toc1051751 _Toc1051752 _Toc1051753 _Toc1051754 _Toc1051755 _Toc1051756 _Toc1051757 _Toc1051758 _Toc1051759 _Toc1051760 _Toc1051761 _Toc1051762 _Toc1051763 _Toc1051764 _Toc1051765 _Toc1051766 _Toc1051767 _Toc1051768 _Toc1051769 _Toc1051770 _Toc1051771 _Toc1051772 _Toc1051773 _Toc1051774 _Toc1051775 R ####&M(M(M(M(M(M(M(M(M( *q.q.01415<566:O?O?@@@UAE Dax)Ry`߹Q&&A@F JN  !#$"%&'*()+-,./0123546789:=;<>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyu #0#0##&[([([([([([([([([(2*.014;5@5L51616:b?b?@@@mAEFHJOQQTTHVIVJVMVSVTVfYYD[]`abwcdffggj=ltprrrs:tntt>uvxp Pn~-\ϲ`5KUV[*y|y" / !!!!%%''((( (H.L...x//k0w0116688::@:C:CCdJpJUUUUVVZZZZ [ [__aabb w wQw]wawewfwkwlwwwxwwzz({+{Q{T{{{{{{{%|(|||/}2}}}}}O~R~~~~~:=JMƀрӀր)Xg؁@CPUyS`belw#NPQUÊƊQT͌،ڌ݌0]lٍ3<Ő"#,ԓߓx{ad O\ūΫիث9<ORLO^aѭԭ  '2PSbe®߮-0=BSVcfsxƯɯ֯ٯ:=\_loŰȰװڰ<?LOıѱԱ (+8;Z]jm޳ 47|ɴ*-ܸ3> gkuFJrw)j=]3Zz @PpFf());<\]kkp},--..q~6CDvw vwwxx+,37899::?Kjknr"?KL Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 22.doc Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 22.doc Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 22.doc Frank Oemig:F:\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 22.doc Frank OemigKC:\DOKUME~1\Oemig\LOKALE~1\Temp\AutoWiederherstellen-Speicherung von V2.asd Frank OemigKC:\DOKUME~1\Oemig\LOKALE~1\Temp\AutoWiederherstellen-Speicherung von V2.asd Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 23.doc Frank OemigKC:\DOKUME~1\Oemig\LOKALE~1\Temp\AutoWiederherstellen-Speicherung von V2.asd Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 23.doc Frank OemigID:\Eigene Dateien\HL7\TCs\Publishing\Styleguide\V2.5 Style Guide - 23.doc|+}~!hZ^NgjQƳ$? L0JBE8Qv4V<T 4ymS!HΖGb 4P-8 wdlm N"f*10Μj}x\5D9>&/AN4MHΖGm\4t- t $sc? -;m g|  v']  ^  S  0  | =Ito HΖG ~0h (J|J" zStUm(k*vQt&Ql ` mZ4mq" );Bfr -K䉨|Qfsx>FHΖG %f:H[Q`R0N %mk{Cu0"]7~0h/IHΖGc ' :j}m/X- 2m/-}M~0hk.|0nX E YlA8L  g1 "l.+Xc#'bJ3e# =|#:^ |#`9E-#m?$T|$2 q%t&Qj%VDhl%6y/gv% Z%~0h'>&E0~0h60PZ&0-zl22e3 hc4-r{4 K?U5,ba5 45eB4H6> 7Nun9mw946 Y:Bќ&;gHΖG>z۬I]> -2? A9?~0h3 @Z%f:{@ml@mUY@ನBA~0hSAM"RAlA8x$SB ]B~0hl;C-WCҎv<^C H_C +Cm$fE-E*<}k G*vQ?GpH~0hg$H~0h,T6I$cI" N[J~0h1J-^K6y/K(ﺓyL~0ho4 L?_SLm#)fLx>OuM~M--N6^Ȅ NvNmquOm_"PmO~P-mQd-3RmF|S^,g%T:fT GT wUD0aoUm5V-uVl.vyWR_W- WHΖG1$X\%OnX,7Z uZ j@yl[  [~0h[ΜWv\tQı-\HΖGlL] ]r}0o9_-Hax,rC+bmx)HbVj0,b@c6dmz9em]Fem e~0hX1>fmHfl^Yfm)`gx>gg7Yg~0hJDhyhBќ~]jzQj~0hC$j ]S3k-CXl-il~0h_lH)mmb^2mbh0F{m'nHΖGLkn~0hn Qnl.1voo 9 hp*^xp~0hcyp t\sz'lsZLtT.yGu wu0V]u  ]fw /ddxd8S0}y-AyHΖG!H[zBќyz~0h-|mjN3}~0hQ ~0h.... OJQJo( OJQJo( OJQJo( OJQJo(hh. hhOJQJo(.......  ....*hhB*OJQJo( hhOJQJo(@)@)8...p...   ....@) hhOJQJo(@)00) @OJ QJ o(?o(?o(.0o(..0o(... 0o( .... 88o( ..... 88o( ...... `o(....... `o(........ 88OJQJo(hh.@)h.P.....x....  .....  X ......  ....... 8 ........ `.........@) hhOJQJo(o(.@)@@+) hhOJQJo( hhOJQJo(0o(.@)88o(((o(.o(..o(... o( .... P `P o( ..... @ `@ o( ......   o(....... o(........@)@)?o(. 0 o()@h56>*CJOJQJo() @)88o()?o(?o(.0o(..p0po(... o( .... o( ..... `o( ...... `o(....... o(........ hhOJQJo(o() hhOJ QJ o(n88o(.XXo(XXo(.0o(..0o(... 88o( .... 88o( ..... `o( ...... `o(....... o(........@)hh.hhCJOJ QJ o(q hhOJQJo( hhOJQJo(hh.@)hh) hhOJQJo(@) hhOJQJo(hho(()hh.o()8...p...   ....h 0 o()@) hhOJQJo(hhB*OJQJo(P@@.0..`p...   ....  .....  ...... `....... 00........ hhOJQJo(@)vvo()...8...  ....@)@) hhOJQJo(@)ddo()@)@)88o()?o(88o()8...p...   ....dd6OJQJo(hho(. hhOJQJo(@@ ) hhOJ QJ o([hh.@hh.IIo(.0o(..0o(... 0o( .... 88o( ..... 88o( ...... `o(....... `o(........@h8.@)0o()o(.?o(?o(.0o(..p0po(... o( .... o( ..... `o( ...... `o(....... o(........P6@@6.086..`86...  6....  .....  ...... `....... 0p........0.@+)@) 88OJQJo( @OJ QJ o( hhOJQJo(0o())@)hh.hhCJOJ QJ o(q@)@@@)hh.@)hh.88o(-hho()@) hhOJQJo( 0 o()@)0o()@)hhB*OJQJo( hhOJQJo(@) hhOJQJo(P@@.0..`56...  ....  .....  ...... `....... 00........ hhOJQJo(@h8)88o()88o()@)@h8)@)@ddo()@)88o(.@)hh.@)@)88o()hh.hh.@).@)@)885o()@)XXo(XXo(.0o(..0o(... 88o( .... 88o( ..... `o( ...... `o(....... o(........dd6OJQJo(?o(.@) hhOJQJo(0o(.hh. hhOJQJo(@)?o(.hho()@)@80)@)@)@ hhOJQJo(@)@)0.?o(.@)056.@ 0 o()@@)0o(.@ 7OJQJo(@)o()@)@)o()@)P@@.0..`p...   ....  .....  ...... `....... 00........o() hhOJQJo(hh.hh)@)@)@@ )@hh.@) hhOJQJo(@ hhOJQJo(88o()@hh.@) @OJ QJ o( hhOJQJo(@)hh.@h8.@)o()@)0.hhB*OJQJo(@)o()@)@)@)......  ....@) 0 o()88o()@)@hho()404o()@)@hh.@)@)@)o()@)hho(. hhOJQJo(@)@)hh.@@ ) hhOJQJo( hhOJQJo(h.@) hhOJQJo(XXo(XXo(.0o(..0o(... 88o( .... 88o( ..... `o( ...... `o(....... o(........0o()@ hhOJQJo(0o() hhOJQJo( hhOJQJo(HP)@)@)hho()@)@)@)hho(.@)P   N'$)$cIL m\/Ab^2mo $fEKx$SBS!F!1>"_)-\m/to /I- W_*cypa5}'Tlg1 M'nAy~}|l;Cj}xO]);nX LtYg]BH]7g$HyzZ%N[JpHe$ilxp]]X }MGT<^Cwu  @  ؗ $ p 'ls-KI(A9? eW)Lkn   1$XyLjN3}zQj [BAE0wU/X#)fLfs~]j 0 0J|)`g4H6uZHag<_lquOz9e` ?$60 ]fw]Fex)Hb^Khl%X1>fl@4-|_"P:{@+C)md-3R2:=8-zSo4 L>UY@gg> 7Cu S 9v9v '$)$ 6dwdl4y0 | ș  ` :j}oU-#un9vNC+b  D  ܛ ( t   E+fX  F|SF|S jb*F|S< |#|  Ԟ  l %F|S ',7Z3 @F|S (klL]nF|SP TAZ.F|S kF|S lt F|S4 F|S F|S̡ F|S F|Sd Z<| SA  k G|F|ST F|S QC(1t\sQ 8 [Q` [Q` ܤ ( t   ZX %Qv40,bk.Eyh!H[z)/Y:  |$< OnXN+.*;m OuM,T6IJDh&;vyWQnuVw9?G"ة c? =5VO~P]S3k&0CXl~M0}y4Po9_Y< hc4/t1Jv'] +Xc#b]uRA Y45 AgS /C$j4 1voq-2?R_WI]>.yGu=q%c 'yl[=|#sm-r83e#`9 hpiK?U5?_SLHfr{4N j%H_C <  ԫ  l   AY.^ 0 zl22Wv\/ddxg%Tgv%g| N-WC-NmQe3 @@h 8OJQJo( @ OJQJo(d @h8. BR BRL  T `Q    S/@U(@Ș @ OJ QJ o( X\L X~(!   ST ST  }T}} S}T}} S+}T+}+} }T}}  SށTށށS T ,'''SqqXq  !8. "..H #... $  ....ب % &X ' ( @ OJ QJ o(@ @h OJQJo( @h8CJOJ QJ o(o Vw  w#Vw  w#V w  w#V w  w#Vw  w#Vw  w#Vw  w#Vw  w#Vw  w#V w  w#V w  w#V w  w#V w  w#V w  w#Vw  w#V w  w#)Project.AdjustAllFormats.AdjustAllFormats%Project.AdjustAllFormats.DeleteStyles/Project.AdjustChapterNumber.AdjustChapterNumber!Project.FormatTables.FormatTablesProject.FormatText.FormatText#Project.GetAllFormats.GetAllFormatsProject.TestModul1.testProject.TestModul2.testProject.CopyStyles.CopyStyles)Project.SelectTableRange.SelectTableRange+Project.InsertTableColumn.InsertTableColumn2Project.InsertMsgTableColumn.InsertMsgTableColumnsProject.gotoTable.WhatTableProject.gotoTable.gotoTable#Project.AdjustGallery.AdjustGallery%Project.ReformatSyntax.ReformatSyntaxPROJECT.TESTMODUL1.TESTPROJECT.TESTMODUL2.TESTPROJECT.GOTOTABLE.GOTOTABLEPROJECT.GOTOTABLE.WHATTABLEPROJECT.COPYSTYLES.COPYSTYLESPROJECT.FORMATTEXT.FORMATTEXT!PROJECT.FORMATTABLES.FORMATTABLES#PROJECT.ADJUSTGALLERY.ADJUSTGALLERY#PROJECT.GETALLFORMATS.GETALLFORMATS %PROJECT.ADJUSTALLFORMATS.DELETESTYLES %PROJECT.REFORMATSYNTAX.REFORMATSYNTAX )PROJECT.ADJUSTALLFORMATS.ADJUSTALLFORMATS )PROJECT.SELECTTABLERANGE.SELECTTABLERANGE +PROJECT.INSERTTABLECOLUMN.INSERTTABLECOLUMN/PROJECT.ADJUSTCHAPTERNUMBER.ADJUSTCHAPTERNUMBER2PROJECT.INSERTMSGTABLECOLUMN.INSERTMSGTABLECOLUMNS@xC@ GzTimes New Roman5Symbol3& zArialE  Helv 8ptArial?5 zCourier NewE5  Lucida Console71Courier1"HelvA& Arial Narrow?1LinePrinter;WingdingsEMonotype Sorts9New York#@ehLbAMbƜE&Q#S!g^!\#0d=Z)FOGHL7 V2.4 Style GuideStatus Frank Oemig Frank OemigOh+'0 $ @ L Xdlt|HL7 V2.4 Style Guide8L7  Frank OemigStatusetatNormale Frank Oemig3anMicrosoft Word 8.0e@P=.Pɿ@뗱@&~!Q#S՜.+,D՜.+,\ px  KIS Laufenbergpg=1 HL7 V2.4 Style Guide Titel8 _PID_GUID _PID_HLINKSStatusVersionAN{663734C0-EEBD-11D3-B05F-0000E838F0FD}A*<F?"mailto:Frank.Oemig@laufenberg.comoj"HL70062nlHL70103ojHL70062nlHL70103idIDevEVNDraftn  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~o79CompObjpi115B< n``ππfo?AlCompObjpi21>FD n```q逤`q逤fSummaryInformation(?DocumentSummaryInformation8GMacrosO)pVBApMThisDocumentz __SRP_8&__SRP_9 )@CopyStyles"d3  !"#$%'(+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefhijklmnopqrstuvwxyz{|}~<!yE;v7+`VEԯQp'JE23CWx|XZ'JE23CW!yE;v4(S"SS"6"(1Normal.ThisDocument6]<$*\Rffff*1f3c5d804c ($H0hD $ $ J $ $8 $h $8p $b $g $H $x $ $x $ $H $P $ $4 $@ $p,L $ $  $ $8xt  $@x $ $ $@HMExAttribute VB_Name = "ThisDocument" Bas1Normal.VCreatabl`False PredeclaIdxTru "ExposeTemplate Deriv$CustomizcrU H Qmщ y 4  crU @px!XY$=( ,> >h,X> H>H ,(>> ,>( "  1@$ 4  managing tabs is missingEmanaging styles like "Normal Numbered List" to "Normal List Numbered"ais still missing ! ' uHa@ $"B@$h( & *( .,C@A@0A@2A@4A@6A@8A@:A@<A@>nready!!A@@@lZmanaging tabs is missingEmanaging styles like "Normal Numbered List" to "Normal List Numbered"is still missing ! ') ua $"B@$h &A@2A@4A@6A@8A@:A@<A@>n`ready!!A@@( "Qry Table Name"(*.GoTo What:=wdGoToLine, Which:=wdGoToFirst5LB@^l(managing tabs is missingEmanaging styles like "Normal Numbered List" to "Normal List Numbered"is still missing ! ' u8Z $"B@$hhlZpA@0A@2A@4A@6A@8A@:A@<A@>hready!!A@@HL7 Table HeaderA@phh 7L!N!'B !  5LB@h nl $"  &%L!N!  $"%L!N(cument Qry Table IDA@p   &%L!nA@D  &%L!N!  $"%L!N(HL7 Table CaptionA@pQry Table NameA@ppHL7 Table BodyA@pQry Table Characteristics QueryA@p"Qry Table Characteristics ResponseA@pQry Table DisplayLineA@pqueriesDiA@u FA@phQry Table InputA@pQry Table Input ParamA@pQry Table ModeA@pQry Table Modify IndicatorA@pQry Table PurposeA@p Qry Table RCPx X ,X@6 <\<<< <<<<< <$<(<,<0<4<8<<<@Ts(9).r).Base`q.?e).SizaBold?2ItalicC>Line~ing>>RightInd@uni>ef5LFirstPt?t!Alignn_FtKeepWithNext. ).vWidowCrol̅Outl@opLeve  #'tab s0tops?2TabS.Clear Each x In<7E # ?e4Add Positi@on:=x.e, FQRKx'border$!).B(wd#)."^GacIf (~< <> wdNone) ThenC //W ^th%#End IfcB_ρ- socNk#?6/ϐ*?ϒ<Top  |P? Bottom////rsVI__O#eHqSubatPrivate Testr(str As Variant, n&Integer)SDim@xrStrS1 ̦1ZOn Error Res0 l=  4pName`M.Numb0a.v1v GoTo 0A `Q AdjustChapterNumber(! !SelectTableRange" *[FormatTextHfrmChapterNog &$$%(. $* $.A$.  $,'%A.'ah%1.'hP  %0(j  %0(2 %0(4 8 %0(6 < %0(:  &%L!@ %0(> %0(B $* %0(D$z %0(F %0(H l %0(j %2 %0(2$z %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D6 %0(F$z %0(H l %0(j %2.%3 %0(2$z %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(DZ %0(F$z %0(H l %0(j %2.%3.%4 %0(2$z %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D~ %0(Fl %0(H l %0(j(%5) %0(2$z %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D %0(F %0(H l %0(j(%6) %0(2 %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D %0(F %0(H l %0(j(%7) %0(2 %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D %0(F %0(H l %0(j(%8) %0(2 %0(4 8 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D %0(F %0(H l %0(j(%9) %0(2  %0(4 %0(6 J %0(:  &%L!@ %0(> %0(B %0(D2 %0(F  %0(H  &$$%( &!L!NB@Pready!!A@@uh"` !RA@@lH@Attribute VB_Name = "AdjustChapterNumber" Option Explicit Pub$ Sub b() Dim strDoc As Sng 2g!Fontrmalistenvorlage=LTempla te|'managing tabs is mi ssstyles like H"No?l ed 1" to /'1still4= S electum0ent. MIf" Then 2Exit˃8Elsz *s(7).ActivFEnd IfC@Eg%NoD%C      !"#$%&'()*+,-./0123456789:;<=>@ABCDEFHIJKLMNVxYZ[\]_`abcmefghijkl^nopqrstuvwz{|}~xXJl@<6 @7 -216+6=/M#@M;Mt M23A Mf6<78M{?M8M M52 wd?MV.@M-MM@MMMM M7=A Me6<79M?c?I9M M8]V&)/%= wdUڅ /%OrKr@/%ߋы/%uOr /%S+ +%30c,%lCon t"S .Apply1@Template _1:=Gallerie9Outpfe"y)s`(7) MsgBox "r y!!tExit SuT e@rrHandP:dErr.De scripA Ends< <6]< `d@  BxX$`Ft $$$P$$xh $ $0XPd @`ME "    ( 8  H X hZ@Z`.F  F(  F( FB@"l Attribute VB_Name = "SelectTableRange" Public Sub |() Dim fldDocuments As FormFielbdDobj*:ObjiSet  = New hfrmps ,(.txFromn , &To$To'ShowyEndxxNDXNj(6 <,<<< <<<<< <$<0<4<8<<<6]<$*\Rffff*2c3c5d393c ``@ `x$L#$ 0x$$ X !@t (@d .` 4ME "   50 @ P` h xZ@ ! '0  $"B@$ A@! B@hl°Attribute VB_Name = "FormatText" Public Sub \() Dim strDoc As Sng  .= SelectFumenLt. VIfF<> "" TheNnI:s(S).Activate#Load frmHL7  .ShowEnd If sbmKlF9C͉2ex g@_rDJ`Q0.MP楓x X{7 g SPSSS<(<,<<<< <$<0<4<8<<<0{571E43F3-BCF0-4D74-A1DB-FE74A35C0075}{2131DDB9-C7B7-4259-8CB7-0F22647B1658}6]<0($X0 $`h@`H@``8I$h`$J$````$8$h $`$$$``X$$$X` 0p@t(x @h @x @h #$X 0H ``0`ME " $  ( "0+8+H+X+h+x+++++++++++(+8+H+X+hx` !' A@tlP1 B@2 B@3 B@4 B@5 B@6 B@7 B@8 B@9 B@10 B@11 B@12 B@13 B@14 B@15 B@A B@B B@C B@D B@E B@lxAttribute VB_Name = "frmChapterNo" Bas0{571E43F3-BCF0-4D74-A1DB-FE74A35C0075}{2131DDB9-C7B7-4@259-8C0F22647B1658} dCre atabliFalse PredeclaIdTru "Expo se@TemplateDerivCustomizD P Sub cmdOk_Click () strSelecteFdQcbo.ValXUnl oad M_ HEnd* 1UserForm_Initiali ze5 +AddItem "1.U23Z4Z5UZ6Z7Z8Z9YZ10[K1K1UK1L1[LA.BZCZDZEfQfrmDocuments__SRP_6D__SRP_7 frmHL7FormatText"L<rU   )  a !Q!)!وa4 `q 8` <`1@`?0 `  |D$hx! x h`x5hlx"$  xD$ xh\"d"$ ,Qd[`hr\Y*'<hWLd! d d6L< hs\$@\0`\hdL<8<4K*#46*\G{AC2DE821-36A2-11CF-8rU L$`$)`$i`p#59*\RxXa " " '     0 8 H P `h p x     L  $H ?  ( L0@ HP "X '` p ,   T *d(X T` *d T *dHx Z a ( Z( V . & ( "058X "`6h "  "  "  zUతF*fְlz#A6Gհxח 5cAFy lx"YXm"5@SPSSS<|<<<<< <$<(<,<0<4<8<<<@ "@Refere@z"PJtx±!GaProA#3gExitc%mMa. Wend kp?p 'X'Z ' R# ⯣ * 5/AveDoLcups(8 "D  As =b2dy~ Tm ` +  3 LUser OleJ 4  Absat$z-sndKchriftt}%IDefaultP`xgraphac%r 5 w B+"@a/.a4e Z q zDptW!G<'Kwd[JoSnkߒߒߒȠ#ϒ81 ϒb͢optшے?0DataElbiv s<= @La O tRemoѵ= P:` 2QLo (EPQa{_Initi0 zer.Valu! 200G3'la`nguag6stnStrưOn Error Resq c1e= ?R&Ynp.Numb_00.Add8, 4Gۆ:Q  C") ϻ o~toao smbjtyleTypeCharacter ActiveDocum ent.Ss("Reference HL7 Table").FoDItalic = True@End IfstrL>Use"r [NamRIf Err.Numb$<> 0 T8henc].Add a, wdn5V Sub P ub ProposeFormat()iDim Text As String = UCase$(Seleqon.#I n(, "TABLE") P @{ A\opt.ValueʀAElsoA O  DataEle¦ŝYGetAllFormats#$9SelectChapterNo  SelectDocument* __SRP_4   "  ( 03H `&p  B  N KV0YH`Y$YYY 8YPh YYYY0YH`YxYYY Y8PYhYYYY(@YXpYYYY0YH`YxYYY Y8PYh 2&]Fthis macro extracts all formatting information in text form to the endX)Hof the document itself. This information can be used to build up a macroFEwhich itself can be used to adjust the formatting of other documents.Ethe complete list of formatting must be devided into several parts onaccount of the amount of codeZ@ZXZpselect the document ! ' &u0a( $"B@$hdefine the correct styles & .B@0A@2Sub AdjustAllFormats()A@2Dim strDoc As StringA@2Dim strFont As StringA@2&strDoc = SelectDocument.SelectDocumentA@2If strDoc = "" ThenA@2Exit SubA@2ElseA@2Documents(strDoc).ActivateA@2End IfA@2On Error Resume NextA@2A@2With ActiveDocumentA@2 5L! -convert the style name to international needsA@2 $4'#If Left(strStyle, 4) = """Qry" ThenstrFont = .Styles(  ).Font.Name A@2If Err.Number <> 0 ThenA@2 7L!n ~ .Styles.Add  , wdStyleTypeCharacter A@2a .Styles.Add  , wdStyleTypeParagraph A@2hpEnd IfA@2.Styles(  ).Font.Name = " 7L!N! " A@2.Styles(  ).Font.Bold = 7L!N!U A@2.Styles(  ).Font.Size = 7L!N!U A@2.Styles(  ).Font.italic = 7L!N!PU A@2.Styles(  ).Font.Kerning = 7L!N!RU A@2.Styles(  ).BaseStyle = " 7L!TU " A@2 7L!n ~apx Xo" /L@6 <% @<%H    Nv Fr Fr@ Hr Jr  Lu   >p XrXrXr@XrXr\rH E  T%  V%(  V%  X% @ ZrH Zr Zr bh b d8 d bbpdd@  v      .Styles(  ).ParagraphFormat.SpaceAfter = 7L!V!XU A@2.Styles(  ).ParagraphFormat.SpaceBefore = 7L!V!ZU A@2.Styles(  ).ParagraphFormat.LineSpacing = 7L!V!`U A@2.Styles(  ).ParagraphFormat.RightIndent = 7L!V!dU A@2.Styles(  ).ParagraphFormat.LeftIndent = 7L!V!fU A@2.Styles(  $).ParagraphFormat.FirstLineIndent = 7L!V!hU A@2 7L!V!j lHQ.Styles(  2).ParagraphFormat.Alignment = wdAlignParagraphLeft A@2 HQ.Styles(  3).ParagraphFormat.Alignment = wdAlignParagraphRight A@2 HQ.Styles(  4).ParagraphFormat.Alignment = wdAlignParagraphCenter A@2 6HQ.Styles(  5).ParagraphFormat.Alignment = wdAlignParagraphJustify A@2k.Styles(  !).ParagraphFormat.KeepWithNext = 7L!V!nU A@2.Styles(  !).ParagraphFormat.WidowControl = 7L!V!pU A@2.Styles(  !).ParagraphFormat.OutlineLevel = 7L!V!rU A@2.Styles(  $).Borders(wdBorderLeft).LineStyle =  7L%!U A@2.Styles(  $).Borders(wdBorderLeft).LineWidth =  7L%!U A@2.Styles(  %).Borders(wdBorderRight).LineStyle =  7L%!U A@2.Styles(  %).Borders(wdBorderRight).LineWidth =  7L%!U A@2.Styles(  #).Borders(wdBorderTop).LineStyle =  7L%!U A@2.Styles(  #).Borders(wdBorderTop).LineWidth =  7L%!U A@2.Styles(  &).Borders(wdBorderBottom).LineStyle =  7L%!U A@2.Styles(  &).Borders(wdBorderBottom).LineWidth =  7L%!U A@2o InsertLine 2, ".Styles(" + strStyle + ").ListLevelNumber = " + CStr(.Styles(i).ListLevelNumber) InsertLine 2, ".Styles(" + strStyle + ").ParagraphFormat.TabStops.Count = " + CStr(.Styles(i).ParagraphFormat.TabStops.Count)h@End If End WithA@2End SubA@2nlZ  8 $> .B@<  : .B@< .B@@lh Hthe next select statement converts the name of the style into a languageindependent form  &%L F &%LHQ wdStyleNormal'4 x &%LHQwdStyleNormalIndent'4 | &%LHQwdStyleDefaultParagraphFont'4  &%LHQwdStyleBodyText'4  &%LHQ wdStyleHeader'4  &%LHQ wdStyleFooter'4  &%LHQwdStyleFootnoteText'4  &%LHQwdStyleHeading1'4  &%LHQwdStyleHeading2'4  &%LHQwdStyleHeading3'4  &%LHQwdStyleHeading4'4  &%LHQwdStyleHeading5'4  &%LHQwdStyleHeading6'4  &%LHQwdStyleHeading7'4  &%LHQwdStyleHeading8'4  &%LHQwdStyleHeading9'4  &%LHQ wdStyleIndex1'4  &%LHQ wdStyleIndex2'4  &%LHQ wdStyleIndex3'4  &%LHQ wdStyleIndex4'4  &%LHQ wdStyleIndex5'4  &%LHQ wdStyleIndex6'4  &%LHQ wdStyleIndex7'4  &%LHQ wdStyleIndex8'4  &%LHQ wdStyleIndex9'4  &%LHQ wdStyleTOC1'4  &%LHQ wdStyleTOC2'4  &%LHQ wdStyleTOC3'4  &%LHQ wdStyleTOC4'4  &%LHQ wdStyleTOC5'4  &%LHQ wdStyleTOC6'4  &%LHQ wdStyleTOC7'4  &%LHQ wdStyleTOC8'4  &%LHQ wdStyleTOC9'4P`+take the name itself within quotation marks"  &%L!@ " '4kfOAttribute VB_Name = "GetAllFormats" Sub L() 'this macro extracts all fvting Dinion tN< to t@he endLofdocument itsel0f. Td Fcan be usedEbuild 0up aNwh(ichD 2adpjustnU@oIr As.%(Wcompleli m)L devidMinqseveral paron%accour +amcodeDim i As Integer strDoc Sng Sty,le 'ec{qCD= Senl@@`. If ""ge5Exit 8Els3Es().ActivatEnd If 'defineicorr.s6sOn Error Re2s+ N@CWith e!WordBasidc.@ofAI@nsertL0x, "AP@9 AG() 1@7sNuSBn^ Fo p::2`< A?WA8 CB:4GH`s= 1 To .Bns.CaxgAF'conCn9W nernatneed[aQ>#}=aA(i'90LeftAl, 4)""Qry_u !; bN=(" +~ + ")..A+P @ t.Number <> 0 &`).Typ!ҌwdCha̹ ThL3T!E3Add , _ + Pgraph $ ?"n_al''!(o7Ci`"/?Q?r="BoאyCO(m 1lO B(Siz"C*]  italicwq/#IOOs4#K@A0_$lO.oeg^+ )`_ |fB#?;?; 5O "O H5Ӫ.SpaceAftA?oooatcBe)es6?+9+ a1%   /&.RighptIndt.+)q&+.toooo`.Firstph-\ CaseI9M AlignQ <6]<"*\Rffff*63c5d804c*\R1*#10b$*\Rffff*1b3c5d804ch$+ `pk  Btp$`Fp @@ MS  $ `$ $$$0 $  $$p  ` x( Hxx X(x(P@@ME  B   0 @ HXZ ZXZx.F FB@ ' f0(Attribute VB_Name = "SelectDocument" Public str hedp As BSng NFunction ) () Z DiPm flLsFormField "obj8ObjSet  = New frmsF!.Show7 {nEnd h rU~}  `$ p p Cx $0xtp krU $`p__SRP_5gTestModul1TestModul2 AdjustAllFormats"[      !"#$%&()*+,-./013456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`bcdefghijklmnopqrstuvwxy{|}~(").`Align` ", &K))ii'.*Ae88oP`""] &| "k(_-st-#Posi]-. "Bi)Bſ+ၢ`Trai gCh@cter+.n? yH+<  3 Linkew geL7    s ResetOnHighV  ǿ tenoLoLStartAt l Tab?O N  `TOJu<  )rj wSet meЇveqyst|(1tr|"Ebene j<schriftIndex wQ Pơ<0<4<8<< .B@< B@NlistenVorlage.ListLevels( U ).ResetOnHigher =  %0!B .B@< B@NlistenVorlage.ListLevels( U ).StartAt =  %0!D .B@< B@NlistenVorlage.ListLevels( U ).TabPosition =  %0!F .B@< B@NlistenVorlage.ListLevels( U ).TextPosition =  %0!H .B@< B@N  Next listenVorlage LKSet meineListeTemp = ListGalleries(wdOutlineNumberGallery).ListTemplates(1)0For Each meineEbene In meineListeTemp.ListLevels> meineEbene.LinkedStyle = "berschrift " & meineEbene.IndexNext meineEbenelAttribute VB_Name = "TestModul1" Sub t@() Dim i As IntPegerDj " Documents.Add $Fort= 1` To 5&.With Sele`ction.TypePara graph WordBasic.@Insert" + CStr(niB.Fmat.StylwdHeading1}@2}@3? a`4 'JnwBreak&End CNext JiAveE.Cont.List~ApplyTemplaN_:=AGalleries(wdOutlineNumbery)s(37B1 1 Levels>!1 j@66 t l8envo0rlag-j)| ''D3AE(achdVdInz rn%2i@b9Ce"3, ME"    L8    5 1  @66666(6`6x @  (08@ H+Ph "0Hh$(DD X$(x>PD D8 "8+&Ah(G(G "@8+h&A(G(G "8+@&Ax(G(G P8" px  $(DCAC D8WPCpCCDDDD  ($(8D`Cx>CWC"]C8DPDhDD  $(DCA( @*+X G FA F F G(&ZH Fp,`.b G G"F0 GXx (+G$LAF8FXGx$ZF*`,b G@ G` G G   $( D C( x#21 Xo$?2{H<<<<< <<<<< <$<(<,<0<4<8<<<@ LLL LLL*L<<<<<<<<<<<<<<<<<<6]<"*\Rffff*43c656c8f*\R1*#fa*\R1*#f9*\R1*#15*\R1*#b9*\R1*#2b*\R1*#e2*\R1*#180*\R0*#16*\R0*#10*\R1*#e3*\R1*#17f*\R1*#1d*\R1*#5d*\R0*#11*\R1*#125*\R1*#d4*\R1*#20*\R1*#1f*\R1*#c5*\R1*#17b"*\Rffff*63c5d804c*\R1*#107*\R1*#106*\R1*#c6*\R1*#17e*\R1*#c1 p+ X ` k))`x0`|JJeien`Bxente<`J;; `Bx2``JD 0`Bxt@:`Jww)`Bx tH9$60`H!`Bx!8p`Jih4`J!`Bx!J `@lk  Fi (5@iBHs Nei h xi!D  `@o  xi x7i`Bxv `0hk` i     `N ` z`t`p`Bl>` `$J l`0Ji `p X`0 `p X`0 `p X`0  `p X`0 `$P`p X`0 $`p X`0  $`p X`0   $8  $h  $ X$ "&*.z`0($ $ $P $`X` k *`X0`X p @  @ t @ d @` \ ` @8 L @< @P , @h  @ @ 2468:<>@ h P &|~DjJX@(x t `$ +@Xd @pT @R H@L @J @@D @@ @0 @ @(X(&l @t p`` @ x ` @ x $X@l @h @d @` @@P @@ H&`p@x t` h  XHh(pX$@p @l xx`DFJbt(0t tp`P(@x` pP @N XH @8 (( $ @" x @ bp` & @0x t`$@Hp +@`l P @h :`! !X @! HDJFvz0t p`(! ` 8P @N hH @F p@ @< @, ( F( p@ <!` X !HH&`DFJbtX0t :p@`X:5P&` :`P G@N tpXH <@8 7(( p $  @" & p @ t`PP!pHDFJbt`0x ttH```# 0!d t@T "@R ` XL 0@< t@ (, " ( :`@& t 0h t@ :`0! @!pp!PDJFbzt0p lh`vp!\ <L <@J <@D @B X< Y@8 N@( 0 @!@  t! T@ ! !8" !HDJFl 0t p ` !` !P @N H!H @F !(@ @< x!! , "( " p z&X &( & !($@#&HJHDFlvP#0x t8#`P#%&p @` #P @N @L &XH @8 &(( &$ "p$$0%DFJlv@%0x t(%`@% d @b %X\ @L %(< %8 @6 x0 `0&P& @&h&x& && &&& &' '('8' P' p'  `' @ @ @ )(HJHDFlv(0x t(`(%p @` 0)P @N @L XH @8 (( $ X(H**DFJlv*0x t*`*d @b P+X\ @L P+(< P+8 @6 0 `p >@ CX Cp C C "] $_ D D D8 DP  h x 4+ &G &F "A &FH &Fp ,Z &F 2` &F( &GP $Gx $G &G  (GHFhAF ZF& (bHGpGGG Y Y Y  Y@ Y` Y Y YO82}8 ($$ $0p$$H*p$0@2Ⱦ$"("p$P*x***ؿ***8*&hB(< p$(DC>CCW C@CXCpDDDD    "   (0DPCh>CCCCCCD(D@CXDpVVVVVV(VHVhL4 (DC >8CPChWCCCDDDD0VHVhVVVVVV(LH4`  "   B L :X < D J  Lp L J J` N \ P` N L 2P >$(DC>CC W8CXCpCDDDD L (>8(PDpCD>CCWC "] $_DH D` Dx D   L 4 !>!(0!DP!Ch!D!"A C!C!W!C!"]ؙ$_(D("D@"DX"Dp" "L"4 ">"("D"C#"AHC(#C@#W8%CX#"]"$_D#D#D#D# #L$4 $ X$>h$ ($D$C$"ApC$C$W%C %"]p#$_DX%Dp%D%D% %L%4P %>%(&D(&C@&CX&Cp&C&C&C&C&D&D'C'D0' H'LX' p'>'('D'C'C'C(C(C0(CH(C`(Dx(D(C(D( (L( )>)(()CH)C`)Cx)C)C)C)C)C)D*D *C8*DP* h*Lx* *>*(*C*C*C+C +C8+CP+Ch+C+D+D+C+D+ +L, ,(, " 0,8,@, H, 8P,0+p,"G,"F,A,"F-"F8-(Z`-"F-.`-"F-"G."G0. GX."Gx.. .".8+.*G(/*FX/:D&A/*F/*F/0Z0*F@06`p08b0*G0(G1(G81*G`11  R LP n 4 ( &X &( 8غ 41 Xл ( 1 4@ $   6 h6+(G(F6D($A`(F(F.Zظ(F4`06bh(G&Gȹ&G(G*O@Fp  3"38+3&Ax*G*F :Dض*FP*F0Z*F6`8bH*G(G(Gح*G0   6+(GȲ(F$Ax6D(F((FP.Z(F4`6b(GȰ&G`&G8(G 77 "77 7 7"7&A8.+88*Gh8*F80L*F80Z(9*FX9*F9*F9*G9(G:(G@:*Gh:: &:>D:<+ ;.F`;,G;"; $;<D<0+P<,F<2L,F<,F=*G@= p= "&Aء.+*G0*F`*F*F0Z*F *FP*F*G(G(G*G0` &>D<+.F(,GX" $<Dإ0+,FH,Fx,F,Fئ*G 8 == A=.=$G>$F@>$Fh>$F>*Z>$F>$F?$F8?$G`?"G?$G?$G?@  @2D8@6+&Gp@&G@(F@(F@(FA.Z8A(FhA(FA(FA(GA&GB&G0B(GXBB B4DB0+B$G(C$GPC&FxC&FC&FC,ZC&F D&FHD&FpD&GD$GD&GD&GE8E  XEhE AE(+E"GE$FE*L<$F F*ZHF$FxF$FF$FF$GF$GG$G@G$GhGG  G$AG6+G(G(H(FPH(FxH(FH.ZH(FH(F I(FHI(GpI&GI&GI(GIJ 0J0DPJ*+J&GJ&FJ&FK&F(K,ZPK&FK&FK&FK&GK$G L$GHL&GpLL  LL"AL*+M&G@M&FhM,L8&FM,ZM&FM&FN&F8N&G`N$GN$GN&GNO   O$A@O6+hO(GO(FO(FO(FP.Z@P(FpP(FP(FP(GP&GQ&G8Q(G`QQ  Q4DQ,+R(G0R(FXR(FR(FR.ZR(FS(F(S(FPS(GxS&GS&GS(GST 8T@T " HT PT 8h 8 2؛ 4XT 6 <H @T B PМ BT @ F` @U F F XXU *8 U>V$(UD(CVDؚC0VCHVW`VCVCVCVDVDVDVDW (WLhZ x x 8W>pW$(HWDUCWDDCWCWWWCXC XC8XDPXDhXDXDX XL x0 v X>W$(XDPCXD D8C(YC@YWXYCxYCYCYDYDYDYDZ  ZL x@ x 0Z>Z$(@ZDhCZCZCZWZC[C[C0[DH[D`[Dx[D[ [ [>Y$([D[C\C8\CP\Wh\C\C\C\D\D\D]D] 0] @]$(P]Dx]C]>]C]C]W]C^C(^C@^DX^Dp^D^D^ ^ ^> \$(^D_C_CH_C`_Wx_C_C_C_D_D_D`D(` @` P`>0_$(``D`C`C`C`W`CaC aC8aDPaDhaDaDa a aa " aa aa$(aD bC8b>PbChbCbCbCbCbDbDbDcC(cD@c XcLX4p hc$(xcDcCc>cCcCdCdC0dCHdD`dDxdDdCdDd d d$(dD eC8e>PeCheCeCeCeCeDeDeDfC(fD@f Xf hf$(xfDfCf>fCfCgCgC0gCHgD`gDxgDgCgDg g g$(gD hC8h>PhChhChChChChDhDhDiC(iD@i Xi hi$(xiDiCi>iCiCjCjC0jCHjD`jDxjDjCjDj j j$(jD kC8k>PkChkCkCkCkCkDkDkDlC(lD@l Xl hl$(xlDlCl>lClCmCmC0mCHmD`mDxmDmCmDm m m$(mD nC8n>PnChnCnCnCnCnDnDnDoC(oD@o Xo hopo " xoo:o;o<o oo " oo oo@p$p 4(p@pHp PpXp " `phpNppNpNpNpNpNqN0qNPq pqxq " qqqqq  q  Lq r  0r @rPrXr5`rpr xr r$Kr$r r *r8r s"9(sPs Xshs  Kps$s s *s8s s"9t(t 0t@t "KHt$pt t *t8t t 9tu uu .K u$Pu `u *xu8u$ u(9uu vv (Kv$@v Pv *hv8v v"9vv vv (Kw$(w 8w *Pw8hw w$9ww ww (Kw$x  x *8x8Px hx"9xx xx *Kx$y y *(y8@y Xy&9xyy yy *Ky$y z *z80z Hz&9hzz zz (Kz$z z *{8{ 0{$9P{x{ {{ {5{5{5{(5|"5(|"5P|"5x|"5|$5|$5|} }+(}@} " H}P} X}p},}.}"}6+~P~h~"~~&~~&8&`6&$0 "A*+(&GX&F&F&FЃ&F&F &FH&Fp&G&G&G&G8  P4D(6+`(G(F(F(F(F8(F`(F(F(Gؘ(G(G((GPx *X>D<+ȅ2G2F@2Fx2F2F2F 2FX2F2Gȇ2G2G82Gp& $Ј8D0+0,G`,F,F,F,F ,FP,F,F,G,G,G@,Gp  *>D6+02Gh2F2F،2F2FH2F2F2F2G(2G`2G2GЎ& &0:DX2+.GЏ.F.F0.F`.F.F.F.F .GP.G.G.G" "86D`.+*GȒ*F*F(*FX*F*F*F*F*GH*Gx*G*Gؔ  ( 0 "  8@H X :x =% A@@@(@@@X@p@AAAЖA  xZ@managing tabs is missingEmanaging styles like "Normal Numbered List" to "Normal List Numbered"xis still missing ! ' u8a0 $"B@$h & *( .,C@A@0A@2A@4A@6A@8A@:A@<A@>nready!!A@@lXZ & F HA@D FTimes New Roman A@J F7L!N(P F7L!N(R F7L(T F7L!V(X5 F7L!V(Z ^ F7L!V(\T$b F7L!V(`h F7L!V(d@ F7L!V(f F7L!V(hh l F7L!V(jh F7L!V(n F7L!V(pN@ t F7L!V(rT FA@vT5@ x HA@D xTimes New Roman A@J5T x7L!N(P x7L!N(R5@ F x7L(ThP  x7L!V(Xh x7L!V(Zh$b x7L!V(`hT x7L!V(d ?$z x7L!V(fL  x7L!V(hL l x7L!Vy(j x7L!V(n x7L!V(p\% t x7L!V(r xA@v8 8 | ~A@DF |Times New Roman A@J |7L!N(P8 |7L!N(RL |7L(T0< Components HA@D Components Courier NewA@J\8 Components7L!N(P Components7L!N(R F Components7L(T Components7L!V(X Components7L!V(Z ^ Components7L!V(\$b Components7L!V(` Components7L!V(d?$z Components7L!V(fp ?$z Components7L!V(h7" l Components7L!V(j Components7L!V(n Components7L!V(p%NL t Components7L!V(r ComponentsA@vExample HA@D Example LinePrinterA@JExample7L!N(P !@Example7L!N(R5L FExample7L(Tl Example7L!V(X<Example7L!V(Z ^Example7L!V(\B$bExample7L!V(`GExample7L!V(d?$zExample7L!V(f8<:?$zExample7L!V(h) lExample7L!V(jLExample7L!V(n)pExample7L!V(pLL tExample7L!V(r ExampleA@v78  HA@D Times New RomanA@Jp< 7L!N(P 7L!N(RL F 7L(T< 7L!V(XL 7L!V(Z 7L!V(`\ 7L!V(d`?$z 7L!V(f<:\&?$z 7L!V(h h l 7L!V(j 7L!V(n7 7L!V(pl t 7L!V(r A@v85LNormal Indented HA@D Normal IndentedTimes New Roman A@J:\&Normal Indented7L!N(PH Normal Indented7L!N(Rp FNormal Indented7L(Tp<Normal Indented7L!V(XNormal Indented7L!V(Z:\$bNormal Indented7L!V(`5LNormal Indented7L!V(d5?$zNormal Indented7L!V(f8Normal Indented7L!V(hL lNormal Indented7L!V(jpNormal Indented7L!V(n Normal Indented7L!V(p78 tNormal Indented7L!V(r\Normal IndentedA@v78Note HA@D NoteArial A@J8Note7L!N(Pl8Note7L!N(Rp 0 FNote7L(T<Note7L!V(XLpNote7L!V(Z `$bNote7L!V(`Note7L!V(dLp333333?$zNote7L!V(f8?$zNote7L!V(h lNote7L!V(jp 0Note7L!V(nNote7L!V(p tNote7L!V(r< \  Note7L%(  Note7L%(  Note7L%(  Note7L%(  Note7L%(  Note7L%(  Note7L%(  Note7L%(Note7L!V!B@?$z jNote7L!V!B@$z jNote7L!V!B@  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@vn l Z &  HA@D Arial A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p 7L!V(r  7L%(  7L%(  7L%(  7L%(  7L%(  7L%(   7L%(   7L%( 7L!V!B@@$z j 7L!V!B@  HA@D ArialA@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p 7L!V(r  7L%(  7L%(  7L%(  7L%(   7L%(   7L%(  7L%(  7L%( 7L!V!B@@$z j 7L!V!B@n`lXZH &; TestStyle "Heading 1 - Right", wdStyleTypeParagraphE StyleSetFont "Heading 1 - Right", "Times New Roman", True, 364 .Styles("Heading 1 - Right").Font.Italic = 06 .Styles("Heading 1 - Right").Font.Kerning = 10> .Styles("Heading 1 - Right").BaseStyle = wdStyleNormalC .Styles("Heading 1 - Right").ParagraphFormat.SpaceAfter = 0E .Styles("Heading 1 - Right").ParagraphFormat.SpaceBefore = 12 8E .Styles("Heading 1 - Right").ParagraphFormat.LineSpacing = 12<5PD .Styles("Heading 1 - Right").ParagraphFormat.RightIndent = 0PC .Styles("Heading 1 - Right").ParagraphFormat.LeftIndent = 0p H .Styles("Heading 1 - Right").ParagraphFormat.FirstLineIndent = 0 V .Styles("Heading 1 - Right").ParagraphFormat.Alignment = wdAlignParagraphRightCPI .Styles("Heading 1 - Right").ParagraphFormat.KeepWithNext = FalseH .Styles("Heading 1 - Right").ParagraphFormat.WidowControl = TrueF .Styles("Heading 1 - Right").ParagraphFormat.OutlineLevel = 10@, StyleSetNoBorder "Heading 1 - Right"p   HA@D F 7L(T5PD Times New Roman$A@J@ 7L!N(P<5P 7L!N(R 7L!V(X( 7L!V(Z$b 7L!V(`P 7L!V(d@ 7L!V(f5 7L!V(ht  7L!V(j 7L!V(n> 7L!V(pp  7L!V(r A@vC 7L!V!B@  HA@D\  7L(T5PC ArialA@Jt 7L!N(P) 7L!N(RP 7L!N(0 7L!V(X< 7L!V(Z$b 7L!V(` 7L!V(dffffff?$z 7L!V(fL! l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@ffffff?$z j 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!N( 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(dffffff?$z 7L!V(fL! l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(dffffff?$z 7L!V(fL! l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@ffffff?$z j 7L!V!B@  HA@D  7L(T  Arial Narrow A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d$b 7L!V(` l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@  HA@D  7L(T Arial A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p  7L!V(r A@v 7L!V!B@nl`ZZ & Normal List HA@D Normal ListTimes New Roman A@J Normal List7L!N(P Normal List7L!N(R F Normal List7L(T Normal List7L!V(X Normal List7L!V(Z$b Normal List7L!V(` Normal List7L!V(d?$z Normal List7L!V(f Normal List7L!V(h Normal List7L!V(j Normal List7L!V(n Normal List7L!V(p t Normal List7L!V(r Normal ListA@vBULLETSNormal List Bullets HA@DNormal List BulletsTimes New Roman A@JNormal List Bullets7L!N(P Normal List Bullets7L!N(R FNormal List Bullets7L(TNormal List Bullets7L!V(XNormal List Bullets7L!V(Z$bNormal List Bullets7L!V(`Normal List Bullets7L!V(d?$zNormal List Bullets7L!V(f?$zNormal List Bullets7L!V(hNormal List Bullets7L!V(jNormal List Bullets7L!V(nNormal List Bullets7L!V(p tNormal List Bullets7L!V(rNormal List BulletsA@v. .TrailingCharacter = wdTrailingTab .StartAt = 1nX l9j%192(Drl94 896 J9:9B9D?$z9FHrl9Hn9H?$z9FL9Dn9BNormal List Roman &%L!@9> J9: 9694 l9j 5N(R F9T5V(X5V(Z6li$b5V(`(4(15V(d%?$z5V(f F9T $$%(.= 1NUMBERED LISTSNormal List Numbered HA@DNormal List NumberedTimes New Roman A@JNormal List Numbered7L!V(d?$zNormal List Numbered7L!V(hNormal List Numbered7L!V(n Normal List Numbered7L!N(RtNormal List NumberedA@vNormal List Numbered &%L!@9>(2 9j%1)92t Bu94 96 J9:?$z5V(hn7L5V(jNormal List Alpha &%L!@9>9B9Dffffff?$z9F9H5V(n 5V(pt Numb t5V(rL 5N(Rt Bu5V(X!5V(Z$b5V(`%05V(dffffff?$z5V(f?$z5V(h(Dst5V(j05V(n5V(ppha t5V(r $$%(.vels(1 ALPHA LISTSNormal List Alpha HA@DNormal List AlphaTimes New Roman A@JNormal List AlphaA@v $$%(..ListLn<l<Z &Attribute TableAttribute Table Body HA@D FAttribute Table Body7L(TAttribute Table BodyArialA@JAttribute Table Body7L!N(PAttribute Table Body7L!N(R?User Table Body7L!V(XAttribute Table Body7L!V(Z$bAttribute Table Body7L!V(`Attribute Table Body7L!V(dAttribute Table Body7L!V(fAttribute Table Body7L!V(h Attribute Table Body7L!V(jAttribute Table Body7L!V(nAttribute Table Body7L!V(p tAttribute Table Body7L!V(rAttribute Table BodyA@vAttribute Table Caption HA@DAttribute Table BodyAttribute Table Caption7L(TAttribute Table CaptionTimes New Roman A@J Attribute Table Caption7L!N(RAttribute Table Caption7L!V(nAttribute Table CaptionA@vAttribute Table Header HA@DAttribute Table BodyAttribute Table Header7L(TAttribute Table HeaderArialA@JAttribute Table Header7L!N(R?HL7 Table Body7L!V(XXAttribute Table Header7L!V(Z Attribute Table Header7L!V(`Attribute Table Header7L!V(nAttribute Table HeaderA@v Message TableMsg Table Body HA@D FMsg Table Body7L(TMsg Table Body Courier NewA@JMsg Table Body7L!N(P Msg Table Body7L!N(RMsg Table Body7L!V(XMsg Table Body7L!V(Z$bMsg Table Body7L!V(`Msg Table Body7L!V(dMsg Table Body7L!V(fMsg Table Body7L!V(h lMsg Table Body7L!V(jMsg Table Body7L!V(nMsg Table Body7L!V(p Msg Table Body7L!V(rMsg Table BodyA@vMsg Table Caption HA@DMsg Table BodyMsg Table Caption7L(TMsg Table Caption7L!N(Msg Table Caption7L!N(P Msg Table Caption7L!N(RMsg Table Caption7L!V(XMsg Table Caption7L!V(Z$bMsg Table Caption7L!V(`Msg Table Caption7L!V(dMsg Table Caption7L!V(fMsg Table Caption7L!V(h Msg Table Caption7L!V(jMsg Table Caption7L!V(nMsg Table Caption7L!V(p tMsg Table Caption7L!V(rMsg Table CaptionA@vMsg Table Header HA@DMsg Table CaptionMsg Table Header7L(TMsg Table Header Courier NewA@JMsg Table Header7L!N(Msg Table Header7L!N(P Msg Table Header7L!N(RMsg Table Header7L!V(XMsg Table Header7L!V(Z$bMsg Table Header7L!V(`Msg Table Header7L!V(dMsg Table Header7L!V(fMsg Table Header7L!V(h lMsg Table Header7L!V(jMsg Table Header7L!V(nMsg Table Header7L!V(p tMsg Table Header7L!V(rMsg Table HeaderA@v HL7 TableHL7 Table Body HA@D FHL7 Table Body7L(THL7 Table BodyArialA@JHL7 Table Body7L!N(P HL7 Table Body7L!N(RHL7 Table Body7L!V(Z$bHL7 Table Body7L!V(`HL7 Table Body7L!V(dHL7 Table Body7L!V(fHL7 Table Body7L!V(h lHL7 Table Body7L!V(jHL7 Table Body7L!V(nHL7 Table Body7L!V(p HL7 Table Body7L!V(rHL7 Table BodyA@vHL7 Table Caption HA@D FHL7 Table Caption7L(THL7 Table CaptionTimes New Roman A@JHL7 Table Caption7L!N(P HL7 Table Caption7L!N(RHL7 Table Caption7L!V(X HL7 Table Caption7L!V(Z$bHL7 Table Caption7L!V(`HL7 Table Caption7L!V(dHL7 Table Caption7L!V(fHL7 Table Caption7L!V(h HL7 Table Caption7L!V(jHL7 Table Caption7L!V(nHL7 Table Caption7L!V(p tHL7 Table Caption7L!V(rHL7 Table CaptionA@vHL7 Table Header HA@DHL7 Table BodyHL7 Table Header7L(THL7 Table HeaderArialA@JHL7 Table Header7L!N(P HL7 Table Header7L!N(RHL7 Table Header7L!V(XHL7 Table Header7L!V(Z$bHL7 Table Header7L!V(`HL7 Table Header7L!V(dHL7 Table Header7L!V(fHL7 Table Header7L!V(h lHL7 Table Header7L!V(jHL7 Table Header7L!V(nHL7 Table Header7L!V(p tHL7 Table Header7L!V(rHL7 Table HeaderA@v User TableUser Table Body HA@D FUser Table Body7L(TUser Table BodyArialA@JUser Table Body7L!N(P User Table Body7L!N(RUser Table Body7L!V(Z$bUser Table Body7L!V(`User Table Body7L!V(dUser Table Body7L!V(fUser Table Body7L!V(h lUser Table Body7L!V(jUser Table Body7L!V(nUser Table Body7L!V(p tUser Table Body7L!V(rUser Table BodyA@vUser Table Caption HA@D FUser Table Caption7L(TUser Table CaptionTimes New Roman A@JUser Table Caption7L!N(P User Table Caption7L!N(RUser Table Caption7L!V(X User Table Caption7L!V(Z$bUser Table Caption7L!V(`User Table Caption7L!V(dUser Table Caption7L!V(fUser Table Caption7L!V(h User Table Caption7L!V(jUser Table Caption7L!V(nUser Table Caption7L!V(p tUser Table Caption7L!V(rUser Table CaptionA@vUser Table Header HA@DUser Table BodyUser Table Header7L(TUser Table HeaderArialA@JUser Table Header7L!N(P User Table Header7L!N(RUser Table Header7L!V(XUser Table Header7L!V(Z$bUser Table Header7L!V(`User Table Header7L!V(dUser Table Header7L!V(fUser Table Header7L!V(h lUser Table Header7L!V(jUser Table Header7L!V(nUser Table Header7L!V(p tUser Table Header7L!V(rUser Table HeaderA@vnplh0 &- .Styles(wdStyleTOC1).Font.Kerning = 10: .Styles(wdStyleTOC1).ParagraphFormat.SpaceAfter = 0; .Styles(wdStyleTOC1).ParagraphFormat.RightIndent = 0!V9 .Styles(wdStyleTOC1).ParagraphFormat.Alignment = 0Q .Styles(wdStyleTOC1).ParagraphFormat.OutlineLevel = wdOutlineLevelBodyText  HA@D Times New Roman A@J 7L!N(PP 7L!N(R F 7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J  7L(T(P 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!V!B@ 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d( 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d2 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R  7L(T 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(d< 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z$b 7L!V(` 7L!V(dF 7L!V(f 7L!V(h 7L!V(j 7L!V(n 7L!V(p t 7L!V(r A@vnlpZ &  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d( 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d2 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(d< 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(dF 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(dP 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@v  HA@D Times New Roman A@J 7L!N(P 7L!N(R F 7L(T 7L!V(X 7L!V(Z 7L!V(` 7L!V(dZ 7L!V(f  7L!V(h 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@vnl & B 7L!N(  7L!N(  7L!N(nlxZ &X 7L!N!'B !  5LB@hnl  &  7L%(  7L%(  7L%(  7L%(  7L%(  7L%(  7L%(  7L%(nlZZZZmanaging tabs is missingEmanaging styles like "Normal Numbered List" to "Normal List Numbered"is still missing ! ' ua $"B@$h & Indent Normal7L!N!'B ! maybe in use 5! 7!'  Indent NormalNormal Indented 7(h h MsgHeader7L!N!'B ! maybe in use 5! 7!'  MsgHeaderMsg Table Header 7(h( h MsgStructure7L!N!'B ! maybe in use 5! 7!'  MsgStructureMsg Table Body 7(hP~ h8~Attribute Table Heading7L!N!'B ! maybe in use 5! 7!' Attribute Table HeadingAttribute Table Header 7(hX} h@}Msg Table Heading7L!N!'B ! maybe in use 5! 7!' Msg Table HeadingMsg Table Header 7(hp| hX|User Table Heading7L!N!'B ! maybe in use 5! 7!' User Table HeadingUser Table Header 7(h{ hp{HL7 Table Heading7L!N!'B ! maybe in use 5! 7!' HL7 Table HeadingHL7 Table Header 7(hz hzNormal Bullets List7L!N!'B ! maybe in use 5! 7!' Normal Bullets ListNormal List Bullets 7(hy hyNormal Numbered List7L!N!'B ! maybe in use 5! 7!' Normal Numbered ListNormal List Numbered 7(hx hxNormal Alpha List7L!N!'B ! maybe in use 5! 7!' Normal Alpha ListNormal List Alpha 7(hw hww Indent Normal7LB@ MsgHeader7LB@ MsgStructure7LB@Attribute Table Heading7LB@Msg Table Heading7LB@User Table Heading7LB@HL7 Table Heading7LB@Normal Alpha List7LB@Normal Bullets List7LB@Normal Numbered List7LB@8vn0vready!!A@@lv  &are all the sameQry Table NameA@Qry Table Characteristics QueryA@"Qry Table Characteristics ResponseA@Qry Table DisplayLineA@Qry Table DisplayLine Courier NewA@J Qry Table IDA@Qry Table InputA@Qry Table Input ParamA@Qry Table ModeA@Qry Table Modify IndicatorA@Qry Table PurposeA@ Qry Table RCPA@Qry Table RCP ConstraintsA@Qry Table Response TriggerA@*Qry Table Response Control CharacteristicsA@Qry Table Segment PatternA@Qry Table Trigger QueryA@Qry Table TypeA@Qry Table VirtualA@Qry Table Caption HA@DQry Table HeaderQry Table Caption7L(TQry Table CaptionTimes New Roman A@JQry Table Caption7L!N(P Qry Table Caption7L!N(RQry Table Caption7L!V(XQry Table Caption7L!V(Z Qry Table Caption7L!V(`Qry Table Caption7L!V(dQry Table Caption7L!V(fQry Table Caption7L!V(h Qry Table Caption7L!V(jQry Table Caption7L!V(nQry Table Caption7L!V(p Qry Table Caption7L!V(rQry Table CaptionA@vQry Table Header HA@D FQry Table Header7L(TQry Table HeaderArialA@JQry Table Header7L!N(P Qry Table Header7L!N(RQry Table Header7L!V(XQry Table Header7L!V(Z Qry Table Header7L!V(`Qry Table Header7L!V(dQry Table Header7L!V(fQry Table Header7L!V(h lQry Table Header7L!V(jQry Table Header7L!V(nQry Table Header7L!V(p Qry Table Header7L!V(rQry Table HeaderA@vQry Table DisplayLine Header HA@DQry Table HeaderQry Table DisplayLine Header7L(TQry Table DisplayLine Header Courier NewA@JQry Table DisplayLine Header7L!N(P Qry Table DisplayLine Header7L!N(RQry Table DisplayLine Header7L!V(XQry Table DisplayLine Header7L!V(Z Qry Table DisplayLine Header7L!V(`Qry Table DisplayLine Header7L!V(dQry Table DisplayLine Header7L!V(fQry Table DisplayLine Header7L!V(h lQry Table DisplayLine Header7L!V(jQry Table DisplayLine Header7L!V(nQry Table DisplayLine Header7L!V(p Qry Table DisplayLine Header7L!V(rQry Table DisplayLine HeaderA@vQry Table Input Header HA@DQry Table HeaderQry Table Input Header7L(TQry Table Input HeaderArialA@JQry Table Input Header7L!N(P Qry Table Input Header7L!N(RQry Table Input Header7L!V(XQry Table Input Header7L!V(Z Qry Table Input Header7L!V(`Qry Table Input Header7L!V(dQry Table Input Header7L!V(fQry Table Input Header7L!V(h lQry Table Input Header7L!V(jQry Table Input Header7L!V(nQry Table Input Header7L!V(p Qry Table Input Header7L!V(rQry Table Input HeaderA@vQry Table Input Param Header HA@DQry Table HeaderQry Table Input Param Header7L(TQry Table Input Param HeaderArialA@JQry Table Input Param Header7L!N(P Qry Table Input Param Header7L!N(RQry Table Input Param Header7L!V(XQry Table Input Param Header7L!V(Z Qry Table Input Param Header7L!V(`Qry Table Input Param Header7L!V(dQry Table Input Param Header7L!V(fQry Table Input Param Header7L!V(h lQry Table Input Param Header7L!V(jQry Table Input Param Header7L!V(nQry Table Input Param Header7L!V(p Qry Table Input Param Header7L!V(rQry Table Input Param HeaderA@vQry Table Virtual Header HA@DQry Table HeaderQry Table Virtual Header7L(TQry Table Virtual HeaderArialA@JQry Table Virtual Header7L!N(P Qry Table Virtual Header7L!N(RQry Table Virtual Header7L!V(XQry Table Virtual Header7L!V(Z Qry Table Virtual Header7L!V(`Qry Table Virtual Header7L!V(dQry Table Virtual Header7L!V(fQry Table Virtual Header7L!V(h lQry Table Virtual Header7L!V(jQry Table Virtual Header7L!V(nQry Table Virtual Header7L!V(p Qry Table Virtual Header7L!V(rQry Table Virtual HeaderA@vQry Table RCP Header HA@DQry Table HeaderQry Table RCP Header7L(TQry Table RCP HeaderArialA@JQry Table RCP Header7L!N(P Qry Table RCP Header7L!N(RQry Table RCP Header7L!V(XQry Table RCP Header7L!V(Z Qry Table RCP Header7L!V(`Qry Table RCP Header7L!V(dQry Table RCP Header7L!V(fQry Table RCP Header7L!V(h lQry Table RCP Header7L!V(jQry Table RCP Header7L!V(nQry Table RCP Header7L!V(p Qry Table RCP Header7L!V(rQry Table RCP HeaderA@vn(^l ^` &  HA@D Qry Table Name F 7L(Ta]Qry Table Name 7L(Th] ArialA@J 7L!N(P 7L!N(R 7L!V(X 7L!V(Z 7L!V(` 7L!V(d 7L!V(f 7L!V(h l 7L!V(j 7L!V(n 7L!V(p 7L!V(r A@vn@\l8\0\Qry Table HeaderQry Table Caption7L(TQry Table CaptionTimes New Roman A@JQry Table Caption7L!N(P Qry Table Caption7L!N(RQry Table Caption7L!V(XQry Table Caption7L!V(Z Qry Table Caption7L!V(`Qry Table Caption7L!V(dQry Table Caption7L!V(fQry Table Caption7L!V(h Qry Table Caption7L!V(jQry Table Caption7L!V(nQry Table Caption7L!V(p Qry Table Caption7L!V(rQry Table CaptionA@vȣffffff?$z j 7L!V!B@ffffff?$z 7L!V(ffffffff?$z 7L!V(hffffff?$z 7L!V(hffffff?$z j 7L!V!B@ffffff?$z 7L!V(hffffff?$z 7L!V(h 7L!N(t. 7L!N( 7L!N( 7L!N( 7L!N( 7L!N(P2 TestStyle wdStyleTOC1, wdStyleTypeParagraph2 StyleSetFont wdStyleTOC1, "Arial", True, 12+ .Styles(wdStyleTOC1).Font.Italic = 0/ .Styles(wdStyleTOC1).Font.AllCaps = True5 .Styles(wdStyleTOC1).BaseStyle = wdStyleNormal< .Styles(wdStyleTOC1).ParagraphFormat.SpaceBefore = 18J .Styles(wdStyleTOC1).ParagraphFormat.LineSpacing = LinesToPoints(1): .Styles(wdStyleTOC1).ParagraphFormat.LeftIndent = 0? .Styles(wdStyleTOC1).ParagraphFormat.FirstLineIndent = 0@ .Styles(wdStyleTOC1).ParagraphFormat.KeepWithNext = False? .Styles(wdStyleTOC1).ParagraphFormat.WidowControl = True# StyleSetNoBorder wdStyleTOC1 7L!N(Pragr 7L!V!B@ 7L!V!B@r .Styles(wdStyleTOC1).ParagraphFormat.TabStops.Add Position:=InchesToPoints(1.1), Alignment:=wdAlignTabLeft 7L!N(Pr .Styles(wdStyleTOC3).ParagraphFormat.TabStops.Add Position:=InchesToPoints(2.1), Alignment:=wdAlignTabLeftq .Styles(wdStyleTOC3).ParagraphFormat.TabStops.Add Position:=InchesToPoints(6), Alignment:=wdAlignTabRightr .Styles(wdStyleTOC2).ParagraphFormat.TabStops.Add Position:=InchesToPoints(1.75), Alignment:=wdAlignTabLeftp .Styles(wdStyleTOC2).ParagraphFormat.TabStops.Add Position:=InchesToPoints(6), Alignment:=wdAlignTabRightq .Styles(wdStyleTOC1).ParagraphFormat.TabStops.Add Position:=InchesToPoints(6), Alignment:=wdAlignTabRightComponent Tablen:Component Table Body HA@DlignTa FComponent Table Body7L(TOCComponent Table BodyArialA@JesComponent Table Body7L!N(PQComponent Table Body7L!N(RComponent Table Body7L!V(XComponent Table Body7L!V(Z$bComponent Table Body7L!V(`Component Table Body7L!V(dComponent Table Body7L!V(fComponent Table Body7L!V(h Component Table Body7L!V(jComponent Table Body7L!V(nComponent Table Body7L!V(p tComponent Table Body7L!V(rAttribute Table BodyA@vAttribute Table Caption HA@DComponent Table BodyAttribute Table Caption7L(TAttribute Table CaptionTimes New Roman A@J Attribute Table Caption7L!N(RAttribute Table Caption7L!V(nAttribute Table CaptionA@vComponent Table Header HA@DComponent Table BodyComponent Table Header7L(TComponent Table HeaderArialA@JComponent Table Header7L!N(RComponent Table Header7L!V(XComponent Table Header7L!V(Z Component Table Header7L!V(`Component Table Header7L!V(nComponent Table HeaderA@v 7L!V!B@?$z j 7L!V!B@ ROMAN LISTSNormal List Roman HA@DNormal List RomanTimes New Roman A@JNormal List RomanA@v normal listso.Content.ListFormat.ApplyListTemplate ' ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(3)Ta ActiveDocument.Content.ListFormat.ApplyListTemplate' ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(5)onenNormal List Alpha HA@DNormal List AlphaTimes New Roman A@JLiNormal List Alpha7L!N(P 9j%1)92ble  End WithAc .TextPosition = 0yLis. .TabPosition = InchesToPoints(0.5)Bull FNormal List Numbered7L(TNormal List Numbered7L!V(XRNormal List Numbered7L!V(Z $bNormal List Numbered7L!V(`?$zNormal List Numbered7L!V(fTaNormal List Numbered7L!V(jNormal List Numbered7L!V(p tNormal List Numbered7L!V(r List Normal List Numbered7L!N(PTimes Normal List Numbered7L!N(Rt RomaNormal List Numbered7L!V(X7LNormal List Numbered7L!V(ZT$bNormal List Numbered7L!V(`Normal List Numbered7L!V(dNo?$zNormal List Numbered7L!V(fma?$zNormal List Numbered7L!V(hNormal List Numbered7L!V(jal LisNormal List Numbered7L!V(nNormal List Numbered7L!V(p tNormal List Numbered7L!V(rRomanNormal List NumberedA@v LNormal List Alpha7L!V(ZNormal List Alpha7L!V(dNormal List Alpha7L!V(jNormal List AlphaA@v tNormal List Alpha7L!V(rNormal List Alpha7L!V(perNormal List Alpha7L!V(nTa?$zNormal List Alpha7L!V(ht.ffffff?$zNormal List Alpha7L!V(ferie$bNormal List Alpha7L!V(`Normal List Alpha7L!V(X FNormal List Alpha7L(T Li Normal List Alpha7L!N(RNormal List Alpha7L!N(PNormal List Roman7L!V(dNormal List Roman7L!V(jNormal List RomanA@vSet tNormal List Roman7L!V(rNormal List Roman7L!V(pstNormal List Roman7L!V(n 333333?$zNormal List Roman7L!V(hffffff?$zNormal List Roman7L!V(fRoma$bNormal List Roman7L!V(`Normal List Roman7L!V(ZNormal List Roman7L!V(X FNormal List Roman7L(TRoma Normal List Roman7L!N(RNormal List Roman7L!N(P" .ResetOnHigher = FalseNormal List Alpha &%L!%0RomanNormal List Roman &%L!%0(p%1)92$ xyz7LB@Roma xyz7L!%0(j(R%1)xyz7L!%0(2xyz7L!%0(4L xyz7L!%0(6t Al Jxyz7L!%0(:xyz &%L!@xyz7L!%0(>xyz7L!%0(BNormxyz7L!%0(D lis?$zxyz7L!%0(Fxyz7L!%0(Hes(5 Normal List Roman &%LB@(1 Normal List Alpha &%LB@ Normal List Numbered &%LB@ F 7L(&%L F 7L(NormNormal Indented 7L(yle = Normal Indented 7L( liNormal Indented 7L(CharacNormal List BulletsNormal List Bullets7L(les("NNormal List NumberedNormal List Numbered7L(e.ListNormal List RomanNormal List Roman7L((Normal List AlphaNormal List Alpha7L(stNormal List Alpha7L!V!B@tion =ffffff?$z jNormal List Alpha7L!V!B@is Normal List Alpha7L!N(RNormal List AlphaNormal List Alpha7L( L FNormal List Alpha7L(TENormal List Alpha7L!V(ZNormal List Alpha7L!V(X$bNormal List Alpha7L!V(`rSNormal List Alpha7L!V(dffffff?$zNormal List Alpha7L!V(fe = ?$zNormal List Alpha7L!V(hNormal List Alpha7L!V(jNormal List Alpha7L!V(nNormal List Alpha7L!V(p tNormal List Alpha7L!V(rNormal List Alpha7L!V!B@ffffff?$z jNormal List Alpha7L!V!B@Normal List AlphaA@v2 .NumberStyle = wdListNumberStyleBullet $$%(. Normal List Alpha &%LB@94 96 J9:Normal List Alpha &%L!@9>9B9Dffffff?$z9F9HQ .LinkedStyle = ActiveDocument.Styles("Normal List Bullets").NameLocal .NumberPosition = 0ernB .NumberFormat = ""! .Font.Name = "Symbol"- .Alignment = wdAlignParagraphLeftg ActiveDocument.Styles("Normal List Bullets").LinkToListTemplate ListTemplate:=listenvorlageF With .Styles("Normal List Bullets").ListTemplate.ListLevels(1)K Set listenvorlage = ListGalleries(wdBulletGallery).ListTemplates(7) Note Indented7L!N(PAria Note Indented7L!N(RN( Note Indented7L!V(Z$b Note Indented7L!V(`!V( Note Indented7L!V(d(`?$z Note Indented7L!V(hNote l Note Indented7L!V(jNo Note Indented7L!V(n!V( t Note Indented7L!V(r   Note Indented7L%(   Note Indented7L%(Note   Note Indented7L%((   Note Indented7L%(Note   Note Indented7L%(( Note Indented7L!V!B@$z j Note Indented7L!V!B@0 Note Indented HA@D Note IndentedArial A@J Note Indented7L!V(Xffffff?$z Note Indented7L!V(f Note Indented7L!V(p   Note Indented7L%(   Note Indented7L%(   Note Indented7L%(?$z j Note Indented7L!V!B@Normal Indented Note Indented7L(Note Note Indented7L(T?$z5P(T?$z5P(R?$z5P(V?$z5P(X?$z5P(Zpage setup (page margins)333333?$z5P(\333333?$z5P(^?Attribute Table Body7L!V(X?Attribute Table Header7L!V(XMsg Table CaptionTimes New Roman A@JX l;A@` &n; j ~A@DL | ~A@D jTimes New Roman A@JRoma jTimes New Roman A@J jTimes New Roman A@J |7L!N(P |7L!N( j7L!N(P j7L!N( | j7L(T jReference Attribute7L(TReference Attribute7L!N(Reference Attribute ~A@DReference AttributeTimes New Roman A@JReference Attribute7L!N(PReference HL7 Table ~A@DReference HL7 TableTimes New Roman A@J jReference HL7 Table7L(TReference HL7 Table7L!N(PReference HL7 Table7L!N(Reference User Table ~A@DReference User TableTimes New Roman A@J jReference User Table7L(TReference User Table7L!N(PReference User Table7L!N(8le7L!N(PReference User Table7L!N(7Attribute VB_Name = "AdjustAllFormats" Option Explicit Sub () Dim strDoc As Sng2 'managing tabs is miss$styles l@ike "Nl Numbered List" |to'bstillhT= SelectZument. MIfl" Then 2Exi t Else *s(7).A@ctivatEnd If With e%.GoTo What:=wd Line,ich FirsK'page setup (hmarbsnA . PS.TopMInchesToPoint s(0.4 BoPttom 5 L(eft 7T Righ Gutter5HeaderD@ancANC65Foo@%jCharacM S/Ax IndexTab otOC=psSc!C)3QuxeryCAbaMsgBox "rq0y!!{m PrBio&EA:kTestS wdDefaultP`0grap@hFont,Type A+g aEH@rlink, "Tim@New Ro", Fa@, 1J0.s().! .Ita Y?ra&$U?Z N#H!:t!n!).Base%@ %#{H )e&2(("Ref@ס(eJ4_KSEKOOte")p w?)1((HL7 "K2Tw# : H?e!Tru?2-)b)Uswr?O p  *vXZ>Po(%/"7kiicw̲ ٲj@eUӱ*jkg/tG__W*llKern[pV^"Խ  {.SpaceAf6U4rBeforr !Rul1wd5eSPl=?&|2 80 '1?)R- !nt/P#b)rA ???Align! wdVAoojKeep8Nex?A@HGR WidowCrol ?G1GOutAPeLeve1wd BodyT u>NoBor[B戳 TestSt@yle wd8NormalIndent,PTypeParagraPph  `S@etFont~"Times New Roman", False,( 10G.Hs( ).\.Ita@lic = *5Kerning6&mBaseF GVFt.SpaceAfter(69"Before"% ELineGsToPoi@nts(1)&R0ightC&efAInche&0.55'First:>(Alignm9wdBWL/tOKeepWit hNextOWidowCrol!True4$OutlDLeve! wd BodyT g "eNoBord`\0x DefaultHU鬎Chcg!Q eO""3*"@Compon`Tsg1t uri@9`7/%{#(" ߲ (KйA$Ru@=eeSlv_ > #\~s").PVn\7\sl! \-ooo7Dy\n\le_o\dott.[-16_  o[x\o[n[Eѡ"ExampleEY?le5X".PrІerwE86?OE(U E8.5Ee_X/)7֝(ph$?: m5CCDD ,-o.@D0C_.3_CC2C!4CCLCOrGOEOc?C?C~t0?C CCFootnoteqCD/E.EtEOBo`OFOFr FwFx@O@Before = 5 .Sty@les(wd@FootnoteText).ParagraphFormat.LineSpacing 104RightIndentF5ELefDInchesToPoints(0.25)4FirsttP-.Alignm|wdh4ZKeepWithNۀFalse4%WidowCo ntrolTrBuuOutl@LHeveAwd B8odyAG)SetNoBorde$r Ф TeDst "NlB Cled",TypeWF9Q"Times New Roman3T, )..ItalicP KernסP BaseCA==CCG;Pf#$|{eHAft/= d"BBeW ہqg{1{_ ..[1 ...w?m. .. }fN 6te߈a ňB"Arial'9q@(Gv8W ߁ @?@ac6@3E p?4o= >+G/>r~6G=<σBsXO=n&8_ﰛ<ht;OO ?;)Ӏ!;q)#b7uwdA#RpSsl f th025pt,u,"f 0rB s[ h r7Top 3ј>eo o g%Bottom @? :===wٖ }H1 t:eoeo8etpq^7rN ]r z-)9s fCPȏ#*wL x.Sѳtyles("Note Indented").ParagraphFormat.LineSpaci ng = 4sToPoints( 1) .S$RightP"00ALef@Inche0.71`FirstnL-,51,Alignmuwdc0KeepWit hNext*False0#WidowControlTruqOutBl@LeveAwd BodyT@)`'Borders(wdCF)Y(wdgBSlga+W@?thFB025pt***Lj?+UTop*M քm Bottomݏ ĤTabStops.ClearAllINfAdd Position$:=, :=ĊRTestt wd ŀ,TypeSetFo"Times New Roman", B, 1L). .Itpalic~?$KernC߿ t).pBaseB"N?A.&"DJeAfter 6$eReBefore?`ZW?[BM O c1.g~ R j7}fd/}}/^D@M}TRoz_}~3;NoV; !End SubPri vaP AdjLus@For(Hea(ėDi m str"BAsp Str9 ActiveDocua' nIOIgr LI"ArialHHD:4E_H+?H3=HeH GacG18'/$KGO61 GW0Fd0  y ӏF??;oFnf~'ALF   E-1!%SE= } ?fz1& ??K&_&6U*H? [On Borders(wdTop).LineWidth = 0 .Style Hea). BottomPwdSinxgle:U 025ptTParagraphFormat.TabStops.Cl@earAll Add Position:=InchesToPoints(6.25), Alignment:=wdC@Righ\ B =TestwdFooter, TypeeSetFont"Arial", Falspe, 8uC ).A.Italic Kernw Base,@ =6NeaqSpaceAfHBefore >AG~1)ZcM3Ind#eftFirste5*]$]L" uKeepWithNext` XowCcrolTruCא5OutlLevea1MͣwmL o?e*-fO^ _D5 ڟ.M&e-'>_k!lWk!End 9 SublPri vate AdjusPi!wApR(dQDim strkAs Str=S ActiveDocus ' r" 1 - R)n$?r&r"Times New Roman QCp, 36Xt/"ot o dtqFv w_ueUuO).&u___R6v12(A߶v.""no o o \_)?8M /wE   wn2t.xssO O O Oxx6=NocXz !"o ų11JHFerO/-JH , H He+OW1G4qv&" 0TdٚGWpGG/er/F?8= G_ _ aI=G Ftent = 0  .Styl es(wd@Heading1).ParagraphFormat.@AlignmwdDRight0KeepWithNexTrue0EWidowControl4EOutlineLHeve"wd 1KSetNoBorder 0`TabStops.ClearAll "Test9 42,Type?2).BaseC=9FUL @"Arial", [, 14A.Italic@iFals{+aB Kern@ 1 QCaps !@ QGNe[DSpaceAft= 3`IBefore?8L!CPsToPointps(1) N}Ind"LeftIncheG0.7First - p?((t.t.2"b(S0+lfAdd Posi@tion:=P?, &9:=$ؠC8313+ -"rdUVq5V]g`WN"V SOWgFWMPp_W!_R_W--SSS7aK? 6ҝ.S6-S/]/ .S0. /V//O .SSS/SYphLeft  .Styles(wd@Heading4).ParagraphFormat.KeepWithNext = True0WidowControlE00BOutlin eLeveBwd 4PSetNoBorder  0=TabStops.ClearAll!Add Position:=InchesToPoints(0.7), Alignment:=wd@߇<0Testu p5,aType,5@).BaseC=;WFsL @"Arial Narrow", False, 1|A.Italic$ Kern@@ O"E<"Nl Ind^ed" LSpaceAft= 35@Before36}pLȁ!CA1) Right"@8/W]First - G-8&o`Do?FpP t. ߰ngpz51bw(Plyo9u66y+p c~ES03?O 6O12@ |?.@a?`__RoNc  O.jNR-}.OM__Ln&L/ -_ _ ] K-1__KrK:_u K  ODô7ODq7OD>eODgOD~ODOO "?@t/2@%  FD?D@@@O.?D?DacT[?D?D?D?D UU ?DZ:/-?Dn?.?D8D7.?D 1O~1M?D?Dle,8?D?DO\8>DȳtyleHeading7 SSetFon0t wd88, "Arial", False,( 10r.Vs( h)..Italic = -1%dKern3"fParagraphFormat.SpaceAft4erA3 t BePforeA20!LineC8cRig@htInde=F cLef; F0irst2!Alignm1wdBF*(WKeepWithNexth1GWidowC8rolb XOutlzLevetwd 85NoBordp@TabStops.ClearAll GTest 9,Type9).Base# =l P M9? ?g`:?b!ģ?P?HP?ʼ??e ǰ?sP ?+?S-M:(dM7i).MCDEnd U " SubEPr@ivate `Adjus`vL@ists()TpWN'BULLETSw@2 BulletsABoA"AѯOFB6/st}Bq2 YV/*e?Hs** ;H.oA/M;I?MaIII_?JA0JJ2Jvp List Bullets").ParagraphFormat.FirstLineIndent = -InchesToPoints(0.25)  .Styles("Nl@AlignmY06EKeepWithNexFalse6LWidowControlw!;&OutlLe$ve&wd Bo8dyTYUSetNoBorder  '  lenvo`rlage]Gariwdy).Templat7@qF=AS rB9s(1 'Activ`eDocuAz^n8kTo):= 9@A.ɓwdBLeft Fy.NamAK"Sy mbol"Nu0mberU"TPositionR%w[_W?<9`[B\\4O\Q0\ .Of I/ /fb\\08v\" ]_XO O CN?]o]o]r@QA5'ROMANQQ%_Pa 4-"[ȳn", False, 10 .Styles("Normal List Roman").Font.Italic = *jKer0ningl&Base4wd $NextParagraphH $'%Ft.SpaceBeforeP%"Afte r"64ELineGsToPoints(1)4*RightIndent7Lef Inche&.45'First:("- 0.35Alignm=KeepWithOBځ4bWidowCrolOutl!Levewd BodyT`ffSetNoBo rd@TgEnd  !Sub Private  AdjustCgTabA3Dim stra As StrXc ActiveDocu3'Atbu@ B Test#~:"l @Ty|)o/ji` x %loAQ/*c! A'__%hUrB;}- 6F?_p_1A>o o h ='BG_`];o?GU oGd__O/5)5 GnY.GGu/ % / / t.Οt.HOOe o0?JVBI4D"Msg Table Header").Font.Italic = False  .Styles(KernHingr10#lParagraphFormat.SpaceAfte rD28CBeforeD63DLineFgsToPoints(1))RightIn0dentLLef!Firsti=#Alignm3߈N~ ~ms/? em', gMCaption_B  E_A8_A @_A "Times New Roma! $B mB( _B_B3?>BݖB9___.B1B B45__/CSOOF_CUn.Cn&C`er//./// / t.i/1&IP<N{fAo&9K..@_(EOODeD D0DC??5D___DgD ..O;DD }Du/ / / uDevel = wdOutlineLBodyTe xt StyleSetNoBorder "HL7 Table Hea""Xq'UsND4THest "< o",TypeParagraph:.s(8).BaseɁ Normal=CFont{" ArialBFalse, 8"<&.Italic=0KerninZg1Flt.SpaceAft= 0.5"="BeforeA"=L#C3AsToPoints(1)RightpIndej7%efFirst4"Alignm3lwdBbL)7KeepWithNnB2WidowCbro u).I ?- Caption_Ke@'"Times New Romab), =|'߉h$?rM8݊3I9A8I!o —R,-%v߂?eV C`er0!mat.FTrueIyhDkFl>!Fo G TF/G, &qOF44).R?Fwx}**F1OOpu$BF2_yF 3=O$.E!0ESOOFEڴO D En "?ex2GO81GNe _G DGPGTGY2_,GG_#1f.CC?O O xGv  GF/G/<}<3<2.Right0Lef 4FirstA1 -oQpxIgx 0xx4x5x@x xqe5x"x۠Ex x tqxxexIP  x(x5xx6x(xO<o <rx_[x62.Rightp10(Lef8/@FirstA1 - daAlignme0KeepWith0Next@a/1WidowCroA-1a8x9xx x49x~xEx x txè€xexi  xx9\`x6+xڕ(x(x/MV0x9#En$d ! !Sub{Privatte  Bk@}:(strClAs Variant, G@<0Strpa, blnBold Boolean, nSizeInteger) ActiveDocu!Ui>u>Namk=E r = OInFDim7#StOn Error Respx@ R=HlAIf .Numb<> 0 Then.Addq R g!2Ifv GoTo/,Ȥnt/$/$TéAH).P xHles).fftSub Private  AdjustFxtQuery()AK ActiveDocume nt'are all the samSetLStandard ("Qry Table N/"eLCha@racterics -;!Res ponse"DisplayLin cFont t , "Courier New", False, 8BID+pInpu@ P\mModlS@ ify Ind@icatorPurpo-pRCPk Ctra0ints, Trigge,8ETtrol `nXSegax ;tino}TypBVirtual!WTeskH*, wdba !Wgrapg$).Baseb =hf{"Ari,<u+z9.Itaxlic`K@erning1N.".Sp`aceAfA6GrBefo@= 1_! 2Righ>t`"r"Lef#ئGm"FirWidow0Q2I>=+r9Outl`tLevel,8pNoBords a1A@CaptionpvAAA?7 9IG"Times Romaq TrB1//W?Bأ ).RBa> -C!)#BCoG`j^/Cqa'?CdphTOCSOOF_C/LTt.oCnCQerC-uC' CovCѿC Cy;x T?? T_/E/E< ȧ œE( B?F55FA??}t#o??h0QH 1e/ r").ParagraphFormat.RightIndent = 0 .Styles("Qry Table DisplayLine Header"LefJ`FirstrIA lignmywd`?KeepWithNexDWidowControlCOutBlrLeveA1HSetNoBorz GL0Test Input, wdBType]\@).Base=IG1Fo0#"Arial", True, 8".Ita8lic^eL1Kerning_P MSpaceAfter6i02 Before_ K2 w ?'|%f< K س| ?d %п!]m%Lc%6{L?,2t.I I .?Jt9J t.qJ//// .K///t.LOIO O .Ln% `,:HLL\- t?Ma? /Mֵ@eor"MVirtualMQ " ?MD?aR? , ?MrL ).L"Lp?LBBNK ?6 ?K?K9K\JJ J___Jro4p).ParagraphFormat.OutlineLevel =@ 10 StyleSetNoBorder "Qry Table Virtu@al Hea2" lTestt ^RCPV, wdType?2.s(m=).Base"#! Font"Arial", True, 8'C+.ItalicD_Kernid1x)tlh$` tt l`t4llM@@ Pdtp t 4/d)tlK p <,pxdtlhx"$ 4QxtNhlpl xt x 0p Tl 0h @1)xplhNhlpl xt x 0p Tl 0h H1)xplhNhlpl xt x 0p Tl 0h @1)xplhNhlpl xt x 0p Tl 0h H1)xplhNhlpl xt x 0p Tl 0h @1)xplhNhlpl xt x 0p Tl 0h H1)xplhNhlpl xt x 0p Tl 0h @1)xplhNhlpl xt x 0p Tl 0h H1)xplh t h(txplh0   0   0 `       %+RT 5T( +J+RCLLT /L5T> DTxt x 0D 4)xD6T D@DT`$`$`$`$!`$I`$q`$`$`8 `/0#&, `)/&(9 `/$a `$ `(`A0pTxt #:aBWu0f~$8i@ >/JCk)DKsћxk XW$ s SPSSS<,<0<<<< <$<(<4<8<<<0{0CA0B4B5-75C4-4B76-85A5-9522C66CBB5E}{355827DF-F10C-4FC7-8B9A-AB1A80350A11}6]<00(`$X0` $`d@`      !"#$%&'()*+,-./0123456789:;<=>?@ACDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~rU~} 2 )  Q y 1!qI A3q3 9 a yQzz  9a5 91 5q )6Q6   1x lx0V5`xMd@t"$ ,t 0` )t`t"$ 4Qt\1t' ',L\ t6L, 6?7"$ lt\ t ,t6?7"$ lt\ t 4t6?7"$ lt\ t <t6?7"$ lt\ t Dt6?7"$ lt\ t Lt6333333?7"$ lt\ t t6333333?7"$ lt\ t t          \+' '',:dNLL 6L, t,V\x$t`L, Hx"$ 4Qxt+RT 5T( +J+RCLLT /L5TD@DTxt x 0D d@ 8)xD@5TD@DTxt x 0D d@ )xD@5T+RT 5T( +J+RCLLT /L5T> DTxt x 0D 4)xD6T D@DTxt x 0D d@ 8)xD@5TD@DTxt x 0D d@ )xD@5T+R:dNTT 5T+ +J+RCLL:dNTT /L5TA D:dNTTxt x 0D 4)xD6T G@D:dNTTxt x 0D d@ 8)xD@5TG@D:dNTTxt x 0D d@ )xD@5T+R:dNTT 5T+ +J+RCLL:dNTT /L5TA D:dNTTxt x 0D 4)xD6T G@D:dNTTxt x 0D d@ 8)xD@5TG@D:dNTTxt x 0D d@ )xD@5T+R:dNTT 5T+ +J+RCLL:dNTT /L5TA D:dNTTxt x 0D 4)xD6T G@D:dNTTxt x 0D d@ 8)xD@5TG@D:dNTTxt x 0D d@ )xD@5T t\H(t$LxD@T 0 X  0  0   0 `  3<3t"$ 4Qtp+N:`NPP 5PA(H:`NPPtp t 0H 4)tH6P(++"+NC$$:`NPP /$5PGH:`NPPtp t 0H d 8)tH5PF7H:`NPPtp t 0H d )tH5PL?7H:`NPPtp t 0H \ )tH5PF7H:`NPPtp t 0H \ )tH5PZ7"$ $lH:`NPPtp t 0H \ x )tH5PF7H:`NPPtp t 0H \ ` )tH5PF7H:`NPPtp t 0H \ h )tH5PF7H:`NPPtp t 0H \ p )tH5PGH:`NPPtp t 0H \ 8 )tH5PGH:`NPPtp t 0H \ H )tH5PGH:`NPPtp t 0H \ )tH5PG H:`NPPtp t 0H \  )tH5P:`NPP !5P+N:`"NPP 5PD:8N((H:`"NPPtp t 0H 4)tH6P(+ +"+NC$$:`"NPP /$5PF 7H:`"NPPtp t 0H d )tH5PGH:`"NPPtp t 0H \ H )tH5P:`"NPP !5P+N:`#NPP 5PD:8N((H:`#NPPtp t 0H 4)tH6P(++"+NC$$:`#NPP /$5PF7H:`#NPPtp t 0H d )tH5PL?7H:`#NPPtp t 0H \ )tH5PF7H:`#NPPtp t 0H \ )tH5PF 7H:`#NPPtp t 0H \ x )tH5PGH:`#NPPtp t 0H \ H )tH5P:`#NPP !5P+N:`$NPP 5PA(H:`$NPPtp t 0H 4)tH6P(++"+NC$$:`$NPP /$5PGH:`$NPPtp t 0H d 8)tH5PF7H:`$NPPtp t 0H d )tH5PF7H:`$NPPtp t 0H \ )tH5PF7H:`$NPPtp t 0H \ )tH5PZ7"$ $lH:`$NPPtp t 0H \ x )tH5PF7H:`$NPPtp t 0H \ ` )tH5PF7H:`$NPPtp t 0H \ h )tH5PF7H:`$NPPtp t 0H \ p )tH5PGH:`$NPPtp t 0H \ 8 )tH5PGH:`$NPPtp t 0H \ H )tH5PGH:`$NPPtp t 0H \ )tH5PG H:`$NPPtp t 0H \  )tH5P:`NPP !5P+N:`"NPP 5PD:8$N((H:`"NPPtp t 0H 4)tH6P(+ +"+NC$$:`"NPP /$5PF 7H:`"NPPtp t 0H d )tH5PGH:`"NPPtp t 0H \ H )tH5P:`"NPP !5P+N:`%NPP 5PD:8$N((H:`%NPPtp t 0H 4)tH6P(++"+NC$$:`%NPP /$5PF7H:`%NPPtp t 0H d )tH5PF7H:`%NPPtp t 0H \ )tH5PF7H:`%NPPtp t 0H \ )tH5PF 7H:`%NPPtp t 0H \ x )tH5PGH:`%NPPtp t 0H \ H )tH5P:`%NPP !5P+N:`&NPP 5PA(H:`&NPPtp t 0H 4)tH6P(+ +"+N'C$$:`&NPP /$5PGH:`&NPPtp t 0H d 8)tH5PF 7H:`&NPPtp t 0H d )tH5PF7H:`&NPPtp t 0H \ )tH5PF7H:`&NPPtp t 0H \ )tH5PZ7"$ $lH:`&NPPtp t 0H \ x )tH5PF7H:`&NPPtp t 0H \ ` )tH5PF7H:`&NPPtp t 0H \ h )tH5PF7H:`&NPPtp t 0H \ p )tH5PGH:`&NPPtp t 0H \ 8 )tH5PGH:`&NPPtp t 0H \ H )tH5PGH:`&NPPtp t 0H \ )tH5PG H:`&NPPtp t 0H \  )tH5P:`&NPP !5P+N:`(NPP 5PD:8&N((H:`(NPPtp t 0H 4)tH6P(+ +"+NC$$:`(NPP /$5PGH:`(NPPtp t 0H d )tH5PGH:`(NPPtp t 0H d 8)tH5PF 7H:`(NPPtp t 0H d )tH5PF7H:`(NPPtp t 0H \ )tH5PF7H:`(NPPtp t 0H \ )tH5PZ7"$ $lH:`(NPPtp t 0H \ x )tH5PF7H:`(NPPtp t 0H \ ` )tH5PF7H:`(NPPtp t 0H \ h )tH5PF7H:`(NPPtp t 0H \ p )tH5PGH:`(NPPtp t 0H \ 8 )tH5PGH:`(NPPtp t 0H \ H )tH5PGH:`(NPPtp t 0H \ )tH5PG H:`(NPPtp t 0H \  )tH5P:`(NPP !5P+N:`)NPP 5PD:8(N((H:`)NPPtp t 0H 4)tH6P(++"+N'C$$:`)NPP /$5PGH:`)NPPtp t 0H d )tH5PGH:`)NPPtp t 0H d 8)tH5PF 7H:`)NPPtp t 0H d )tH5PF7H:`)NPPtp t 0H \ )tH5PF7H:`)NPPtp t 0H \ )tH5PZ7"$ $lH:`)NPPtp t 0H \ x )tH5PF7H:`)NPPtp t 0H \ ` )tH5PF7H:`)NPPtp t 0H \ h )tH5PF7H:`)NPPtp t 0H \ p )tH5PGH:`)NPPtp t 0H \ 8 )tH5PGH:`)NPPtp t 0H \ H )tH5PGH:`)NPPtp t 0H \ )tH5PG H:`)NPPtp t 0H \  )tH5P:`)NPP !5P+N:`*NPP 5PA(H:`*NPPtp t 0H 4)tH6P(++"+NC$$:`*NPP /$5PGH:`*NPPtp t 0H d 8)tH5PF 7H:`*NPPtp t 0H d )tH5PL?7H:`*NPPtp t 0H \ )tH5PF7H:`*NPPtp t 0H \ )tH5PZ7"$ $lH:`*NPPtp t 0H \ x )tH5PF7H:`*NPPtp t 0H \ ` )tH5PF7H:`*NPPtp t 0H \ h )tH5PF7H:`*NPPtp t 0H \ p )tH5PGH:`*NPPtp t 0H \ 8 )tH5PGH:`*NPPtp t 0H \ H )tH5PGH:`*NPPtp t 0H \ )tH5PG H:`*NPPtp t 0H \  )tH5P:`*NPP !5P+N:`+NPP 5PA(H:`+NPPtp t 0H 4)tH6P(+ +"+NC$$:`+NPP /$5PGH:`+NPPtp t 0H d 8)tH5PF 7H:`+NPPtp t 0H d )tH5PF7H:`+NPPtp t 0H \ )tH5PF 7H:`+NPPtp t 0H \ )tH5PZ7"$ $lH:`+NPPtp t 0H \ x )tH5PF7H:`+NPPtp t 0H \ ` )tH5PF7H:`+NPPtp t 0H \ h )tH5PF7H:`+NPPtp t 0H \ p )tH5PGH:`+NPPtp t 0H \ 8 )tH5PGH:`+NPPtp t 0H \ H )tH5PGH:`+NPPtp t 0H \ )tH5PG H:`+NPPtp t 0H \  )tH5P:`+NPP !5P+N:`,NPP 5PD:8*N((H:`,NPPtp t 0H 4)tH6P(++"+NC$$:`,NPP /$5PGH:`,NPPtp t 0H d 8)tH5PF 7H:`,NPPtp t 0H d )tH5PF7H:`,NPPtp t 0H \ )tH5PF7H:`,NPPtp t 0H \ )tH5PZ7"$ $lH:`,NPPtp t 0H \ x )tH5PF7H:`,NPPtp t 0H \ ` )tH5PF7H:`,NPPtp t 0H \ h )tH5PF7H:`,NPPtp t 0H \ p )tH5PGH:`,NPPtp t 0H \ 8 )tH5PGH:`,NPPtp t 0H \ H )tH5PGH:`,NPPtp t 0H \ )tH5PG H:`,NPPtp t 0H \  )tH5P:`,NPP !5P+N:`-NPP 5PA(H:`-NPPtp t 0H 4)tH6P(++"+NC$$:`-NPP /$5PGH:`-NPPtp t 0H d 8)tH5PF 7H:`-NPPtp t 0H d )tH5PL?7H:`-NPPtp t 0H \ )tH5PF7H:`-NPPtp t 0H \ )tH5PZ7"$ $lH:`-NPPtp t 0H \ x )tH5PF7H:`-NPPtp t 0H \ ` )tH5PF7H:`-NPPtp t 0H \ h )tH5PF7H:`-NPPtp t 0H \ p )tH5PGH:`-NPPtp t 0H \ 8 )tH5PGH:`-NPPtp t 0H \ H )tH5PGH:`-NPPtp t 0H \ )tH5PG H:`-NPPtp t 0H \  )tH5P:`-NPP !5P+N:`.NPP 5PA(H:`.NPPtp t 0H 4)tH6P(+ +"+NC$$:`.NPP /$5PGH:`.NPPtp t 0H d 8)tH5PF 7H:`.NPPtp t 0H d )tH5PF7H:`.NPPtp t 0H \ )tH5PF 7H:`.NPPtp t 0H \ )tH5PZ7"$ $lH:`.NPPtp t 0H \ x )tH5PF7H:`.NPPtp t 0H \ ` )tH5PF7H:`.NPPtp t 0H \ h )tH5PF7H:`.NPPtp t 0H \ p )tH5PGH:`.NPPtp t 0H \ 8 )tH5PGH:`.NPPtp t 0H \ H )tH5PGH:`.NPPtp t 0H \ )tH5PG H:`.NPPtp t 0H \  )tH5P:`.NPP !5P+N:`/NPP 5PD:8-N((H:`/NPPtp t 0H 4)tH6P(++"+NC$$:`/NPP /$5PGH:`/NPPtp t 0H d 8)tH5PF 7H:`/NPPtp t 0H d )tH5PF7H:`/NPPtp t 0H \ )tH5PF7H:`/NPPtp t 0H \ )tH5PZ7"$ $lH:`/NPPtp t 0H \ x )tH5PF7H:`/NPPtp t 0H \ ` )tH5PF7H:`/NPPtp t 0H \ h )tH5PF7H:`/NPPtp t 0H \ p )tH5PGH:`/NPPtp t 0H \ 8 )tH5PGH:`/NPPtp t 0H \ H )tH5PGH:`/NPPtp t 0H \ )tH5PG H:`/NPPtp t 0H \  )tH5P:`/NPP !5P pNd<3,px$$tHP(0 0  0 p  x"$ 4Qxt:lpl xt x 0p dl )xpl;lpl xt x 0p dl 0)xpl<7lpl xt x 0p d$$0$`h$$$` $0$h$`$$$`@$p$$`@x`$$$$ ( ($$`px @h @d (`8``0ME "//  8HX` !$*'{Oj+ !$*'{Oj+ A@tfLl0(3Attribute VB_Name = "frmSelectTables" Bas0{0CA0B4B5-75C4-4B76-85A5-9522C66CBB5E}{355827DF-F10C-4FC7-8B9A-AB1A80350A11} dCreat~AFalse PredeclaDId#Tru "E`xpose@TemplateDerivCus tomizD P Sub cmdOk_Click() nFromMVal(tx .ueToToUnload MqEnd: 0* pHdProjectQ(@= l 6]< J< rstdole>stdoleP f%\*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.Tlb#OLE Automati,on^mMSForms>A MSFErms/z pFACF3851D-C41E-4770-866E-3C2EA4E02902 FNT\Syst em32\3.TWD#Microsoft = ` Ob Lib0rary90r?392B9E4-39BA-11D5-BB91E8380F0FDP\HVBE@EX@.E .`M ApNMal "   >( hpx    (50@ Hh0^p$,@.^$*@(X  %0^(%$X%,@h%%.^%$%*@%&  `*^h$&@6X(Z*Y8*Yh*Z(^$$@( ,^0$`(@p2X*Z,Y,Y8,Zh*^$&@ *^$8N&@Hp0Xx(Z*Y*Y*Z0(^`$$@   * * H P X ` h p x   9   . F8( ( 0 :8 (P  ;x   *?   ,?  0  ;8  P  p  x           J J J@ J` J J J D  ! ! " " " " "("H" h" p" x"J"J"J"xX[$T6 <<<< <<<<< <$<(<,<0<4<8<<<@Doc @Fo@]xIintTexture'(fApply)B01i $= Select'€F. If "" ThezExit Sub ElseCEs().AcatEnd IfAA 'define the corr%@sCOrror Res+ NIC@iR= eG3s,(" C"):. .@:Er@r.Numb<> 0L;.Add , wd0TypeParagraph fcBody??,3" c4Av4Compo@t 44m@#t ~4 4r Lx34dlaL?565Msg4hvs4 3#tCourw$ ؅oBold TruGĚSiz8_ nt.("_ .D~.SpaceBe~2PAlignr= L&Lef/1cdW 0/W/W`,]0"V! Us0`Htbba1  O&"m.Arial?.`=?eυbToStatusBama" t (" &&of r1-!blnDAJTruA@Apply{_DoEvSD= With q<(i)G2 K'ch,fp"@6 " to er" g Case .Cell(1, 1).Do AB "Msg By K &~%D D//DXH?676DDKDVD2_DZ1og?Dg 7_DL7Cy 7CCfr7CC"CCCC@CrR_CYC_CC=i?C"?C#wd ?C?C1?C?Cq4& K&&_ w20"Qe = wdLineStyleN@one WidthInsid0vBelowHeaderG& fYstr\FirstRowY"Msg Tabhle m"6M(ore5s 6Body4intTe xture6wd_ 5.H.AlignmentMwd CerhIf .C@olumnsu3 ThenÁ(1).߀2InchesToPoZs(1.5)2330.8PElsem95992]H91U4G5f5X7;QW6+`E 1.c~$H1.7,W0.6$w,(_, o64End IfJUVCasep "UsܟBO ut$SinglU-150pt B f? b0 vC 75q, ̇F10PercO.o;'Qryv1 7'Douzkq' r'4 ' S '#_T_newre }GblnA0pply AFag@v߂= ܂_^ (^E3a&InputU ]#B&3b&&*9Mle&Mth, #&Tr _&YM "<۹M=O -o*j-?=MGLW"  W " WW-[WVo+Obs o+.ObQObObwUo+=Kb[ f/be0..1/b2/be 5edp0.5{6 7 8 }9p106?81o#5MRRCPRbFOB3"FRxsRle~RthOO_X_neRRߪA@/R NreNQQ HQQ;115..1OGQ1UH5Q3oNQl0.QQ!/< Els blnDoFaEnd Sele&c,ϻIf6True Then'formatP borsW@ith .B(wd֟ p.L+ineStyle <> Outside Then .L= ndEnd I"f6If MWixdth(8= 73Color IndexCwd0Auto= +>With .Borde rs(wdRight)1,ˈO.:3Top3 3oOUm3Bottom?4?4B)4oeOx.Inan~Shadow = FalseCell(1, 1).Selecto3`ioTRow!)k.s3Ŧ.aingA.ForegroundPatterndh.BackYWhitp''E7T%'bR b" of hea`= -z[ pC$BelowH<x__[&7O)Qs(@[c@I`Emata.qTru0A'forall NcmP^@ y 10 To buno8rDoEventS y).He!jRuP!q tT_C9.TextuDre intFpirst0AEHReM ?_"bBxBumns'check whether` exisowOn Error Resume N` strTe stE;Q(y, x).Range>..Numb = 0-v'# !_v tGo)0`blnApply s3Y?( `?)= o )_2"28??Ӎ4`)"AttributpabpRq"?y > 1 Apy <ϙ[//'d $ o"|5wdƣNon?l>/o?;,=MsgBox "TBdoes not corr nMs each row!"_O GaX x]ryO 'Q -specific t?@ CaMse .Cell(1, 1).Range.Sty le Ca"Attribute Table Header"\z'8th column must be left alignedjIf4s.Count <> 8 Then0j4MsgBox(does notnta inKs!" @& vbCr"Abort?",YesNo) =<>Exit SubOEnd IfEls+For yE1 To .Ro>w5y, 8Paragraphs.AdmeWwdLh[$= 0LNext yCompon?!6+7 )!*Xy2XXiX6XX X X Y&7"  u/yuຟ '3rdc`|er= 5O# 젱3;;C&< /<S? ?,4ggom_?5_oo__Y ~ ;?_EM`essagUl5;//Йoil?-IUser/IB)%10-3e|$/$$ oo$#HL7[ q/ H69#QryCa`ptionO'yet kno w Select[ WithSiSta@tusBarP"#TsA "Ry!2!P BInsertMsgTableColumn*UWInsertTableColumn$Rj$gotoTablerAdjustGallery%N@Ss.A (3/E 131CAFText2"Group A@(>*4*4*F*Statusu)')5) $"59 _`&upportdicpatort+ C.(@6).Wid]=@ chesToPoints(0.6A !|"a8y5@?6yXdoneY a@ret itgyfift*h(`+D (wd#qsEntirI.dSh@:= a|`K)#&v41.326;2"w  0.5 867-O1N!ic`Box "r y!!ca $p$` z$3"   (8@0HX `7h x : .G' %*?h"4H "VJ BH Bp B B 0 0G8' %,?"4  "VJ B B BH B`   HhlpZ@ ! 'o$. u@a8 $"B@$h ' &!|!' B@xnow format the tables   'rA@  &%|Adj5!5B@5B@h5!Comment7~!(f!(; .Columns(1).Width = InchesToPoints(1xDXB+!<6 <<<< <<<<< <$<(<,<0<4<86]<$*\Rffff*333c5d393c `@33` zx$H$$0&zh @X @H ((D @@ @< @: (8 hx84 x0``Xx( (@ X1@HxxH@Hxxx>XڈZd@6 2f @Js.Add2K%3%!eText&"ComISIEC8($WidX>chesToPoints(1.5)=>G=QS!Ũ'+Fq'P2[2).V7f#n0.654A"q\U@\` @-}\\o'oBwF]% HGT] ?kQJ!BO e8]q] ]0ſ(]ns(]_ZmA;NicMsgBox "ry!! a targetObj\@x"es GI w'w t are we in? 'creVd by Scott Robertsok'2002/01/25 @ s! doc} (borro wed f_Frank OemigD7 AJpa.S=enRefreshh'FE aI@G].Inform(wdWithI~)Ķ^'IxtheCC0olumRozw t)@'next mov o each adod#%# ieDo`SilaB <= ebftatusBar"Checking " & i k@U (iF{A.t)JaˈMsgBox "k # AGDoEa!i + !Loop c% Ins@d`0 Point notiF` `K`.p ,$` nReformatSyntax_VBA_PROJECT6dira__SRP_0&:from Frank@ OemigstrDocS 8. \If "" TheAhExit zqEls] *s().Activknd IfP Apa.S{enres8h =I.In(wdWithInT)J'thG"`Columc R owPCDim msgC} As IellGCDCSet= !s(1jC 'check thatis aMLL+.C@".Range.StylMsg P Header wC'declarhs=vPTempA a@end_of_4 markiVLeft($ , Len) - 2D}`& ipGDo Whi { > 0/ A8k1) <>"aw=&+? -MidgLoopbnow hasGA@aippoxf aMje fix "{[" q`q"[{OE#4*,a#1o+ ,+ q3 'B]}2}]?p RightrE]}b;$"/'addIPr-f02Ochd)uqT cZ((lW- 0)*`4b_,*)1 |='cg+y\#S e0 + $S q$SO)  XQ `|*8 OtrM0wg 12/{Y&{[?? ~K'L >;}?.i 'nNo*Knepsary?E{9?1s?]? ZS|#Q H7dYW:=C[?;7 `Bo0yUnbalancP}[{ p"`^@pc_U{U Z If Len(Trim(strTemp)) < 3 Then  (V = String((intIndentLevel -@ 1) * *Step, " ") + "}]"![Else!uLetft,y2cnd If2=aRigh8n= "]" =v:Check,>[>؀ K )p&iAMsgBox "Unbalanced [ at+ AaCell.Se0lectW Ex@it SubW E{AY2U_XZÀ@ X$')T:ES}bb!"eXr{b !PHbob!b}bdb bb_å bo bbp8! >}y b.*'update SgmSyntaxO With >RangT.DtInsertAfterQ + Next{ u.no  msg table 'ends t@est thathis a m@essageC  uc ion po`vQin aXOu`"d  @  H  h x xX+,<<<<<< <<<<< <$<<(<0<4<86]< `T@Nw` zpOwx$$$ `@**`x`.p ,$` n *t$H0(h @X @hPT @D H@ H@< @8 P@4 @$ $( @ `t(&pp @` \ @X T ME?X "H   (8@5HX `7h x >  "hpx   @ P 2X  5  -  ( 8  8P;&: , 2   (+ HP lpZ@ ! ' ` u@a8 $"B@$h ' &!|!' B@x  &%|B@J tab   5!5B@HL7 Table Header7~!(Comment7~!(f7!?$z ?$z7(h(; .Columns(1).Width = InchesToPoints(1.2); .Columns(2).Width = InchesToPoints(1.7)< .Columns(3).Width = InchesToPoints(0.65); .Columns(4).Width = InchesToPoints(1.2)hh7~!!User Table Header5!5B@schUser Table Header7~!(Comment7~!(fX7!?$z ?$z7(h; .Columns(1).Width = InchesToPoints(1.2); .Columns(2).Width = InchesToPoints(1.7)< .Columns(3).Width = InchesToPoints(0.65)St; .Columns(4).Width = InchesToPoints(1.2)tnahhn what table are we in?created by Scott Robertson 2002/01/25+select document (borrowed from Frank Oemig) ! ' u8a0 $"B@$h B@"are we in a table? & %$select the table B@( B@ Z1next move to each table and match to target table'   &!|!_Checking table ', . *Table # A@@qh  ' aInsertion Point not in a tableA@@hlxpZPZZZhX .*"  &%|..Attribute VB_Name = "gotoTable" Option Explicit Pub, Sub () Dim i As Integer*str(Doc4Sng2 = Select'ument. +If ."" Thena~ExitElseUs(?).ActivatEnd If p$nFrom̀1" ToeTs.Coun] Ran|gee)&(A)NS What* S{Oj+BfL`{Oj+2ww`82ww`8 qAөGD=oHp9| kv J| kv JW(c8OZoTgj|ϪF鹐Ydk as=dimCEachHendifQexplicitRfSFalseUFor`IfcInoptionpublicsetSubThentruewith Wordk VBAWin16~Win32MacV2.4 Style Guide - 8e stdole`MSFormsC ThisDocument< _EvaluateNormal(Officeu Project-Modul1( AdjustAllFormatsJstrDoc( SelectDocument_ DocumentsActivate|ActiveDocument\WhatC wdGoToLine9Which wdGoToFirst  AdjustFormatEAdjustFormatHeading3AdjustFormatIndexAdjustFormatTables3AdjustFormatTOCAdjustFormatListsRAdjustFormatFooterHeaderAdjustFormatQueryռMsgBoxRstrFontx TestStyle wdStyleNormalwdStyleTypeParagraph StyleSetFont<Styles pFontUItalic!KerningB BaseStyleParagraphFormat SpaceAfter( SpaceBeforeLineSpacingRulepwdLineSpaceSinglew LineSpacing LinesToPointss RightIndent( LeftIndentiFirstLineIndent     & !"#$%'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMmQgST^VWXYZ[\]O_`abcdefPhijkopqstuvwxyz{l}~x6X"*R@@6  %0(B %0(D?$z %0(F?$z %0(H Normal List Alpha &%LB@Y.Lists(2).ApplyListTemplate ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(2)NUMBERED LISTS $$%(.  %0(j%1) %0(2?$z %0(4 8 %0(6 J %0(:Normal List Numbered &%L!@ %0(> %0(B %0(D?$z %0(F?$z %0(H Normal List Numbered &%LB@ ROMAN LISTS $$%(.  %0(j%1) %0(2?$z %0(4  %0(6 J %0(:Normal List Roman &%L!@ %0(> %0(B %0(Dffffff?$z %0(Fffffff?$z %0(H Normal List Roman &%LB@Y.Lists(1).ApplyListTemplate ListTemplate:=ListGalleries(wdNumberGallery).ListTemplates(1)nZHEmanaging styles like "Normal Numbered List" to "Normal List Numbered"is still missing ! '& *u@a8 $"B@$h 8`Attribute VB_Name = "AdjustGallery" Sub L() Dim strDoc As Sng2 6= S electNum0ent. +IfJ" ThenhExit aElseUs(n).Activat#End If 1Wit4h  e8 'ALPHA LIS TSm9$mTextI&&.ToA)%b*:=j!#'NUMBERED?r=b ?r$r2_"?r?rz#_?r@,#?22J# ^.rArabic. Y qq qCedqe(qf,q zq1.1OO{qq> H'qn!S'ROMAN8q>8yq?edvbpqqz\8* ty8qO%s~8er2UppqRoma?9 ?9= qBog?9v&qst " 9ρw 9Faꜯ99(1.49S#9{9lPZ8qg8Ѭ1 " xXX@ (<<~6 <6]<$*\Rffff*353c5d393c8 0` 2X$ 4x$`6`8(`:`<`>L0(6 E$ME8 " 2 @ ` p 2x     0 @ PX `  (x.   $(*P   F    ( HX 6x  40H >P  6 >  <8x::P`px:  "0 8X`hpx"  (*@p"x    8 H P X *p  "       @  H  h x   *  "       0 @  H X  `  h x  .  , & 0 H +reformats syntax for selected message tablecreated by Scott Robertson 2002/01/25+select document (borrowed from Frank Oemig) ! ' u(a $"B@$h B@" & %$select the table B@( B@Z@Z` %.2"check that this is a message table 2%!!Msg Table Header declarationsZZZZZinitializations':set indent level to 1'<set each indent to 2 spacesmove through the cells( @ 2! ?ignore the message identifier eg OMG^O10^OMG_O10, pattern ???^* @!???^* '6copy the cells contents @!'8 formatting 8',/remove the trailing and end_of_cell marker 8 8 $'8 strip spaces 8 _ 8$ F 6 8$ '6g%1) 8$'88strTemp now has the cell contents stripped of all spacesfix "{[" to "[{"rm 6${[F[{ 6$ '6g fix "]} to "}]" 6$B]}F 6 6 $}] '6gff6add indentation and check for indentation level changen 6$[{ :  < $^[{ 6$ '6mberGa : ':pl >[{ '>a 6$[ :  < $^[ 6$ '6" : ': m >[ '>a 6${ :  < $^{ 6$ '6 : ': >{ '>a :  : < $^ 6 '6a no indentation necessary?hhhh 6$B}] : ': >$B[{ > > $'>a Unbalanced [{ at 6 A@@ @B@Juh 6$D :  < $^}] '6a 6 6 $}] '6hXaP 6$B] : ': >$B[ > > $'>aUnbalanced [ at 6 A@@ @B@Juh 6$D :  < $^] '6aX 6 6 $ ] '6h(h  6$B} : ': >$B{ > > $'>aUnbalanced } at 6 A@@ @B@Juhx 6$D :  < $^} '6a( 6 6 $ } '6hhhupdate SgmSyntax @!C@ 6C@Fnh @anot a msg tableA@@h &ends test that this is a message tablea(!Insertion point is not in a tableA@@hend test that this is a tablel(Attribute VB_Name = "ReformatSyntax" Option Explicit Sub ()H 'r|s s selected message table 'creaby Scott Rob@ertson2002/01/25 E document (b orrowV_ AlignmentIwdAlignParagraphLeftW KeepWithNext WidowControlx OutlineLevel՚wdOutlineLevelBodyTextStyleSetNoBordero%wdStyleNormalIndentInchesToPointsIwdStyleDefaultParagraphFontwdStyleTypeCharacter_wdStyleFootnoteText=EBordersC" wdBorderLeft  LineStylewwdLineStyleSingle LineWidth/UwdLineWidth025pt wdBorderRight wdBorderTopmwdBorderBottomTabStopsBClearAll AddrPositionwdAlignTabLeft#>wdStyleBodyText wdStyleHeader;$wdAlignTabRight wdStyleFooterwdStyleHeading1A?wdAlignParagraphRight0wdOutlineLevel1wdStyleHeading2B?AllCapss_wdOutlineLevel2wdStyleHeading3C?wdOutlineLevel3wdStyleHeading4D?wdOutlineLevel4wdStyleHeading5E?wdOutlineLevel5wdStyleHeading6F?wdOutlineLevel6wdStyleHeading7G?wdOutlineLevel7wdStyleHeading8H?wdOutlineLevel8wdStyleHeading9I?wdOutlineLevel9 listenvorlage  ListTemplateRwdAlignParagraphCenterl Underline wdStyleTOC16 wdStyleTOC26 wdStyleTOC36 wdStyleTOC46 wdStyleTOC56 wdStyleTOC66 wdStyleTOC76 wdStyleTOC86 wdStyleTOC96 wdStyleIndex1; wdStyleIndex2< wdStyleIndex3= wdStyleIndex4> wdStyleIndex5? wdStyleIndex6@ wdStyleIndex7A wdStyleIndex8B wdStyleIndex9CstrStylea^ *\G{000204EF-0000-0000-C000-000000000046}#3.0#9#C:\PROGRAMME\GEMEINSAME DATEIEN\MICROSOFT SHARED\VBA\VBA332.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.0#409#C:\PROGRAMME\MICROSOFT OFFICE\OFFICE\MSWORD8.OLB#Microsoft Word 8.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.Tlb#OLE Automation*\G{ACF3851D-C41E-4770-866E-3C2EA4E02902}#2.0#0#C:\WINNT\System32\MSForms.TWD#Microsoft Forms 2.0 Object Library*\G{A392B9E4-39BA-11D5-BB91-0000E838F0FD}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.EXD#Microsoft Forms 2.0 Object Library.E .`M *\CNormal*\CNormal+;*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.0#0#C:\PROGRAMME\MICROSOFT OFFICE\OFFICE\MSO97.DLL#Microsoft Office 8.0 Object Library6]<  XThisDocument 1f3c5d804c*DZCopyStyles 293c5d393c*DR8,&AdjustChapterNumber 2a3c5d393c*DJ0 SelectTableRange 83c5d804c*DY$pFormatText 2c3c5d393c*DN`frmChapterNo 163c5d804c*D{xg frmDocuments 1b3c5d804c*Dt  frmHL7FormatText 183c5d804c*Dm5GetAllFormats 2e3c5d393c*D,o/SelectChapterNo a3c5d804c*D aSelectDocument 63c5d804c*D chTestModul1 c3c5d804c*DHeTestModul2 e3c5d804c*DPg  AdjustAllFormats 43c656c8f*Do${frmSelectTables 1a3c5d804c*DW$Xs FormatTables 23c654d96*DT[$HT(InsertMsgTableColumn 323c5d393c*D"InsertTableColumn 333c5d393c*DB+!gotoTable 123c5d804c*D+ AdjustGallery 343c5d393c*D"*ReformatSyntax 353c5d393c*D0X@( 80`XpHxfL`{Oj+bA~ƃkfL`{Oj+2ww`8fL`{Oj+$fL`{Oj+-fL`{Oj+6fL`{Oj+8fL`{Oj+:fL`{Oj+fL`{Oj+@fL`,blnBold?nSize}BoldSizenStyle)ErroNumber- ( DeleteStylesi` ParagraphsfCount0vStylepDeletexSetStyleQueryStandardsStylexI(AdjustChapterNumber( strChapterE strFormatV( SelectChapterNoQ errHandler } ListGalleriesRwdOutlineNumberGallery1 ListTemplates4ValStrAsc!u ListLevels  NumberFormatRNumberPosition NumberStylewdListNumberStyleArabic*TrailingCharacterwdTrailingNone LinkedStyleG; NameLocal ResetOnHigherZStartAt$ TabPositionV) TextPositionU wdTrailingTabtContentl ListFormat4JApplyListTemplate8 Description  (FormatTablesblnDocl StyleInsideStyleBelowHeadera6 StyleOutsideZ WidthInside5WidthBelowHeader WidthOutside_<strStyleFirstRow strStyleMoreRows> strTestStyleWxoylintTextureFirstRowintTextureMoreRowsblnApplyStyleswdLineWidth150ptwdLineWidth050pt wdTexture10PercentUe wdTextureNone%TablesCellRange wdLineStyleDouble}RowsUwdAlignRowCenterColumnsp9wdLineStyleNonewdLineWidth075pt$wdAlignRowLeftb ColorIndexwdAutoKVInsideLineStyle]Shadow SelectionZ SelectRowCellsShadingA ForegroundPatternColorIndex^BackgroundPatternColorIndex~wdWhitex HeadingFormat HeightRulewdRowHeightAutoQsTexturevbCr$vbYesNovbYesa? (FormatTexth frmHL7FormatTextVShow frmChapterNoI cmdOk_Click( strSelectedChapterny cboChapterNoEVValueKUserForm_Initialize5cAddItem  frmDocumentscmdClose_Click!P( strSelectedDocumentb cboDocuments einDokument[intTypeintWhatcmdApply_Click/Apply,cmdCancel_Click\cmdExpandLeft_Click; MoveStart}unit wdCharactercmdExpandRight_ClickXMoveEnd* cmdNext_ClickpFindNextuFindnClearFormatting) ReplacementForwardWrapWywdFindContinueBP MatchCaseMatchWholeWordXMatchWildcardsMatchSoundsLike0MatchAllWordFormsExecuteYreplacef wdReplaceNone1Found+txtText ProposeFormatncmdShrinkLeft_Click&/cmdShrinkRight_Clickm optBold_ClickoptDataElement_Click_optItalics_ClickHoptRemove_ClickIoptRemoveData_ClickoptTableHL7_Click VoptTableUser_Clickl optItalicsloptDataElementzpstrTextUCase5  optTableHL7 optTableUser (GetAllFormatsZ% WordBasic endofdocument InsertLine?GetName<wdAlignParagraphJustifynIndent}?strLineInsertrChrK~ insertpara, fldDocumentse FormFieldobjForm_R TestModul1hh test4ja TypeParagraph  TestModul2i (CopyStylesvCmain,QryTableDocumentj Bookmarks?nCopyƿItemzUserFormNcmdClosejcmdOk'Click InitializeN_B_var_einDokument_M _B_var_Sub (CopyStyleي_B_var_CopyStyle cmdCancelcmdNextcmdApplylblTextY lblSearch1! lblSearch2"Frame1optBold~+Frame2 lblReferenceFrame3 cmdExpandLeftFcmdExpandRightּFrame4 cmdShrinkLeft+cmdShrinkRight( optRemove optRemoveDatakAX _B_var_Style4tylesZpali$tFirstLineIndwnt _B_var_Str _B_var_LeftQ _B_str_UCaseK _B_var_Chr\;_B_var_listenvorlage _B_var_IfPwdStyledefaultparagraph _B_var_forjL_B_var_x_B_var_TabStops˛ ctiveDocument _B_var_ctiveDocument frmSelectTables+K (nTableFromf txtTableFromd (nTableTo: txtTableTo\(SelectTableRange &Label1,Label2, GetTableNoMmsgQ _B_var_msgbr _B_var_strDoc7p_B_var_i break _B_var_blnDoP0_B_var_blnApplyStyles(InsertTableColumn{InsertTableColumns֘(InsertMsgTableColumns. InsertMsgTableColumnColumniColum GColu2ColHCo\CZ SmallCaps~c_B_var_Columns< (gotoTable$wdNumberGallerywdBulletGallery{wdListNumberStyleBulletwdListNumberStyleLowercaseRoman> _B_var_set _B_var_WithYtkned _B_var_neduLinkToListTemplatewdListLevelAlignLeft' wdListNumberStyleLowercaseLetterNextParagraphStyle (AdjustGallerywdListNumberStyleUppercaseRomandDeleteCellsEntireColumn~_B_var_dDeleteCellsEntireColumn\ ShiftCells(wdDeleteCellsShiftLeftrwdDeleteCellsEntireColumnA (WhatTableۼ Application* ScreenRefreshA  Information wdWithInTableT SelectColumnR targetObject StatusBarʜ testObject\(ReformatSyntaxSmsgSyntaxColumn msgSyntaxCell`strTempMchrTempyintIndentLevelw intIndentStepostrIndentCheck'{aCellRight Trim@ InsertAfterq5_B_var_targetObject_B_var_testObject testObjet6 _B_var_Objectj PageSetup BottomMarginu TopMargini LeftMargin] RightMargin[GutterVHeaderDistanceSFooterDistancekAdjustCharacterFormatsWendwith; _B_var_EndF wdstylebasenwdstyletypecharaterwdStyleHyperlink8P3!  - U( #I 0 -! .Q /S121$48z@@@@@ pNDLap + ,C +;OfficO~fic G{2DF8D04C-5BF=01B-BHDE5=AA4]PROGRAMMeoL$p6#bU-O0(S6UfSms]W$SmF>]@FFU5]T5[sInsertMsgColum ntmn2Uq IP|sp'rp]MgeCp(ln2n(}f* o 2nm 73@B+go$tor2k\pto0o9__ȜU0GalleryuW$3Vy0G|l2OrЎ,="*;LReftSyntax;S>R0feSPMa~@(X>rU~~~~~~~~~~~~~~~~~~~~~~~Q    a ) )(  8 )A"He RCP Header Qry Table RCP< F; Fu FJ F: FP F Ready!!  S  0Table does not correct number of cells each row! +Attribute Table does not contain 8 columns!   Abort?X F +Component Table does not contain 7 columns! )Message Table does not contain 3 columns! JJrK JJrK JJrK JJrK JJrKȏ[qJ eUserForm JJrK F3Dynamic AP{lFWJOcmdClose!-6S` `cmdOk2ҋB ` cboDocumentscmdClose_Click cmdOk_ClickUserForm_Initialize LShowName3ҋB ` JJrK JJrK JJrK FDocument @#=h8+3q G?,2qL )! JJrK JJrK JJrK JJrK JJrKҋB ` txtTableTo JJrK "A"-?@Label1Label2 txtTableFrom T txtTableFrom txtTableTo  E ҋB ` >^*v J >^*v J >^*v J >^*v J >^*v J >^*v J %Ah >^*v J >^*v J >^*v J >^*v J >^*v J >^*v J >^*v J >^*v J >^*v J Q'AInsertTableColumn +Component Table does not contain 8 columns!Modul1 GetTableNo>M3}^ HVNQ;pv@ r`wFJʟ>;q*FCyVŒ~ DF-yͽ )A0D3+E@`'yuMgXV@E HKtT[IB*܃P1|˱AN8[&CYSeD 0 Then .Styles.Add , wdStyleTypeCharacter , wdStyleTypeParagraph .Styles( ).Font.Name = " " ).Font.Bold = ).Font.Size = ).Font.italic = ).Font.Kerning = ).BaseStyle = " (%8) ).ParagraphFormat.SpaceAfter =  ).ParagraphFormat.SpaceBefore =  ).ParagraphFormat.LineSpacing =  ).ParagraphFormat.RightIndent =  ).ParagraphFormat.LeftIndent =  $).ParagraphFormat.FirstLineIndent =  wdStyleNormal (%6) 2).ParagraphFormat.Alignment = wdAlignParagraphLeft 3).ParagraphFormat.Alignment = wdAlignParagraphRight 4).ParagraphFormat.Alignment = wdAlignParagraphCenter 5).ParagraphFormat.Alignment = wdAlignParagraphJustify  ` 0 !).ParagraphFormat.KeepWithNext =  !).ParagraphFormat.WidowControl =  !).ParagraphFormat.OutlineLevel =  $).Borders(wdBorderLeft).LineStyle =  $).Borders(wdBorderLeft).LineWidth =  %).Borders(wdBorderRight).LineStyle =  insertpara %).Borders(wdBorderRight).LineWidth =  #).Borders(wdBorderTop).LineStyle =  #).Borders(wdBorderTop).LineWidth =  &).Borders(wdBorderBottom).LineStyle =  &).Borders(wdBorderBottom).LineWidth =  End With End SubInsert (%7) wdStyleNormalIndent wdStyleDefaultParagraphFont wdStyleBodyText wdStyleHeader wdStyleFooter wdStyleFootnoteText wdStyleHeading1 wdStyleHeading2 wdStyleHeading3 wdStyleHeading4 wdStyleHeading5 wdStyleHeading6 wdStyleHeading7 wdStyleHeading8 wdStyleHeading9 wdStyleIndex1 wdStyleIndex2 wdStyleIndex3 wdStyleIndex4 wdStyleIndex5 wdStyleIndex6 wdStyleIndex7 wdStyleIndex8 wdStyleIndex9 wdStyleTOC1 wdStyleTOC2 wdStyleTOC4 wdStyleTOC5 wdStyleTOC6 wdStyleTOC7 wdStyleTOC8 wdStyleTOC9 F F F   x  e  A %A. %1. F F F %2 %2.%3 (%5) (%9) F;| kv J| kv J<| kv J | kv J| kv J cboChapterNo=| kv J IeA H 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 B C D E gotoTable Normal List Roman Symbol  %1 %a) %i AdjustGallery ListLevels Alignment %1) NumberFormatNumberPosition NumberStyle TrailingCharacter LinkedStyle ResetOnHigherStartAt TabPosition TextPosition#%|I|^eڎNck0Z#jD x(tK#UP쉤L@By]X5Cy{\/ lA!^B!WE47+`VEԯQpi/BG:InsertMsgTableColumns Status CopyStyle Component Table CaptionPositionmpLчimKlF9C͉2ex g@_rDJ`Q0.MP楓Wɴ*;KڠS#}A]9 lblSearch1 lblSearch2 oA,GtVm#o~;HtaJ271-^LĠc*82{sBFE! @n*GL}F8Gn/t )qAX| րGXH;/zUతF*flz#A6Gհxח 5cAFy l-{ M~fQkt5Kס # qrA0RҋB ` optItalicsoptDataElement optTableHL7 cmdCancelcmdNextcmdApplylblText?F`Frame1optBoldFrame2 lblReferenceFrame3 cmdExpandLeft optTableUsercmdExpandRightFrame4 cmdShrinkLeftcmdShrinkRight optRemove optRemoveDatatxtTextcmdApply_ClickcmdCancel_ClickcmdExpandLeft_ClickcmdExpandRight_Click cmdNext_ClickFindNextApplycmdShrinkLeft_ClickcmdShrinkRight_Click optBold_ClickoptDataElement_ClickoptItalics_ClickoptRemove_ClickoptRemoveData_ClickoptTableHL7_ClickoptTableUser_Click ProposeFormat  F F  i @ Reference Reference Attribute Reference HL7 Table Reference User TableCҋB `   X TABLE HL7test Test listenVorlage.ListLevels( ).Alignment = ).NumberFormat = " ).NumberPosition = ).NumberStyle = ).TrailingCharacter = ).LinkedStyle = ).ResetOnHigher =  ).StartAt = ).TabPosition = ReformatSyntax ).TextPosition =  Indent NormalW F MsgHeader MsgStructure Attribute Table Heading HL7 Table Heading Normal Bullets List Normal Numbered List Normal Alpha List )Message Table does not contain 5 columns!p F Checking table  Table #  Insertion Point not in a tableu`KU7h5I]-Bn("J7nIDST06S5'N.X]jW9 H6ds_gH" "w A( q{M]So>C,\Jgeh1GH!(r2#:aBWu0f~$8i@ >/JCk)DKsћCQ@ /Nu' A u"IJ `E@U0LNn~tOӿK-/8ra@K%B ~wKF{LkZg==LA )A8 !yE;v'JE23CWAdjustCharacterFormatsq F5__SRP_1zfrmChapterNoNH+Mנּfo*,l "X ) #h %x y' ) +strStylestrFontblnBoldnSizenStylesStyle )1 2nIndentstrLinei qe l p Qq r )r( ) t8 9H X Qh{$H @} X( AH,g {5Tahoma(Okg {uTahoma8cboChapterNo$4cmdOk CompObj-aVBFrame2frmDocuments0נּ f Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmChapterNo Caption = "Select Chapter Number" ClientHeight = 1425 ClientLeft = 45 ClientTop = 330 ClientWidth = 2130 StartUpPosition = 1 'CenterOwner TypeInfoVer = 5 End $  }t V R KQDBTahoma( 8cboDocuments{$8cmdClose]$4cmdOkose{AH,{5Tahoma(Closea; {uTahoma(Okg {uTahoma Microsoft Forms 2.0 FormEmbedded Object9qo/1CompObj2aVBFrame,frmHL7FormatText": VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmDocuments Caption = "Select Document" ClientHeight = 1500 ClientLeft = 45 ClientTop = 330 ClientWidth = 4710 StartUpPosition = 1 'CenterOwner TypeInfoVer = 6 End $  8}4+6"R KQDBTahoma ( 8cmdCancelme.? (Closea {uTahoma(oCElCompObjpCompObjGaVBFrameGf+o46i088 n``  fo;=CompObjpi16@ n``ހހflblSearch1e.{$#Frame1ty $ #Frame2ty  , 2LlblReference $# Frame3tyu$# Frame4tyuE Microsoft Forms 2.0 FormEmbedded Object9qSVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmHL7FormatText Caption = "Format Text in HL7 Standard Documents" ClientHeight = 4965 ClientLeft = 45 ClientTop = 330 ClientWidth = 6270 StartUpPosition = 1 'CenterOwner TypeInfoVer = 56 End 3456789:;<=>@   } $(Okg {uTahomaty(Rangeaty{5TahomatyH,{5TahomatyH,{5frmSelectTables .3Jf oIKCompObjLaTahomaty(-OL5Tahomadd 4cmdOk (28Label1{( 4txtTableFrom ( 4txtTableToom(24Label2TUVWXYZ[\]^_` Microsoft Forms 2.0 FormEmbedded Object9qz{|}~VBFrame.PROJECTwmPROJECTMcCompObjPjVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSelectTables Caption = "Select Tables" ClientHeight = 1395 ClientLeft = 45 ClientTop = 330 ClientWidth = 3645 StartUpPosition = 1 'CenterOwner TypeInfoVer = 11 End MmThisDocumentThisDocumentAdjustChapterNumberAdjustChapterNumberFormatTextFormatTextfrmChapterNofrmChapterNofrmDocumentsfrmDocumentsfrmHL7FormatTextfrmHL7FormatTextGetAllFormatsGetAllFormatsSelectChapterNoSelectChapterNoSelectDocumentSelectDocumentTestModul1TestModul1TestModul2TestModul2CopyStylesCopyStylesAdjustAllFormatsAdjustAllFormatsfrmSelectTablesfrmSelectTablesSelectTableRangeSelectTableRangeFormatTablesFormatTablesInsertMsgTableColumn     Nextq{uTahomaH,? 5Tahoma(Applya{uTahoma( found Text:5Tahoma( Search for:5Tahoma,(Found Text is a Reference toq n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q0Fa0OLbolded5InsertMsgTableColumnInsertTableColumnInsertTableColumngotoTablegotoTableAdjustGalleryAdjustGalleryReformatSyntaxReformatSyntax-ID="{D6E0834F-4C66-11D4-B060-ABD67B4F6A2B}" Document=ThisDocument/&H00000000 Module=AdjustChapterNumber Module=FormatText Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=frmChapterNo BaseClass=frmDocuments BaseClass=frmHL7FormatText ModuleTahoma0F4a0OLitalized5Tahoma(TextaX5Tahoma(H  }$ PoptBoldd( PoptItalicstO, 24lblSearch2t { n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q4F  0OLData Element5Tahoma<F a0OLHL7 defined Table5Tahoma<F a0OLUser defined Table5Tahoma8F g {0OLRemove Format5Tahoma4F g 0OLRemove Dataa5Tahoma(H   }: ,Root Entry F`y%EXData -1Table~+WordDocumentw# ToptDataElement"( \optTableHL7eO( \optTableUser( XoptRemoveserE, ToptRemoveDatat" 5Tahoma n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q(LeftuTahoma(=GetAllFormats Module=SelectChapterNo Module=SelectDocument Module=TestModul1 Module=TestModul2 Module=CopyStyles Module=AdjustAllFormats BaseClass=frmSelectTables Module=SelectTableRange Module=FormatTables Module=InsertMsgTableColumn Module=InsertTableColumn Module=gotoTable Module=AdjustGallery Module=ReformatSyntax Name="Project" HelpContextID="0" CMG="5755A774E9941E981E981E981E98" DPB="888A787B797B797B" GC="B9BB49AA4AAA4A55" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E4RightauTahoma@H  }Expand SelectionR KQDBTahomad, 4cmdExpandLeft,8cmdExpandRightq n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q(LeftuTahoma(RightauTahoma@H  }Shrink SelectionR KQDBTahomad, 4cmdShrinkLeft,8cmdShrinkRightq(74cmdNext$4txtText &$8cmdApply (2<lblTexty', 2<3-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=110, 110, 716, 550, C AdjustChapterNumber=69, 37, 804, 638, C FormatText=110, 110, 716, 550, C frmChapterNo=0, 0, 0, 0, C, 110, 110, 899, 598, C frmDocuments=0, 0, 0, 0, C, 154, 154, 943, 642, C frmHL7FormatText=0, 0, 0, 0, C, 198, 198, 987, 686, C GetAllFormats=75, 48, 804, 638, C SelectChapterNo=176, 176, 782, 616, C SelectDocument=0, 0, 606, 440, I TestModul1=66, 66, 672, 506, C TestModul2=88, 88, 694, 528, C CopyStyles=39, 248, 766, 616, C AdjustAllFormats=13, 37, 811, 661, Z frmSelectTables=88, 88, 694, 528, C, 22, 22, 603, 417, C SelectTableRange=154, 154, 760, 594, C FormatTables=44, 44, 783, 614, InsertMsgTableColumn=132, 132, 738, 572, InsertTableColumn=87, 76, 826, 660, gotoTable=22, 22, 628, 462, AdjustGallery=0, 0, 778, 578, ReformatSyntax=66, 66, 672, 506,   FMicrosoft Word-Dokument MSWordDocWord.Document.89qObjectPool%E%E