NoPaste

rg.rtm

von letzter3

SNIPPET_TEXT:
  1. object Report: TppReport
  2.   AutoStop = False
  3.   DataPipeline = daADOQueryDataView1.Behandlungen
  4.   PassSetting = psTwoPass
  5.   PrinterSetup.BinName = 'Default'
  6.   PrinterSetup.DocumentName = 'Rechnung'
  7.   PrinterSetup.PaperName = 'A4'
  8.   PrinterSetup.PrinterName = 'Default'
  9.   PrinterSetup.SaveDeviceSettings = False
  10.   PrinterSetup.mmMarginBottom = 12000
  11.   PrinterSetup.mmMarginLeft = 20000
  12.   PrinterSetup.mmMarginRight = 25000
  13.   PrinterSetup.mmMarginTop = 20000
  14.   PrinterSetup.mmPaperHeight = 297000
  15.   PrinterSetup.mmPaperWidth = 210000
  16.   PrinterSetup.PaperSize = 9
  17.   Template.FileName = 'C:\Users\HP\Documents\SoliPrax\Reports\RG.rtm'
  18.   Template.Format = ftASCII
  19.   Units = utMillimeters
  20.   ArchiveFileName = '($MyDocuments)\ReportArchive.raf'
  21.   DeviceType = 'Screen'
  22.   DefaultFileDeviceType = 'PDF'
  23.   EmailSettings.ReportFormat = 'PDF'
  24.   Icon.Data = {
  25.     0000010001002020000001002000A81000001600000028000000200000004000
  26.     000001002000000000008010000000000000000000000000000000000000FFFF
  27.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  28.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  29.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  30.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  31.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  32.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  33.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  34.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  35.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  36.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  37.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  38.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  39.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  40.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  41.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  42.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  43.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  44.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  45.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  46.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  47.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  48.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  49.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  50.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  51.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  52.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  53.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  54.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  55.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  56.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  57.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  58.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFB2EB
  59.     FFFF83DFFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDE
  60.     FFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDE
  61.     FFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDEFFFF7DDE
  62.     FFFF7DDEFFFF83DFFFFFBAEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDAF5
  63.     FFFF06C1FFFFE8F9FFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFA
  64.     FFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFA
  65.     FFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFAFFFFECFA
  66.     FFFFE3F8FFFF00BEFFFFEAF9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  67.     FFFF9DE6FFFF7DDEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  68.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAF9
  69.     F9FFF8F8F8FFFFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  70.     FFFF50D3FFFFB3ECFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFE
  71.     FFFFFFFFFFFF19C5FFFFCDF2FFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  72.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  73.     FFFF888888FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFFFFFFFFFFFF
  74.     FFFFF9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFEFEFEFFFFFFFFFFFFFF
  75.     FFFFFFFFFFFFF5FCFFFF23C7FFFFFFFFFFFFFFFFFFFFEEE7E6FF855149FF905F
  76.     57FFF8F6F5FF865148FF966962FFFDFCFCFF986B63FFC2A8A4FF9A6D65FFFDF9
  77.     F9FF747474FF666666FFC9C9C9FFDBDBDBFFB7B7B7FFFFFFFFFF7A7A7AFFA2A2
  78.     A2FF939393FF9B9B9BFFE8E8E8FF828282FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  79.     FFFFFEFEFFFFFFFFFFFF88E1FFFF5BD5FFFFFFFFFFFFFEFEFEFFEAE0DFFF8854
  80.     4BFFD6C6C3FFB69792FFDECFCDFFBEA29DFF9B7068FFF0E9E8FFBEA19DFFF2EC
  81.     EBFF868686FFF3F3F3FF646464FFFEFEFEFF8F8F8FFFFFFFFFFF646464FFFFFF
  82.     FFFF7E7E7EFFFDFDFDFF808080FFA6A6A6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  83.     FFFFFFFFFFFFFEFEFFFFFFFFFFFF38CDFFFFDEF6FFFFFFFFFFFF9D736BFFE5D9
  84.     D8FFFFFFFFFF976961FFDFD1CFFFA27973FFBB9E99FFD0BDB9FFD2BDBAFFC8B0
  85.     ACFFAAABABFFA2A2A2FF737373FFF6F6F6FF7B7B7BFFCECECEFF9C9C9CFFDFDF
  86.     DFFF868686FFFFFFFFFF767676FF8B8B8BFFEDEDEDFFD3D3D3FFBDBDBDFFFFFF
  87.     FFFFFFFFFFFFFFFFFFFFFEFEFFFFEAFAFFFF09C1FFFFFBFEFFFFE7DCDBFFA57E
  88.     77FFF6F2F1FFE7DCDAFFA78079FFF0EAE9FFE0D3D0FFB2918BFFBEA29DFFC3A9
  89.     A4FFDDDEDEFFBEBEBEFF9E9E9EFFFFFFFFFFD8D8D8FFC8C8C8FFFFFFFFFFA3A3
  90.     A3FFC6C6C6FFFEFEFEFFC3C3C3FFEDEDEDFFC2C2C2FFF3F3F3FFC3C3C3FFFFFF
  91.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9DE6FFFF77DDFFFFFFFFFFFFFFFF
  92.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9A6D65FFFAF8F7FF834E
  93.     45FFF9F7F7FFFFFFFFFFFFFFFFFFFEFEFFFFFDFEFFFFFFFFFFFFFFFFFFFFFFFF
  94.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  95.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFFFFFFFFFFFF2CCAFFFFC0EFFFFFFEFE
  96.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFBFBFFFFFFFFFFF9F6
  97.     F6FFFFFFFFFFFFFFFFFFFFFFFFFF96E4FFFF53D3FFFFFFFFFFFFFFFFFFFFFFFF
  98.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  99.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFFFFEDFAFFFF1CC6FFFFFFFF
  100.     FFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  101.     FFFFFFFFFFFFFFFFFFFFF7FCFFFF19C5FFFFFCFEFFFFFEFEFFFFFFFFFFFFFFFF
  102.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  103.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9FE7FFFF57D5
  104.     FFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  105.     FFFFFEFEFFFFFFFFFFFF29C9FFFFD1F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  106.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  107.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFFFFFFFFFFFF33CC
  108.     FFFFD9F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  109.     FFFFFFFFFFFFA5E8FFFF64D7FFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFF
  110.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  111.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1FB
  112.     FFFF12C3FFFFF7FDFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFE
  113.     FFFFE1F7FFFF17C4FFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  114.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  115.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  116.     FFFF98E5FFFF62D8FFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFEFEFFFFFFFF
  117.     FFFF2FCAFFFFCBF2FFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  118.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  119.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFE
  120.     FFFFFFFFFFFF3DCEFFFFC0EFFFFFFFFFFFFFFFFFFFFFFEFEFFFFFFFFFFFF83E0
  121.     FFFF7BDEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  122.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  123.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  124.     FFFFFEFEFFFFF2FCFFFF0CC2FFFFFFFFFFFFFEFEFFFFFEFEFFFFEFFBFFFF18C5
  125.     FFFFFFFFFFFFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  126.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  127.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  128.     FFFFFFFFFFFFFFFFFFFFB0EBFFFF53D4FFFFFFFFFFFFFFFFFFFF23C7FFFFE2F7
  129.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  130.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  131.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  132.     FFFFFFFFFFFFFFFFFFFFFFFFFFFF31CBFFFFC3F0FFFF83E0FFFF72DCFFFFFFFF
  133.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  134.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  135.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  136.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFFFF1DC6FFFF35CCFFFFFFFFFFFFFFFF
  137.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  138.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  139.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  140.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFFFFA2E7FFFFD7F5FFFFFEFEFFFFFFFF
  141.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  142.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  143.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  144.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  145.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  146.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  147.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  148.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  149.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  150.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  151.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  152.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  153.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
  154.     FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
  155.     0000000000000000000000000000000000000000000000000000000000000000
  156.     0000000000000000000000000000000000000000000000000000000000000000
  157.     0000000000000000000000000000000000000000000000000000000000000000
  158.     000000000000000000000000000000000000000000000000000000000000}
  159.   LanguageID = 'Default'
  160.   OpenFile = False
  161.   OutlineSettings.CreateNode = True
  162.   OutlineSettings.CreatePageNodes = True
  163.   OutlineSettings.Enabled = True
  164.   OutlineSettings.Visible = True
  165.   ThumbnailSettings.Enabled = True
  166.   ThumbnailSettings.Visible = True
  167.   ThumbnailSettings.DeadSpace = 30
  168.   PDFSettings.EmbedFontOptions = []
  169.   PDFSettings.EncryptSettings.AllowCopy = True
  170.   PDFSettings.EncryptSettings.AllowInteract = True
  171.   PDFSettings.EncryptSettings.AllowModify = True
  172.   PDFSettings.EncryptSettings.AllowPrint = True
  173.   PDFSettings.EncryptSettings.Enabled = False
  174.   PDFSettings.EncryptSettings.KeyLength = kl40Bit
  175.   PDFSettings.FontEncoding = feAnsi
  176.   PDFSettings.ImageCompressionLevel = 25
  177.   PreviewFormSettings.ZoomSetting = zsPercentage
  178.   RTFSettings.DefaultFont.Charset = DEFAULT_CHARSET
  179.   RTFSettings.DefaultFont.Color = clWindowText
  180.   RTFSettings.DefaultFont.Height = -13
  181.   RTFSettings.DefaultFont.Name = 'Arial'
  182.   RTFSettings.DefaultFont.Style = []
  183.   TextFileName = '($MyDocuments)\Report.pdf'
  184.   TextSearchSettings.DefaultString = '<Suchtext>'
  185.   TextSearchSettings.Enabled = True
  186.   XLSSettings.AppName = 'ReportBuilder'
  187.   XLSSettings.Author = 'ReportBuilder'
  188.   XLSSettings.Subject = 'Report'
  189.   XLSSettings.Title = 'Report'
  190.   Left = 186
  191.   Top = 232
  192.   Version = '15.05'
  193.   mmColumnWidth = 170000
  194.   DataPipelineName = 'Behandlungen'
  195.   object ppDetailBand: TppDetailBand
  196.     Background1.Brush.Style = bsClear
  197.     Background2.Brush.Style = bsClear
  198.     PrintHeight = phDynamic
  199.     mmBottomOffset = 0
  200.     mmHeight = 130175
  201.     mmPrintPosition = 0
  202.     object ppSubReport1: TppSubReport
  203.       UserName = 'SubReport1'
  204.       ExpandAll = False
  205.       NewPrintJob = False
  206.       OutlineSettings.CreateNode = True
  207.       ShiftRelativeTo = ppDBMemo1
  208.       TraverseAllData = False
  209.       DataPipelineName = 'Behandlungsleistungen'
  210.       mmHeight = 4498
  211.       mmLeft = 0
  212.       mmTop = 108744
  213.       mmWidth = 135000
  214.       BandType = 4
  215.       LayerName = Foreground1
  216.       mmBottomOffset = 8000
  217.       mmOverFlowOffset = 0
  218.       mmStopPosition = 0
  219.       mmMinHeight = 0
  220.       object ppChildReport1: TppChildReport
  221.         AutoStop = False
  222.         DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  223.         PrinterSetup.BinName = 'Default'
  224.         PrinterSetup.DocumentName = 'Rechnung'
  225.         PrinterSetup.PaperName = 'A4'
  226.         PrinterSetup.PrinterName = 'Default'
  227.         PrinterSetup.SaveDeviceSettings = False
  228.         PrinterSetup.mmMarginBottom = 12000
  229.         PrinterSetup.mmMarginLeft = 20000
  230.         PrinterSetup.mmMarginRight = 15000
  231.         PrinterSetup.mmMarginTop = 20000
  232.         PrinterSetup.mmPaperHeight = 297000
  233.         PrinterSetup.mmPaperWidth = 210000
  234.         PrinterSetup.PaperSize = 9
  235.         Template.Format = ftASCII
  236.         Units = utMillimeters
  237.         Version = '15.05'
  238.         mmColumnWidth = 0
  239.         DataPipelineName = 'Behandlungsleistungen'
  240.         object ppTitleBand1: TppTitleBand
  241.           Background.Brush.Style = bsClear
  242.           mmBottomOffset = 0
  243.           mmHeight = 7408
  244.           mmPrintPosition = 0
  245.           object ppLine1: TppLine
  246.             UserName = 'Line2'
  247.             ParentWidth = True
  248.             Weight = 0.750000000000000000
  249.             mmHeight = 529
  250.             mmLeft = 0
  251.             mmTop = 6879
  252.             mmWidth = 155000
  253.             BandType = 1
  254.             LayerName = Foreground
  255.           end
  256.           object ppLabel1: TppLabel
  257.             UserName = 'Label3'
  258.             Caption = 'Datum'
  259.             Font.Charset = DEFAULT_CHARSET
  260.             Font.Color = clWindowText
  261.             Font.Name = 'Arial'
  262.             Font.Size = 8
  263.             Font.Style = []
  264.             Transparent = True
  265.             mmHeight = 3175
  266.             mmLeft = 0
  267.             mmTop = 2910
  268.             mmWidth = 7938
  269.             BandType = 1
  270.             LayerName = Foreground
  271.           end
  272.           object ppLabel2: TppLabel
  273.             UserName = 'lblGebuH'
  274.             Caption = 'Geb'#252'H'
  275.            Font.Charset = DEFAULT_CHARSET
  276.             Font.Color = clWindowText
  277.             Font.Name = 'Arial'
  278.             Font.Size = 8
  279.             Font.Style = []
  280.             Transparent = True
  281.             mmHeight = 3175
  282.             mmLeft = 20638
  283.             mmTop = 2910
  284.             mmWidth = 8731
  285.             BandType = 1
  286.             LayerName = Foreground
  287.           end
  288.           object ppLabel3: TppLabel
  289.             UserName = 'Label5'
  290.             Caption = 'Leistung'
  291.             Font.Charset = DEFAULT_CHARSET
  292.             Font.Color = clWindowText
  293.             Font.Name = 'Arial'
  294.             Font.Size = 8
  295.             Font.Style = []
  296.             Transparent = True
  297.             mmHeight = 3175
  298.             mmLeft = 36513
  299.             mmTop = 2910
  300.             mmWidth = 10319
  301.             BandType = 1
  302.             LayerName = Foreground
  303.           end
  304.           object ppLabel4: TppLabel
  305.             UserName = 'lblFaktor'
  306.             Caption = 'Anzahl'
  307.             Font.Charset = DEFAULT_CHARSET
  308.             Font.Color = clWindowText
  309.             Font.Name = 'Arial'
  310.             Font.Size = 8
  311.             Font.Style = []
  312.             Transparent = True
  313.             mmHeight = 3302
  314.             mmLeft = 122502
  315.             mmTop = 2910
  316.             mmWidth = 8128
  317.             BandType = 1
  318.             LayerName = Foreground
  319.           end
  320.           object ppLabel5: TppLabel
  321.             UserName = 'lblHonorar'
  322.             Caption = 'Honorar'
  323.             Font.Charset = DEFAULT_CHARSET
  324.             Font.Color = clWindowText
  325.             Font.Name = 'Arial'
  326.             Font.Size = 8
  327.             Font.Style = []
  328.             TextAlignment = taRightJustified
  329.             Transparent = True
  330.             mmHeight = 3302
  331.             mmLeft = 140282
  332.             mmTop = 2910
  333.             mmWidth = 9737
  334.             BandType = 1
  335.             LayerName = Foreground
  336.           end
  337.           object ppLabel6: TppLabel
  338.             UserName = 'lblGesHonorar'
  339.             Caption = 'G.-Honorar'
  340.             Font.Charset = DEFAULT_CHARSET
  341.             Font.Color = clWindowText
  342.             Font.Name = 'Arial'
  343.             Font.Size = 8
  344.             Font.Style = []
  345.             TextAlignment = taRightJustified
  346.             Transparent = True
  347.             mmHeight = 3175
  348.             mmLeft = 159544
  349.             mmTop = 2910
  350.             mmWidth = 13494
  351.             BandType = 1
  352.             LayerName = Foreground
  353.           end
  354.         end
  355.         object ppDetailBand1: TppDetailBand
  356.           Background1.Brush.Style = bsClear
  357.           Background2.Brush.Style = bsClear
  358.           PrintHeight = phDynamic
  359.           mmBottomOffset = 0
  360.           mmHeight = 3704
  361.           mmPrintPosition = 0
  362.           object ppDBText1: TppDBText
  363.             UserName = 'DBText4'
  364.             DataField = 'Anzahl'
  365.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  366.             Font.Charset = DEFAULT_CHARSET
  367.             Font.Color = clWindowText
  368.             Font.Name = 'Arial'
  369.             Font.Size = 8
  370.             Font.Style = []
  371.             ParentDataPipeline = False
  372.             Transparent = True
  373.             DataPipelineName = 'Behandlungsleistungen'
  374.             mmHeight = 3175
  375.             mmLeft = 122502
  376.             mmTop = 0
  377.             mmWidth = 7144
  378.             BandType = 4
  379.             LayerName = Foreground
  380.           end
  381.           object ppDBText2: TppDBText
  382.             UserName = 'DBText8'
  383.             DataField = 'Geb'#252'H'
  384.            DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  385.             Font.Charset = DEFAULT_CHARSET
  386.             Font.Color = clWindowText
  387.             Font.Name = 'Arial'
  388.             Font.Size = 8
  389.             Font.Style = []
  390.             ParentDataPipeline = False
  391.             Transparent = True
  392.             DataPipelineName = 'Behandlungsleistungen'
  393.             mmHeight = 3175
  394.             mmLeft = 20373
  395.             mmTop = 0
  396.             mmWidth = 14023
  397.             BandType = 4
  398.             LayerName = Foreground
  399.           end
  400.           object ppDBText3: TppDBText
  401.             UserName = 'DBText10'
  402.             DataField = 'Honorar'
  403.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  404.             DisplayFormat = '#,0.00;-#,0.00'
  405.             Font.Charset = DEFAULT_CHARSET
  406.             Font.Color = clWindowText
  407.             Font.Name = 'Arial'
  408.             Font.Size = 8
  409.             Font.Style = []
  410.             ParentDataPipeline = False
  411.             TextAlignment = taRightJustified
  412.             Transparent = True
  413.             DataPipelineName = 'Behandlungsleistungen'
  414.             mmHeight = 3175
  415.             mmLeft = 132292
  416.             mmTop = 0
  417.             mmWidth = 17727
  418.             BandType = 4
  419.             LayerName = Foreground
  420.           end
  421.           object ppDBText4: TppDBText
  422.             UserName = 'DBText11'
  423.             DataField = 'GesamtHonorar'
  424.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  425.             DisplayFormat = '#,0.00;-#,0.00'
  426.             Font.Charset = DEFAULT_CHARSET
  427.             Font.Color = clWindowText
  428.             Font.Name = 'Arial'
  429.             Font.Size = 8
  430.             Font.Style = []
  431.             ParentDataPipeline = False
  432.             TextAlignment = taRightJustified
  433.             Transparent = True
  434.             DataPipelineName = 'Behandlungsleistungen'
  435.             mmHeight = 3175
  436.             mmLeft = 153601
  437.             mmTop = 0
  438.             mmWidth = 19579
  439.             BandType = 4
  440.             LayerName = Foreground
  441.           end
  442.           object ppDBText5: TppDBText
  443.             UserName = 'DBText5'
  444.             DataField = 'Behandlungsdatum'
  445.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  446.             DisplayFormat = 'dd.mm.yyyy'
  447.             Font.Charset = DEFAULT_CHARSET
  448.             Font.Color = clWindowText
  449.             Font.Name = 'Arial'
  450.             Font.Size = 8
  451.             Font.Style = []
  452.             SuppressRepeatedValues = True
  453.             Transparent = True
  454.             DataPipelineName = 'Behandlungsleistungen'
  455.             mmHeight = 3175
  456.             mmLeft = 0
  457.             mmTop = 0
  458.             mmWidth = 18256
  459.             BandType = 4
  460.             LayerName = Foreground
  461.           end
  462.           object ppDBMemo6: TppDBMemo
  463.             UserName = 'DBMemo6'
  464.             CharWrap = False
  465.             DataField = 'Anmerkung'
  466.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  467.             Font.Charset = DEFAULT_CHARSET
  468.             Font.Color = clWindowText
  469.             Font.Name = 'Arial'
  470.             Font.Size = 8
  471.             Font.Style = []
  472.             RemoveEmptyLines = False
  473.             ShiftRelativeTo = ppDBMemo7
  474.             Stretch = True
  475.             Transparent = True
  476.             DataPipelineName = 'Behandlungsleistungen'
  477.             mmHeight = 529
  478.             mmLeft = 36513
  479.             mmTop = 3175
  480.             mmWidth = 80433
  481.             BandType = 4
  482.             LayerName = Foreground
  483.             mmBottomOffset = 0
  484.             mmOverFlowOffset = 0
  485.             mmStopPosition = 0
  486.             mmMinHeight = 0
  487.             mmLeading = 0
  488.           end
  489.           object ppDBMemo7: TppDBMemo
  490.             UserName = 'memLeistung'
  491.             CharWrap = False
  492.             DataField = 'Leistung'
  493.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  494.             Font.Charset = DEFAULT_CHARSET
  495.             Font.Color = clWindowText
  496.             Font.Name = 'Arial'
  497.             Font.Size = 8
  498.             Font.Style = []
  499.             RemoveEmptyLines = False
  500.             Stretch = True
  501.             Transparent = True
  502.             DataPipelineName = 'Behandlungsleistungen'
  503.             mmHeight = 3175
  504.             mmLeft = 36513
  505.             mmTop = 265
  506.             mmWidth = 82286
  507.             BandType = 4
  508.             LayerName = Foreground
  509.             mmBottomOffset = 0
  510.             mmOverFlowOffset = 0
  511.             mmStopPosition = 0
  512.             mmMinHeight = 0
  513.             mmLeading = 0
  514.           end
  515.         end
  516.         object ppFooterBand1: TppFooterBand
  517.           Visible = False
  518.           Background.Brush.Style = bsClear
  519.           mmBottomOffset = 0
  520.           mmHeight = 7408
  521.           mmPrintPosition = 0
  522.           object ppDBCalc1: TppDBCalc
  523.             UserName = 'DBCalc1'
  524.             DataField = 'GesamtHonorar'
  525.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  526.             Font.Charset = DEFAULT_CHARSET
  527.             Font.Color = clWindowText
  528.             Font.Name = 'Arial'
  529.             Font.Size = 10
  530.             Font.Style = [fsBold]
  531.             ParentDataPipeline = False
  532.             TextAlignment = taRightJustified
  533.             Transparent = True
  534.             DataPipelineName = 'Behandlungsleistungen'
  535.             mmHeight = 4233
  536.             mmLeft = 147515
  537.             mmTop = 1588
  538.             mmWidth = 25665
  539.             BandType = 8
  540.             LayerName = Foreground
  541.           end
  542.         end
  543.         object ppSummaryBand1: TppSummaryBand
  544.           Background.Brush.Style = bsClear
  545.           PrintHeight = phDynamic
  546.           mmBottomOffset = 0
  547.           mmHeight = 24606
  548.           mmPrintPosition = 0
  549.           object SummeGesamt: TppDBCalc
  550.             UserName = 'SummeGesamt'
  551.             Border.BorderPositions = [bpLeft, bpTop, bpRight, bpBottom]
  552.             Border.Color = clWindow
  553.             Border.Visible = True
  554.             DataField = 'GesamtHonorar'
  555.             DataPipeline = daADOQueryDataView2.Behandlungsleistungen
  556.             DisplayFormat = '#,0.00;-#,0.00'
  557.             Font.Charset = DEFAULT_CHARSET
  558.             Font.Color = clWindowText
  559.             Font.Name = 'Arial'
  560.             Font.Size = 10
  561.             Font.Style = [fsBold]
  562.             ParentDataPipeline = False
  563.             TextAlignment = taRightJustified
  564.             Transparent = True
  565.             DataPipelineName = 'Behandlungsleistungen'
  566.             mmHeight = 5027
  567.             mmLeft = 153601
  568.             mmTop = 1852
  569.             mmWidth = 19579
  570.             BandType = 7
  571.             LayerName = Foreground
  572.           end
  573.           object ppLabel7: TppLabel
  574.             UserName = 'Label9'
  575.             Caption = 'Gesamt'
  576.             Font.Charset = DEFAULT_CHARSET
  577.             Font.Color = clWindowText
  578.             Font.Name = 'Arial'
  579.             Font.Size = 10
  580.             Font.Style = [fsBold]
  581.             Transparent = True
  582.             mmHeight = 4233
  583.             mmLeft = 124255
  584.             mmTop = 1852
  585.             mmWidth = 12954
  586.             BandType = 7
  587.             LayerName = Foreground
  588.           end
  589.           object ppLine2: TppLine
  590.             UserName = 'Line3'
  591.             ParentWidth = True
  592.             Weight = 0.750000000000000000
  593.             mmHeight = 1852
  594.             mmLeft = 0
  595.             mmTop = 529
  596.             mmWidth = 175000
  597.             BandType = 7
  598.             LayerName = Foreground
  599.           end
  600.           object ppDBText6: TppDBText
  601.             UserName = 'DBText9'
  602.             AutoSize = True
  603.             DataField = 'W'#228'hrung'
  604.            DataPipeline = daADOQueryDataView4.Optionen
  605.             Font.Charset = DEFAULT_CHARSET
  606.             Font.Color = clWindowText
  607.             Font.Name = 'Arial'
  608.             Font.Size = 10
  609.             Font.Style = [fsBold]
  610.             ParentDataPipeline = False
  611.             TextAlignment = taRightJustified
  612.             Transparent = True
  613.             DataPipelineName = 'Optionen'
  614.             mmHeight = 4233
  615.             mmLeft = 145181
  616.             mmTop = 1852
  617.             mmWidth = 7926
  618.             BandType = 7
  619.             LayerName = Foreground
  620.           end
  621.           object ppRegion4: TppRegion
  622.             UserName = 'rgnZahlungen'
  623.             Caption = 'rgnZahlungen'
  624.             Pen.Style = psClear
  625.             Stretch = True
  626.             mmHeight = 10583
  627.             mmLeft = 69016
  628.             mmTop = 7431
  629.             mmWidth = 104632
  630.             BandType = 7
  631.             LayerName = Foreground
  632.             mmBottomOffset = 0
  633.             mmOverFlowOffset = 0
  634.             mmStopPosition = 0
  635.             mmMinHeight = 0
  636.             object ppSubReport2: TppSubReport
  637.               UserName = 'SubReport2'
  638.               ExpandAll = False
  639.               NewPrintJob = False
  640.               OutlineSettings.CreateNode = True
  641.               ParentWidth = False
  642.               TraverseAllData = False
  643.               DataPipelineName = 'Buchungen'
  644.               mmHeight = 3725
  645.               mmLeft = 79332
  646.               mmTop = 13010
  647.               mmWidth = 55033
  648.               BandType = 7
  649.               LayerName = Foreground
  650.               mmBottomOffset = 4000
  651.               mmOverFlowOffset = 0
  652.               mmStopPosition = 0
  653.               mmMinHeight = 0
  654.               object ppChildReport2: TppChildReport
  655.                 AutoStop = False
  656.                 DataPipeline = daADOQueryDataView5.Buchungen
  657.                 PrinterSetup.BinName = 'Default'
  658.                 PrinterSetup.DocumentName = 'Rechnung'
  659.                 PrinterSetup.PaperName = 'A4'
  660.                 PrinterSetup.PrinterName = 'Default'
  661.                 PrinterSetup.SaveDeviceSettings = False
  662.                 PrinterSetup.mmMarginBottom = 12000
  663.                 PrinterSetup.mmMarginLeft = 20000
  664.                 PrinterSetup.mmMarginRight = 15000
  665.                 PrinterSetup.mmMarginTop = 20000
  666.                 PrinterSetup.mmPaperHeight = 297000
  667.                 PrinterSetup.mmPaperWidth = 210000
  668.                 PrinterSetup.PaperSize = 9
  669.                 Template.Format = ftASCII
  670.                 Units = utMillimeters
  671.                 Version = '15.05'
  672.                 mmColumnWidth = 0
  673.                 DataPipelineName = 'Buchungen'
  674.                 object ppDetailBand2: TppDetailBand
  675.                   Background1.Brush.Style = bsClear
  676.                   Background2.Brush.Style = bsClear
  677.                   mmBottomOffset = 0
  678.                   mmHeight = 3704
  679.                   mmPrintPosition = 0
  680.                   object ppDBText7: TppDBText
  681.                     UserName = 'DBText7'
  682.                     DataField = 'Datum'
  683.                     DataPipeline = daADOQueryDataView5.Buchungen
  684.                     Font.Charset = DEFAULT_CHARSET
  685.                     Font.Color = clBlack
  686.                     Font.Name = 'Arial'
  687.                     Font.Size = 8
  688.                     Font.Style = []
  689.                     ParentDataPipeline = False
  690.                     Transparent = True
  691.                     DataPipelineName = 'Buchungen'
  692.                     mmHeight = 3704
  693.                     mmLeft = 0
  694.                     mmTop = 0
  695.                     mmWidth = 15088
  696.                     BandType = 4
  697.                     LayerName = Foreground2
  698.                   end
  699.                   object ppDBText8: TppDBText
  700.                     UserName = 'DBText8'
  701.                     DataField = 'Betrag'
  702.                     DataPipeline = daADOQueryDataView5.Buchungen
  703.                     DisplayFormat = '$#,0.00;-$#,0.00'
  704.                     Font.Charset = DEFAULT_CHARSET
  705.                     Font.Color = clBlack
  706.                     Font.Name = 'Arial'
  707.                     Font.Size = 8
  708.                     Font.Style = []
  709.                     TextAlignment = taRightJustified
  710.                     Transparent = True
  711.                     DataPipelineName = 'Buchungen'
  712.                     mmHeight = 3440
  713.                     mmLeft = 16283
  714.                     mmTop = 263
  715.                     mmWidth = 18179
  716.                     BandType = 4
  717.                     LayerName = Foreground2
  718.                   end
  719.                   object ppDBText9: TppDBText
  720.                     UserName = 'DBText9'
  721.                     DataField = 'Zahlungsweise'
  722.                     DataPipeline = daADOQueryDataView5.Buchungen
  723.                     DisplayFormat = 'bar;bar; '
  724.                     Font.Charset = DEFAULT_CHARSET
  725.                     Font.Color = clBlack
  726.                     Font.Name = 'Arial'
  727.                     Font.Size = 8
  728.                     Font.Style = []
  729.                     Transparent = True
  730.                     DataPipelineName = 'Buchungen'
  731.                     mmHeight = 3438
  732.                     mmLeft = 37005
  733.                     mmTop = 0
  734.                     mmWidth = 10054
  735.                     BandType = 4
  736.                     LayerName = Foreground2
  737.                   end
  738.                 end
  739.                 object ppDesignLayers3: TppDesignLayers
  740.                   object ppDesignLayer3: TppDesignLayer
  741.                     UserName = 'Foreground2'
  742.                     LayerType = ltBanded
  743.                     Index = 0
  744.                   end
  745.                 end
  746.               end
  747.             end
  748.             object ppLabel12: TppLabel
  749.               UserName = 'Label12'
  750.               Caption = 'Abz'#252'glich bereits geleisteter Zahlungen von'
  751.              Font.Charset = DEFAULT_CHARSET
  752.               Font.Color = clBlack
  753.               Font.Name = 'Arial'
  754.               Font.Size = 10
  755.               Font.Style = []
  756.               TextAlignment = taRightJustified
  757.               Transparent = True
  758.               mmHeight = 4234
  759.               mmLeft = 76747
  760.               mmTop = 8754
  761.               mmWidth = 66146
  762.               BandType = 7
  763.               LayerName = Foreground
  764.             end
  765.             object ppDBText10: TppDBText
  766.               UserName = 'DBText1'
  767.               AutoSize = True
  768.               DataField = 'W'#228'hrung'
  769.              DataPipeline = daADOQueryDataView4.Optionen
  770.               Font.Charset = DEFAULT_CHARSET
  771.               Font.Color = clWindowText
  772.               Font.Name = 'Arial'
  773.               Font.Size = 10
  774.               Font.Style = [fsBold]
  775.               ParentDataPipeline = False
  776.               TextAlignment = taRightJustified
  777.               Transparent = True
  778.               DataPipelineName = 'Optionen'
  779.               mmHeight = 4234
  780.               mmLeft = 145131
  781.               mmTop = 8754
  782.               mmWidth = 7926
  783.               BandType = 7
  784.               LayerName = Foreground
  785.             end
  786.             object BisherBezahlt: TppDBText
  787.               UserName = 'BisherBezahlt'
  788.               DataField = 'bisherbezahlt'
  789.               DataPipeline = daADOQueryDataView1.Behandlungen
  790.               DisplayFormat = '#,0.00;-#,0.00'
  791.               Font.Charset = DEFAULT_CHARSET
  792.               Font.Color = clBlack
  793.               Font.Name = 'Arial'
  794.               Font.Size = 10
  795.               Font.Style = [fsBold]
  796.               ParentDataPipeline = False
  797.               TextAlignment = taRightJustified
  798.               Transparent = True
  799.               DataPipelineName = 'Behandlungen'
  800.               mmHeight = 4763
  801.               mmLeft = 153938
  802.               mmTop = 8754
  803.               mmWidth = 19242
  804.               BandType = 7
  805.               LayerName = Foreground
  806.             end
  807.           end
  808.           object ppRegion3: TppRegion
  809.             UserName = 'rgnZuZahlen'
  810.             Brush.Style = bsClear
  811.             Caption = 'rgnZuZahlen'
  812.             Pen.Style = psClear
  813.             ShiftRelativeTo = ppRegion4
  814.             Transparent = True
  815.             mmHeight = 7144
  816.             mmLeft = 69018
  817.             mmTop = 16962
  818.             mmWidth = 104631
  819.             BandType = 7
  820.             LayerName = Foreground
  821.             mmBottomOffset = 0
  822.             mmOverFlowOffset = 0
  823.             mmStopPosition = 0
  824.             mmMinHeight = 0
  825.             object ppVariable1: TppVariable
  826.               UserName = 'Variable1'
  827.               BlankWhenZero = False
  828.               CalcOrder = 0
  829.               DataType = dtCurrency
  830.               DisplayFormat = '#,0.00;-#,0.00'
  831.               Font.Charset = DEFAULT_CHARSET
  832.               Font.Color = clBlack
  833.               Font.Name = 'Arial'
  834.               Font.Size = 10
  835.               Font.Style = [fsBold]
  836.               TextAlignment = taRightJustified
  837.               Transparent = True
  838.               mmHeight = 4233
  839.               mmLeft = 153456
  840.               mmTop = 17558
  841.               mmWidth = 19724
  842.               BandType = 7
  843.               LayerName = Foreground
  844.             end
  845.             object ppLabel13: TppLabel
  846.               UserName = 'Label13'
  847.               Caption = 'noch zu zahlen'
  848.               Font.Charset = DEFAULT_CHARSET
  849.               Font.Color = clBlack
  850.               Font.Name = 'Arial'
  851.               Font.Size = 10
  852.               Font.Style = []
  853.               TextAlignment = taRightJustified
  854.               Transparent = True
  855.               mmHeight = 4233
  856.               mmLeft = 76988
  857.               mmTop = 17558
  858.               mmWidth = 23284
  859.               BandType = 7
  860.               LayerName = Foreground
  861.             end
  862.             object ppDBText25: TppDBText
  863.               UserName = 'DBText25'
  864.               AutoSize = True
  865.               DataField = 'W'#228'hrung'
  866.              DataPipeline = daADOQueryDataView4.Optionen
  867.               Font.Charset = DEFAULT_CHARSET
  868.               Font.Color = clWindowText
  869.               Font.Name = 'Arial'
  870.               Font.Size = 10
  871.               Font.Style = [fsBold]
  872.               ParentDataPipeline = False
  873.               TextAlignment = taRightJustified
  874.               Transparent = True
  875.               DataPipelineName = 'Optionen'
  876.               mmHeight = 4233
  877.               mmLeft = 145246
  878.               mmTop = 17558
  879.               mmWidth = 7926
  880.               BandType = 7
  881.               LayerName = Foreground
  882.             end
  883.           end
  884.         end
  885.         object raCodeModule2: TraCodeModule
  886.           ProgramStream = {
  887.             01060F5472614576656E7448616E646C65720B50726F6772616D4E616D650615
  888.             53756D6D6172794265666F726547656E65726174650B50726F6772616D547970
  889.             65070B747450726F63656475726506536F75726365069E70726F636564757265
  890.             2053756D6D6172794265666F726547656E65726174653B0D0A626567696E0D0A
  891.             202072676E5A61686C756E67656E2E56697369626C65203A3D20426568616E64
  892.             6C756E67656E5B2762697368657262657A61686C74275D203C3E20303B0D0A20
  893.             2072676E5A755A61686C656E2E56697369626C65203A3D2072676E5A61686C75
  894.             6E67656E2E56697369626C653B0D0A656E643B0D0A0D436F6D706F6E656E744E
  895.             616D65060753756D6D617279094576656E744E616D65060E4265666F72654765
  896.             6E6572617465074576656E744944021A084361726574506F7301020E02040000
  897.             01060F5472614576656E7448616E646C65720B50726F6772616D4E616D65060F
  898.             5661726961626C65314F6E43616C630B50726F6772616D54797065070B747450
  899.             726F63656475726506536F75726365068070726F636564757265205661726961
  900.             626C65314F6E43616C63287661722056616C75653A2056617269616E74293B0D
  901.             0A626567696E0D0A0D0A202056616C7565203A3D2053756D6D65476573616D74
  902.             2E56616C7565202D20426568616E646C756E67656E5B2762697368657262657A
  903.             61686C74275D3B0D0A0D0A656E643B0D0A0D436F6D706F6E656E744E616D6506
  904.             095661726961626C6531094576656E744E616D6506064F6E43616C6307457665
  905.             6E7449440221084361726574506F730102000200000000}
  906.         end
  907.         object ppDesignLayers1: TppDesignLayers
  908.           object ppDesignLayer1: TppDesignLayer
  909.             UserName = 'Foreground'
  910.             LayerType = ltBanded
  911.             Index = 0
  912.           end
  913.         end
  914.       end
  915.     end
  916.     object ppDBMemo2: TppDBMemo
  917.       UserName = 'memAusgangstext'
  918.       CharWrap = False
  919.       DataField = 'Rechnungsausgangstext'
  920.       DataPipeline = daADOQueryDataView1.Behandlungen
  921.       Font.Charset = DEFAULT_CHARSET
  922.       Font.Color = clWindowText
  923.       Font.Name = 'Arial'
  924.       Font.Size = 10
  925.       Font.Style = []
  926.       ParentDataPipeline = False
  927.       RemoveEmptyLines = False
  928.       ShiftRelativeTo = ppDBMemo4
  929.       Stretch = True
  930.       Transparent = True
  931.       DataPipelineName = 'Behandlungen'
  932.       mmHeight = 5027
  933.       mmLeft = 0
  934.       mmTop = 116946
  935.       mmWidth = 133615
  936.       BandType = 4
  937.       LayerName = Foreground1
  938.       mmBottomOffset = 0
  939.       mmOverFlowOffset = 0
  940.       mmStopPosition = 0
  941.       mmMinHeight = 0
  942.       mmLeading = 0
  943.     end
  944.     object ppDBMemo4: TppDBMemo
  945.       UserName = 'memAnmerkungen'
  946.       CharWrap = False
  947.       DataField = 'Anmerkung'
  948.       DataPipeline = daADOQueryDataView1.Behandlungen
  949.       Font.Charset = DEFAULT_CHARSET
  950.       Font.Color = clWindowText
  951.       Font.Name = 'Arial'
  952.       Font.Size = 8
  953.       Font.Style = []
  954.       RemoveEmptyLines = False
  955.       ShiftRelativeTo = ppSubReport1
  956.       Stretch = True
  957.       Transparent = True
  958.       DataPipelineName = 'Behandlungen'
  959.       mmHeight = 3969
  960.       mmLeft = 0
  961.       mmTop = 113242
  962.       mmWidth = 133615
  963.       BandType = 4
  964.       LayerName = Foreground1
  965.       mmBottomOffset = 2000
  966.       mmOverFlowOffset = 0
  967.       mmStopPosition = 0
  968.       mmMinHeight = 0
  969.       mmLeading = 0
  970.     end
  971.     object ppDBMemo1: TppDBMemo
  972.       UserName = 'memEingangstext'
  973.       CharWrap = False
  974.       DataField = 'Rechnungseingangstext'
  975.       DataPipeline = daADOQueryDataView1.Behandlungen
  976.       Font.Charset = DEFAULT_CHARSET
  977.       Font.Color = clWindowText
  978.       Font.Name = 'Arial'
  979.       Font.Size = 10
  980.       Font.Style = []
  981.       ParentDataPipeline = False
  982.       RemoveEmptyLines = False
  983.       ShiftRelativeTo = ppDBMemo3
  984.       Stretch = True
  985.       Transparent = True
  986.       DataPipelineName = 'Behandlungen'
  987.       mmHeight = 4763
  988.       mmLeft = 0
  989.       mmTop = 103981
  990.       mmWidth = 194469
  991.       BandType = 4
  992.       LayerName = Foreground1
  993.       mmBottomOffset = 5000
  994.       mmOverFlowOffset = 0
  995.       mmStopPosition = 0
  996.       mmMinHeight = 0
  997.       mmLeading = 0
  998.     end
  999.     object ppDBMemo3: TppDBMemo
  1000.       UserName = 'memDiagnose'
  1001.       KeepTogether = True
  1002.       CharWrap = False
  1003.       DataField = 'Diagnose'
  1004.       DataPipeline = daADOQueryDataView1.Behandlungen
  1005.       Font.Charset = DEFAULT_CHARSET
  1006.       Font.Color = clWindowText
  1007.       Font.Name = 'Arial'
  1008.       Font.Size = 10
  1009.       Font.Style = []
  1010.       ParentDataPipeline = False
  1011.       RemoveEmptyLines = False
  1012.       ShiftRelativeTo = ppRegion2
  1013.       Stretch = True
  1014.       Transparent = True
  1015.       DataPipelineName = 'Behandlungen'
  1016.       mmHeight = 4498
  1017.       mmLeft = 0
  1018.       mmTop = 99748
  1019.       mmWidth = 173302
  1020.       BandType = 4
  1021.       LayerName = Foreground1
  1022.       mmBottomOffset = 5000
  1023.       mmOverFlowOffset = 0
  1024.       mmStopPosition = 0
  1025.       mmMinHeight = 0
  1026.       mmLeading = 0
  1027.     end
  1028.     object ppDBText11: TppDBText
  1029.       UserName = 'txtAbsender'
  1030.       DataField = 'Vorname_Name_Stra'#223'e_Ort'
  1031.      DataPipeline = daADOQueryDataView3.Praxisdaten
  1032.       Font.Charset = DEFAULT_CHARSET
  1033.       Font.Color = clWindowText
  1034.       Font.Name = 'Arial'
  1035.       Font.Size = 8
  1036.       Font.Style = []
  1037.       ParentDataPipeline = False
  1038.       Transparent = True
  1039.       DataPipelineName = 'Praxisdaten'
  1040.       mmHeight = 3969
  1041.       mmLeft = 0
  1042.       mmTop = 29633
  1043.       mmWidth = 89165
  1044.       BandType = 4
  1045.       LayerName = Foreground1
  1046.     end
  1047.     object ppRegion1: TppRegion
  1048.       UserName = 'rgrInfo'
  1049.       Brush.Style = bsClear
  1050.       Caption = 'rgrInfo'
  1051.       Pen.Style = psClear
  1052.       Stretch = True
  1053.       Transparent = True
  1054.       mmHeight = 59267
  1055.       mmLeft = 103452
  1056.       mmTop = 0
  1057.       mmWidth = 70644
  1058.       BandType = 4
  1059.       LayerName = Foreground1
  1060.       mmBottomOffset = 0
  1061.       mmOverFlowOffset = 0
  1062.       mmStopPosition = 0
  1063.       mmMinHeight = 0
  1064.       object ppDBText12: TppDBText
  1065.         UserName = 'DBText14'
  1066.         DataField = 'Vorname_Name'
  1067.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1068.         Font.Charset = DEFAULT_CHARSET
  1069.         Font.Color = clWindowText
  1070.         Font.Name = 'Arial'
  1071.         Font.Size = 10
  1072.         Font.Style = [fsBold]
  1073.         ParentDataPipeline = False
  1074.         Transparent = True
  1075.         DataPipelineName = 'Praxisdaten'
  1076.         mmHeight = 4233
  1077.         mmLeft = 104511
  1078.         mmTop = 794
  1079.         mmWidth = 69586
  1080.         BandType = 4
  1081.         LayerName = Foreground1
  1082.       end
  1083.       object ppDBText13: TppDBText
  1084.         UserName = 'DBText15'
  1085.         DataField = 'Berufsbezeichnung'
  1086.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1087.         Font.Charset = DEFAULT_CHARSET
  1088.         Font.Color = clWindowText
  1089.         Font.Name = 'Arial'
  1090.         Font.Size = 10
  1091.         Font.Style = [fsBold]
  1092.         ParentDataPipeline = False
  1093.         Transparent = True
  1094.         DataPipelineName = 'Praxisdaten'
  1095.         mmHeight = 4763
  1096.         mmLeft = 104511
  1097.         mmTop = 4763
  1098.         mmWidth = 69586
  1099.         BandType = 4
  1100.         LayerName = Foreground1
  1101.       end
  1102.       object ppDBText14: TppDBText
  1103.         UserName = 'DBText16'
  1104.         DataField = 'Stra'#223'e'
  1105.        DataPipeline = daADOQueryDataView3.Praxisdaten
  1106.         Font.Charset = DEFAULT_CHARSET
  1107.         Font.Color = clWindowText
  1108.         Font.Name = 'Arial'
  1109.         Font.Size = 10
  1110.         Font.Style = []
  1111.         ParentDataPipeline = False
  1112.         Transparent = True
  1113.         DataPipelineName = 'Praxisdaten'
  1114.         mmHeight = 4064
  1115.         mmLeft = 104511
  1116.         mmTop = 19050
  1117.         mmWidth = 69586
  1118.         BandType = 4
  1119.         LayerName = Foreground1
  1120.       end
  1121.       object ppDBText15: TppDBText
  1122.         UserName = 'DBText17'
  1123.         DataField = 'Ort'
  1124.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1125.         Font.Charset = DEFAULT_CHARSET
  1126.         Font.Color = clWindowText
  1127.         Font.Name = 'Arial'
  1128.         Font.Size = 10
  1129.         Font.Style = []
  1130.         ParentDataPipeline = False
  1131.         Transparent = True
  1132.         DataPipelineName = 'Praxisdaten'
  1133.         mmHeight = 4064
  1134.         mmLeft = 104511
  1135.         mmTop = 23019
  1136.         mmWidth = 69586
  1137.         BandType = 4
  1138.         LayerName = Foreground1
  1139.       end
  1140.       object ppDBText16: TppDBText
  1141.         UserName = 'DBText18'
  1142.         DataField = 'Tel1'
  1143.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1144.         Font.Charset = DEFAULT_CHARSET
  1145.         Font.Color = clWindowText
  1146.         Font.Name = 'Arial'
  1147.         Font.Size = 10
  1148.         Font.Style = []
  1149.         ParentDataPipeline = False
  1150.         Transparent = True
  1151.         DataPipelineName = 'Praxisdaten'
  1152.         mmHeight = 4064
  1153.         mmLeft = 104511
  1154.         mmTop = 27517
  1155.         mmWidth = 69586
  1156.         BandType = 4
  1157.         LayerName = Foreground1
  1158.       end
  1159.       object ppDBText17: TppDBText
  1160.         UserName = 'DBText19'
  1161.         DataField = 'Tel2'
  1162.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1163.         Font.Charset = DEFAULT_CHARSET
  1164.         Font.Color = clBlack
  1165.         Font.Name = 'Arial'
  1166.         Font.Size = 10
  1167.         Font.Style = []
  1168.         ParentDataPipeline = False
  1169.         Transparent = True
  1170.         DataPipelineName = 'Praxisdaten'
  1171.         mmHeight = 4064
  1172.         mmLeft = 104511
  1173.         mmTop = 31221
  1174.         mmWidth = 69586
  1175.         BandType = 4
  1176.         LayerName = Foreground1
  1177.       end
  1178.       object ppDBText18: TppDBText
  1179.         UserName = 'DBText20'
  1180.         DataField = 'Fax'
  1181.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1182.         Font.Charset = DEFAULT_CHARSET
  1183.         Font.Color = clWindowText
  1184.         Font.Name = 'Arial'
  1185.         Font.Size = 10
  1186.         Font.Style = []
  1187.         ParentDataPipeline = False
  1188.         Transparent = True
  1189.         DataPipelineName = 'Praxisdaten'
  1190.         mmHeight = 4064
  1191.         mmLeft = 104511
  1192.         mmTop = 34925
  1193.         mmWidth = 69586
  1194.         BandType = 4
  1195.         LayerName = Foreground1
  1196.       end
  1197.       object ppDBText19: TppDBText
  1198.         UserName = 'DBText21'
  1199.         HyperlinkEnabled = False
  1200.         HyperlinkColor = clWindowText
  1201.         DataField = 'Email'
  1202.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1203.         Font.Charset = DEFAULT_CHARSET
  1204.         Font.Color = clWindowText
  1205.         Font.Name = 'Arial'
  1206.         Font.Size = 10
  1207.         Font.Style = []
  1208.         ParentDataPipeline = False
  1209.         Transparent = True
  1210.         DataPipelineName = 'Praxisdaten'
  1211.         mmHeight = 4064
  1212.         mmLeft = 104511
  1213.         mmTop = 38629
  1214.         mmWidth = 69586
  1215.         BandType = 4
  1216.         LayerName = Foreground1
  1217.       end
  1218.       object ppDBMemo5: TppDBMemo
  1219.         UserName = 'DBMemo1'
  1220.         CharWrap = False
  1221.         DataField = 'Bank'
  1222.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1223.         Font.Charset = DEFAULT_CHARSET
  1224.         Font.Color = clWindowText
  1225.         Font.Name = 'Arial'
  1226.         Font.Size = 10
  1227.         Font.Style = []
  1228.         ParentDataPipeline = False
  1229.         RemoveEmptyLines = False
  1230.         Stretch = True
  1231.         Transparent = True
  1232.         DataPipelineName = 'Praxisdaten'
  1233.         mmHeight = 12435
  1234.         mmLeft = 104511
  1235.         mmTop = 45773
  1236.         mmWidth = 69586
  1237.         BandType = 4
  1238.         LayerName = Foreground1
  1239.         mmBottomOffset = 0
  1240.         mmOverFlowOffset = 0
  1241.         mmStopPosition = 0
  1242.         mmMinHeight = 0
  1243.         mmLeading = 0
  1244.       end
  1245.       object ppDBText20: TppDBText
  1246.         UserName = 'DBText24'
  1247.         DataField = 'Praxisname'
  1248.         DataPipeline = daADOQueryDataView3.Praxisdaten
  1249.         Font.Charset = DEFAULT_CHARSET
  1250.         Font.Color = clWindowText
  1251.         Font.Name = 'Arial'
  1252.         Font.Size = 10
  1253.         Font.Style = [fsBold]
  1254.         ParentDataPipeline = False
  1255.         Transparent = True
  1256.         WordWrap = True
  1257.         DataPipelineName = 'Praxisdaten'
  1258.         mmHeight = 10054
  1259.         mmLeft = 104511
  1260.         mmTop = 9260
  1261.         mmWidth = 69586
  1262.         BandType = 4
  1263.         LayerName = Foreground1
  1264.       end
  1265.     end
  1266.     object ppRegion2: TppRegion
  1267.       UserName = 'Region1'
  1268.       Caption = 'Region1'
  1269.       ParentWidth = True
  1270.       Pen.Style = psClear
  1271.       Stretch = True
  1272.       mmHeight = 22490
  1273.       mmLeft = 0
  1274.       mmTop = 77523
  1275.       mmWidth = 175000
  1276.       BandType = 4
  1277.       LayerName = Foreground1
  1278.       mmBottomOffset = 0
  1279.       mmOverFlowOffset = 0
  1280.       mmStopPosition = 0
  1281.       mmMinHeight = 0
  1282.       object ppDBText21: TppDBText
  1283.         UserName = 'DBText1'
  1284.         Color = clWindow
  1285.         DataField = 'Datum'
  1286.         DataPipeline = daADOQueryDataView1.Behandlungen
  1287.         DisplayFormat = 'dd.mm.yyyy'
  1288.         Font.Charset = DEFAULT_CHARSET
  1289.         Font.Color = clWindowText
  1290.         Font.Name = 'Arial'
  1291.         Font.Size = 10
  1292.         Font.Style = [fsBold]
  1293.         ParentDataPipeline = False
  1294.         Transparent = True
  1295.         DataPipelineName = 'Behandlungen'
  1296.         mmHeight = 4233
  1297.         mmLeft = 104511
  1298.         mmTop = 78052
  1299.         mmWidth = 20373
  1300.         BandType = 4
  1301.         LayerName = Foreground1
  1302.       end
  1303.       object ppDBText22: TppDBText
  1304.         UserName = 'txtRNNr'
  1305.         DataField = 'RechnungsNr'
  1306.         DataPipeline = daADOQueryDataView1.Behandlungen
  1307.         DisplayFormat = '"Nr. "0'
  1308.         Font.Charset = DEFAULT_CHARSET
  1309.         Font.Color = clWindowText
  1310.         Font.Name = 'Arial'
  1311.         Font.Size = 10
  1312.         Font.Style = [fsBold]
  1313.         ParentDataPipeline = False
  1314.         Transparent = True
  1315.         DataPipelineName = 'Behandlungen'
  1316.         mmHeight = 4233
  1317.         mmLeft = 20638
  1318.         mmTop = 78052
  1319.         mmWidth = 30427
  1320.         BandType = 4
  1321.         LayerName = Foreground1
  1322.       end
  1323.       object ppLabel8: TppLabel
  1324.         UserName = 'Label1'
  1325.         Caption = 'Patient(in)'
  1326.         Font.Charset = DEFAULT_CHARSET
  1327.         Font.Color = clWindowText
  1328.         Font.Name = 'Arial'
  1329.         Font.Size = 10
  1330.         Font.Style = [fsBold]
  1331.         Transparent = True
  1332.         mmHeight = 4233
  1333.         mmLeft = 265
  1334.         mmTop = 88636
  1335.         mmWidth = 17463
  1336.         BandType = 4
  1337.         LayerName = Foreground1
  1338.       end
  1339.       object ppDBText23: TppDBText
  1340.         UserName = 'DBText12'
  1341.         DataField = 'Patienten_Vorname_Patient'
  1342.         DataPipeline = daADOQueryDataView1.Behandlungen
  1343.         Font.Charset = DEFAULT_CHARSET
  1344.         Font.Color = clWindowText
  1345.         Font.Name = 'Arial'
  1346.         Font.Size = 10
  1347.         Font.Style = []
  1348.         ParentDataPipeline = False
  1349.         Transparent = True
  1350.         DataPipelineName = 'Behandlungen'
  1351.         mmHeight = 4498
  1352.         mmLeft = 29369
  1353.         mmTop = 89165
  1354.         mmWidth = 95515
  1355.         BandType = 4
  1356.         LayerName = Foreground1
  1357.       end
  1358.       object ppLabel9: TppLabel
  1359.         UserName = 'Label2'
  1360.         Caption = 'Diagnose(n):'
  1361.         Font.Charset = DEFAULT_CHARSET
  1362.         Font.Color = clWindowText
  1363.         Font.Name = 'Arial'
  1364.         Font.Size = 10
  1365.         Font.Style = [fsBold]
  1366.         Transparent = True
  1367.         mmHeight = 4233
  1368.         mmLeft = 265
  1369.         mmTop = 94986
  1370.         mmWidth = 21696
  1371.         BandType = 4
  1372.         LayerName = Foreground1
  1373.       end
  1374.       object ppLabel10: TppLabel
  1375.         UserName = 'lblRechnung'
  1376.         Caption = 'Rechnung'
  1377.         Font.Charset = DEFAULT_CHARSET
  1378.         Font.Color = clWindowText
  1379.         Font.Name = 'Arial'
  1380.         Font.Size = 10
  1381.         Font.Style = [fsBold]
  1382.         Transparent = True
  1383.         mmHeight = 4318
  1384.         mmLeft = 0
  1385.         mmTop = 78052
  1386.         mmWidth = 17399
  1387.         BandType = 4
  1388.         LayerName = Foreground1
  1389.       end
  1390.     end
  1391.     object ppDBMemo8: TppDBMemo
  1392.       UserName = 'DBMemo2'
  1393.       CharWrap = False
  1394.       DataField = 'RechAnschrift'
  1395.       DataPipeline = daADOQueryDataView1.Behandlungen
  1396.       Font.Charset = DEFAULT_CHARSET
  1397.       Font.Color = clBlack
  1398.       Font.Name = 'Arial'
  1399.       Font.Size = 10
  1400.       Font.Style = []
  1401.       RemoveEmptyLines = False
  1402.       Transparent = True
  1403.       DataPipelineName = 'Behandlungen'
  1404.       mmHeight = 23019
  1405.       mmLeft = 0
  1406.       mmTop = 34925
  1407.       mmWidth = 76489
  1408.       BandType = 4
  1409.       LayerName = Foreground1
  1410.       mmBottomOffset = 0
  1411.       mmOverFlowOffset = 0
  1412.       mmStopPosition = 0
  1413.       mmMinHeight = 0
  1414.       mmLeading = 0
  1415.     end
  1416.   end
  1417.   object ppFooterBand: TppFooterBand
  1418.     Background.Brush.Style = bsClear
  1419.     mmBottomOffset = 0
  1420.     mmHeight = 5027
  1421.     mmPrintPosition = 0
  1422.     object ppDBText24: TppDBText
  1423.       UserName = 'txtRNNrFuss'
  1424.       DataField = 'RechnungsNr'
  1425.       DataPipeline = daADOQueryDataView1.Behandlungen
  1426.       DisplayFormat = '"Nr. "0'
  1427.       Font.Charset = DEFAULT_CHARSET
  1428.       Font.Color = clWindowText
  1429.       Font.Name = 'Arial'
  1430.       Font.Size = 8
  1431.       Font.Style = []
  1432.       Transparent = True
  1433.       DataPipelineName = 'Behandlungen'
  1434.       mmHeight = 3175
  1435.       mmLeft = 18256
  1436.       mmTop = 1058
  1437.       mmWidth = 25400
  1438.       BandType = 8
  1439.       LayerName = Foreground1
  1440.     end
  1441.     object ppSystemVariable1: TppSystemVariable
  1442.       UserName = 'SystemVariable1'
  1443.       VarType = vtPageSetDesc
  1444.       Font.Charset = DEFAULT_CHARSET
  1445.       Font.Color = clWindowText
  1446.       Font.Name = 'Arial'
  1447.       Font.Size = 8
  1448.       Font.Style = []
  1449.       TextAlignment = taRightJustified
  1450.       Transparent = True
  1451.       mmHeight = 3302
  1452.       mmLeft = 158433
  1453.       mmTop = 1058
  1454.       mmWidth = 15663
  1455.       BandType = 8
  1456.       LayerName = Foreground1
  1457.     end
  1458.     object ppLabel11: TppLabel
  1459.       UserName = 'lblRechnungFuss'
  1460.       Caption = 'Rechnung'
  1461.       Font.Charset = DEFAULT_CHARSET
  1462.       Font.Color = clWindowText
  1463.       Font.Name = 'Arial'
  1464.       Font.Size = 8
  1465.       Font.Style = []
  1466.       Transparent = True
  1467.       mmHeight = 3302
  1468.       mmLeft = 1852
  1469.       mmTop = 1058
  1470.       mmWidth = 12065
  1471.       BandType = 8
  1472.       LayerName = Foreground1
  1473.     end
  1474.   end
  1475.   object ppGroup1: TppGroup
  1476.     BreakName = 'Behandlungen_Id_10_Kopien'
  1477.     DataPipeline = daADOQueryDataView1.Behandlungen
  1478.     GroupFileSettings.NewFile = False
  1479.     GroupFileSettings.EmailFile = False
  1480.     OutlineSettings.CreateNode = True
  1481.     NewPage = True
  1482.     ResetPageNo = True
  1483.     StartOnOddPage = False
  1484.     UserName = 'Group1'
  1485.     mmNewColumnThreshold = 0
  1486.     mmNewPageThreshold = 0
  1487.     DataPipelineName = 'Behandlungen'
  1488.     NewFile = False
  1489.     object ppGroupHeaderBand1: TppGroupHeaderBand
  1490.       Background.Brush.Style = bsClear
  1491.       mmBottomOffset = 0
  1492.       mmHeight = 0
  1493.       mmPrintPosition = 0
  1494.     end
  1495.     object ppGroupFooterBand1: TppGroupFooterBand
  1496.       Background.Brush.Style = bsClear
  1497.       HideWhenOneDetail = False
  1498.       mmBottomOffset = 0
  1499.       mmHeight = 0
  1500.       mmPrintPosition = 0
  1501.     end
  1502.   end
  1503.   object raCodeModule1: TraCodeModule
  1504.     ProgramStream = {
  1505.       01060A54726150726F6772616D094368696C645479706502150B50726F677261
  1506.       6D4E616D650613506C61747A68616C74657245727365747A656E0B50726F6772
  1507.       616D54797065070B747450726F63656475726506536F757263650C5803000070
  1508.       726F63656475726520506C61747A68616C74657245727365747A656E28766172
  1509.       2073203A20537472696E67293B0D0A7661720D0A2020702C2069203A20496E74
  1510.       656765723B0D0A2020746F6B656E2C2072203A20537472696E673B0D0A202064
  1511.       74203A20446174653B0D0A626567696E0D0A202070203A3D20506F732820277B
  1512.       272C207320293B0D0A20207768696C652070203E203020646F0D0A2020626567
  1513.       696E0D0A2020202069203A3D2070202B20313B0D0A202020207768696C652028
  1514.       69203C204C656E67746828207320292920616E642028436F70792820732C2069
  1515.       2C20312029203C3E20277D272920646F0D0A20202020626567696E0D0A202020
  1516.       20202069203A3D2069202B20313B0D0A20202020656E643B0D0A20202020746F
  1517.       6B656E203A3D204C6F7765724361736528436F70792820732C2070202B20312C
  1518.       2069202D2070202D20312029293B0D0A20202020696620746F6B656E203D2027
  1519.       7A69656C27207468656E0D0A20202020626567696E0D0A202020202020647420
  1520.       3A3D20426568616E646C756E67656E5B27446174756D275D3B0D0A2020202020
  1521.       206474203A3D206474202B204F7074696F6E656E5B275A69656C74616765275D
  1522.       3B0D0A20202020202072203A3D2044617465546F537472286474293B0D0A2020
  1523.       2020656E640D0A20202020656C73650D0A20202020696620746F6B656E203D20
  1524.       27616E7265646527207468656E0D0A20202020626567696E0D0A202020202020
  1525.       72203A3D2027536568722067656568727465273B0D0A20202020202069662042
  1526.       6568616E646C756E67656E5B2752656368616E72656465275D203D2027486572
  1527.       7227207468656E0D0A202020202020626567696E0D0A20202020202020207220
  1528.       3A3D2072202B202772273B0D0A202020202020656E643B0D0A20202020202072
  1529.       203A3D2072202B20272027202B20426568616E646C756E67656E5B2752656368
  1530.       616E72656465275D202B20272027202B20426568616E646C756E67656E5B2752
  1531.       6563686E616D65275D3B0D0A20202020656E643B0D0A2020202044656C657465
  1532.       2820732C20702C2069202D2070202B203120293B0D0A20202020496E73657274
  1533.       2820722C20732C207020293B0D0A2020202070203A3D20506F732820277B272C
  1534.       207320293B0D0A2020656E643B0D0A656E643B0D0A0D0A084361726574506F73
  1535.       0102010201000001060F5472614576656E7448616E646C65720B50726F677261
  1536.       6D4E616D6506186D656D41757367616E6773746578744F6E4765744D656D6F0B
  1537.       50726F6772616D54797065070B747450726F63656475726506536F7572636506
  1538.       B770726F636564757265206D656D41757367616E6773746578744F6E4765744D
  1539.       656D6F284C696E65733A2054537472696E6773293B0D0A7661720D0A20207320
  1540.       3A20537472696E673B0D0A626567696E0D0A202073203A3D20426568616E646C
  1541.       756E67656E5B27526563686E756E677361757367616E677374657874275D3B0D
  1542.       0A2020506C61747A68616C74657245727365747A656E28207320293B0D0A2020
  1543.       4C696E65732E54657874203A3D20733B0D0A656E643B0D0A0D436F6D706F6E65
  1544.       6E744E616D65060F6D656D41757367616E677374657874094576656E744E616D
  1545.       6506094F6E4765744D656D6F074576656E7449440256084361726574506F7301
  1546.       02010201000001060F5472614576656E7448616E646C65720B50726F6772616D
  1547.       4E616D6506186D656D45696E67616E6773746578744F6E4765744D656D6F0B50
  1548.       726F6772616D54797065070B747450726F63656475726506536F7572636506B7
  1549.       70726F636564757265206D656D45696E67616E6773746578744F6E4765744D65
  1550.       6D6F284C696E65733A2054537472696E6773293B0D0A7661720D0A202073203A
  1551.       20537472696E673B0D0A626567696E0D0A202073203A3D20426568616E646C75
  1552.       6E67656E5B27526563686E756E677365696E67616E677374657874275D3B0D0A
  1553.       2020506C61747A68616C74657245727365747A656E28207320293B0D0A20204C
  1554.       696E65732E54657874203A3D20733B0D0A656E643B0D0A0D436F6D706F6E656E
  1555.       744E616D65060F6D656D45696E67616E677374657874094576656E744E616D65
  1556.       06094F6E4765744D656D6F074576656E7449440256084361726574506F730102
  1557.       010201000000}
  1558.   end
  1559.   object daDataModule: TdaDataModule
  1560.     object daADOQueryDataView1: TdaADOQueryDataView
  1561.       UserName = 'Query_Behandlungen'
  1562.       Height = 533
  1563.       Left = 10
  1564.       NameColumnWidth = 105
  1565.       SizeColumnWidth = 35
  1566.       SortMode = 0
  1567.       Top = 10
  1568.       TypeColumnWidth = 52
  1569.       Width = 224
  1570.       AutoSearchTabOrder = 0
  1571.       object Behandlungen: TppChildDBPipeline
  1572.         AutoCreateFields = False
  1573.         UserName = 'Behandlungen'
  1574.         object ppField1: TppField
  1575.           FieldAlias = 'Id'
  1576.           FieldName = 'Id'
  1577.           FieldLength = 0
  1578.           DataType = dtLongint
  1579.           DisplayWidth = 10
  1580.           Position = 0
  1581.           TableName = 'Behandlungen'
  1582.         end
  1583.         object ppField2: TppField
  1584.           FieldAlias = 'Datum'
  1585.           FieldName = 'Datum'
  1586.           FieldLength = 0
  1587.           DataType = dtDateTime
  1588.           DisplayWidth = 18
  1589.           Position = 1
  1590.           TableName = 'Behandlungen'
  1591.         end
  1592.         object ppField3: TppField
  1593.           FieldAlias = 'Anmerkung'
  1594.           FieldName = 'Anmerkung'
  1595.           FieldLength = 0
  1596.           Linkable = False
  1597.           DataType = dtMemo
  1598.           DisplayWidth = 10
  1599.           Position = 2
  1600.           TableName = 'Behandlungen'
  1601.         end
  1602.         object ppField4: TppField
  1603.           FieldAlias = 'RechnungsNr'
  1604.           FieldName = 'RechnungsNr'
  1605.           FieldLength = 0
  1606.           DataType = dtInteger
  1607.           DisplayWidth = 10
  1608.           Position = 3
  1609.           TableName = 'Behandlungen'
  1610.         end
  1611.         object ppField5: TppField
  1612.           FieldAlias = 'Anrede'
  1613.           FieldName = 'Anrede'
  1614.           FieldLength = 20
  1615.           IsDetail = True
  1616.           DisplayWidth = 20
  1617.           Position = 4
  1618.           TableName = 'Patienten'
  1619.         end
  1620.         object ppField6: TppField
  1621.           FieldAlias = 'Rechanrede'
  1622.           FieldName = 'Rechanrede'
  1623.           FieldLength = 20
  1624.           IsDetail = True
  1625.           DisplayWidth = 20
  1626.           Position = 5
  1627.           TableName = 'Patienten'
  1628.         end
  1629.         object ppField7: TppField
  1630.           FieldAlias = 'Rechname'
  1631.           FieldName = 'Rechname'
  1632.           FieldLength = 50
  1633.           IsDetail = True
  1634.           DisplayWidth = 50
  1635.           Position = 6
  1636.           TableName = 'Patienten'
  1637.         end
  1638.         object ppField8: TppField
  1639.           FieldAlias = 'Rechvorname'
  1640.           FieldName = 'Rechvorname'
  1641.           FieldLength = 50
  1642.           IsDetail = True
  1643.           DisplayWidth = 50
  1644.           Position = 7
  1645.           TableName = 'Patienten'
  1646.         end
  1647.         object ppField9: TppField
  1648.           FieldAlias = 'Rechstrasse'
  1649.           FieldName = 'Rechstrasse'
  1650.           FieldLength = 80
  1651.           IsDetail = True
  1652.           DisplayWidth = 80
  1653.           Position = 8
  1654.           TableName = 'Patienten'
  1655.         end
  1656.         object ppField10: TppField
  1657.           FieldAlias = 'Rechplzort'
  1658.           FieldName = 'Rechplzort'
  1659.           FieldLength = 60
  1660.           IsDetail = True
  1661.           DisplayWidth = 60
  1662.           Position = 9
  1663.           TableName = 'Patienten'
  1664.         end
  1665.         object ppField11: TppField
  1666.           FieldAlias = 'Rechnungsausgangstext'
  1667.           FieldName = 'Rechnungsausgangstext'
  1668.           FieldLength = 255
  1669.           IsDetail = True
  1670.           DisplayWidth = 255
  1671.           Position = 10
  1672.           TableName = 'Patienten'
  1673.         end
  1674.         object ppField12: TppField
  1675.           FieldAlias = 'Rechnungseingangstext'
  1676.           FieldName = 'Rechnungseingangstext'
  1677.           FieldLength = 255
  1678.           IsDetail = True
  1679.           DisplayWidth = 255
  1680.           Position = 11
  1681.           TableName = 'Patienten'
  1682.         end
  1683.         object ppField13: TppField
  1684.           FieldAlias = 'Diagnose'
  1685.           FieldName = 'Diagnose'
  1686.           FieldLength = 0
  1687.           Linkable = False
  1688.           DataType = dtMemo
  1689.           DisplayWidth = 10
  1690.           Position = 12
  1691.           TableName = 'Behandlungen'
  1692.         end
  1693.         object ppField14: TppField
  1694.           FieldAlias = 'Nr'
  1695.           FieldName = 'Nr'
  1696.           FieldLength = 0
  1697.           IsDetail = True
  1698.           DataType = dtInteger
  1699.           DisplayWidth = 10
  1700.           Position = 13
  1701.           TableName = 'Kopien'
  1702.         end
  1703.         object ppField15: TppField
  1704.           FieldAlias = 'IdPatient'
  1705.           FieldName = 'Id_2'
  1706.           FieldLength = 0
  1707.           IsDetail = True
  1708.           DataType = dtLongint
  1709.           DisplayWidth = 10
  1710.           Position = 14
  1711.           TableName = 'Patienten'
  1712.         end
  1713.         object ppField16: TppField
  1714.           FieldAlias = 'bisherbezahlt'
  1715.           FieldName = 'bisherbezahlt'
  1716.           FieldLength = 4
  1717.           DataType = dtDouble
  1718.           DisplayWidth = 20
  1719.           Position = 15
  1720.           TableName = 'Behandlungen'
  1721.         end
  1722.         object ppField17: TppField
  1723.           FieldAlias = 'RechAnschrift'
  1724.           FieldName = 'RechAnschrift'
  1725.           FieldLength = 255
  1726.           DisplayWidth = 255
  1727.           Position = 16
  1728.           TableName = 'Behandlungen'
  1729.         end
  1730.         object ppField18: TppField
  1731.           FieldAlias = 'VollerName'
  1732.           FieldName = 'Patienten_Rechvorname_Pat'
  1733.           FieldLength = 50
  1734.           DisplayWidth = 50
  1735.           Position = 17
  1736.           TableName = 'Patienten'
  1737.         end
  1738.         object ppField19: TppField
  1739.           FieldAlias = 'Patienten_Vorname_Patient'
  1740.           FieldName = 'Patienten_Vorname_Patient'
  1741.           FieldLength = 25
  1742.           DisplayWidth = 25
  1743.           Position = 18
  1744.           TableName = 'Patienten'
  1745.         end
  1746.         object ppField20: TppField
  1747.           FieldAlias = 'Trennung'
  1748.           FieldName = 'Behandlungen_Id_10_Kopien'
  1749.           FieldLength = 0
  1750.           DataType = dtInteger
  1751.           DisplayWidth = 10
  1752.           Position = 19
  1753.           TableName = 'Behandlungen'
  1754.         end
  1755.       end
  1756.       object daSQL1: TdaSQL
  1757.         GuidCollationType = gcMSAccess
  1758.         DatabaseName = 'ADOConnection'
  1759.         DatabaseType = dtMSAccess
  1760.         DataPipelineName = 'Behandlungen'
  1761.         LinkColor = clMaroon
  1762.         LinkType = ltMagicSQL
  1763.         MaxSQLFieldAliasLength = 25
  1764.         SQLText.Strings = (
  1765.           'SELECT Behandlungen.Id, Behandlungen.Datum, '
  1766.           '       Behandlungen.Anmerkung, '
  1767.           '       Behandlungen.RechnungsNr, '
  1768.           '       Patienten.Anrede, Patienten.Rechanrede, '
  1769.           '       Patienten.Rechname, Patienten.Rechvorname, '
  1770.           '       Patienten.Rechstrasse, '
  1771.           '       Patienten.Rechplzort, '
  1772.           '       Patienten.Rechnungsausgangstext, '
  1773.           '       Patienten.Rechnungseingangstext, '
  1774.           '       Behandlungen.Diagnose, Kopien.Nr, '
  1775.           '       Patienten.Id AS Id_2, '
  1776.           '       Behandlungen.bisherbezahlt, '
  1777.           '       Behandlungen.RechAnschrift, '
  1778.          
  1779.             '       Patienten.Rechvorname + '#39' '#39' + Patienten.RechName AS Patie' +
  1780.            'nten_Rechvorname_Pat, '
  1781.          
  1782.             '       Patienten.Vorname + '#39' '#39' + Patienten.Name & iif(Geburtstag' +
  1783.            ' is null,'#39#39', '#39', geb.  '#39' & Geburtstag) AS Patienten_Vorname_Patie' +
  1784.            'nt, '
  1785.          
  1786.             '       Behandlungen.Id * 10 + Kopien.Nr AS Behandlungen_Id_10_Ko' +
  1787.             'pien'
  1788.           'FROM ((Behandlungen Behandlungen'
  1789.           '      INNER JOIN Patienten Patienten ON '
  1790.           '     (Patienten.Id = Behandlungen.Patient) )'
  1791.           '      INNER JOIN Kopien Kopien ON '
  1792.           '     (Kopien.Anzahl = Patienten.Kopien) )'
  1793.           'WHERE ( Behandlungen.Auswahl = TRUE )'
  1794.           'ORDER BY Behandlungen.RechnungsNr, Kopien.Nr')
  1795.         SQLType = sqSQL2
  1796.         object daCalculation1: TdaCalculation
  1797.           ChildType = 8
  1798.           Alias = 'VollerName'
  1799.           DisplayWidth = 50
  1800.           FieldAlias = 'Rechvorname'
  1801.           FieldLength = 50
  1802.           FieldName = 'Rechvorname'
  1803.           SQLFieldName = 'Patienten_Rechvorname_Pat'
  1804.           TableAlias = 'Patienten'
  1805.           TableName = 'Patienten'
  1806.           TableSQLAlias = 'Patienten'
  1807.           CalcType = dacaExpression
  1808.           Expression = 'Patienten.Rechvorname + '#39' '#39' + Patienten.RechName'
  1809.        end
  1810.         object daCalculation2: TdaCalculation
  1811.           ChildType = 8
  1812.           Alias = 'Patienten_Vorname_Patient'
  1813.           DisplayWidth = 25
  1814.           FieldAlias = 'Vorname'
  1815.           FieldLength = 25
  1816.           FieldName = 'Vorname'
  1817.           SQLFieldName = 'Patienten_Vorname_Patient'
  1818.           TableAlias = 'Patienten'
  1819.           TableName = 'Patienten'
  1820.           TableSQLAlias = 'Patienten'
  1821.           CalcType = dacaExpression
  1822.           Expression =
  1823.             'Patienten.Vorname + '#39' '#39' + Patienten.Name & iif(Geburtstag is nul' +
  1824.            'l,'#39#39', '#39', geb.  '#39' & Geburtstag)'
  1825.        end
  1826.         object daCalculation3: TdaCalculation
  1827.           ChildType = 8
  1828.           Alias = 'Trennung'
  1829.           DataType = dtInteger
  1830.           DisplayWidth = 10
  1831.           FieldAlias = 'RechnungsNr'
  1832.           FieldLength = 0
  1833.           FieldName = 'RechnungsNr'
  1834.           SQLFieldName = 'Behandlungen_Id_10_Kopien'
  1835.           TableAlias = 'Behandlungen'
  1836.           TableName = 'Behandlungen'
  1837.           TableSQLAlias = 'Behandlungen'
  1838.           CalcType = dacaExpression
  1839.           Expression = 'Behandlungen.Id * 10 + Kopien.Nr'
  1840.         end
  1841.         object daCriteria1: TdaCriteria
  1842.           ChildType = 7
  1843.           Level = 0
  1844.           Value = '1'
  1845.           object TdaField
  1846.             Alias = 'Auswahl'
  1847.             DataType = dtBoolean
  1848.             DisplayWidth = 6
  1849.             FieldAlias = 'Auswahl'
  1850.             FieldLength = 0
  1851.             FieldName = 'Auswahl'
  1852.             SQLFieldName = 'Auswahl'
  1853.             TableAlias = 'Behandlungen'
  1854.             TableName = 'Behandlungen'
  1855.             TableSQLAlias = 'Behandlungen'
  1856.           end
  1857.         end
  1858.         object daField1: TdaField
  1859.           Alias = 'Id'
  1860.           DataType = dtLongint
  1861.           DisplayWidth = 10
  1862.           FieldAlias = 'Id'
  1863.           FieldLength = 0
  1864.           FieldName = 'Id'
  1865.           SQLFieldName = 'Id'
  1866.           TableAlias = 'Behandlungen'
  1867.           TableName = 'Behandlungen'
  1868.           TableSQLAlias = 'Behandlungen'
  1869.         end
  1870.         object daField2: TdaField
  1871.           Alias = 'Datum'
  1872.           DataType = dtDateTime
  1873.           DisplayWidth = 18
  1874.           FieldAlias = 'Datum'
  1875.           FieldLength = 0
  1876.           FieldName = 'Datum'
  1877.           SQLFieldName = 'Datum'
  1878.           TableAlias = 'Behandlungen'
  1879.           TableName = 'Behandlungen'
  1880.           TableSQLAlias = 'Behandlungen'
  1881.         end
  1882.         object daField3: TdaField
  1883.           Alias = 'Anmerkung'
  1884.           DataType = dtMemo
  1885.           DisplayWidth = 10
  1886.           FieldAlias = 'Anmerkung'
  1887.           FieldLength = 0
  1888.           FieldName = 'Anmerkung'
  1889.           Linkable = False
  1890.           SQLFieldName = 'Anmerkung'
  1891.           TableAlias = 'Behandlungen'
  1892.           TableName = 'Behandlungen'
  1893.           TableSQLAlias = 'Behandlungen'
  1894.         end
  1895.         object daField4: TdaField
  1896.           Alias = 'RechnungsNr'
  1897.           DataType = dtInteger
  1898.           DisplayWidth = 10
  1899.           FieldAlias = 'RechnungsNr'
  1900.           FieldLength = 0
  1901.           FieldName = 'RechnungsNr'
  1902.           SQLFieldName = 'RechnungsNr'
  1903.           TableAlias = 'Behandlungen'
  1904.           TableName = 'Behandlungen'
  1905.           TableSQLAlias = 'Behandlungen'
  1906.         end
  1907.         object daField5: TdaField
  1908.           Alias = 'Anrede'
  1909.           DisplayWidth = 20
  1910.           FieldAlias = 'Anrede'
  1911.           FieldLength = 20
  1912.           FieldName = 'Anrede'
  1913.           IsDetail = True
  1914.           SQLFieldName = 'Anrede'
  1915.           TableAlias = 'Patienten'
  1916.           TableName = 'Patienten'
  1917.           TableSQLAlias = 'Patienten'
  1918.         end
  1919.         object daField6: TdaField
  1920.           Alias = 'Rechanrede'
  1921.           DisplayWidth = 20
  1922.           FieldAlias = 'Rechanrede'
  1923.           FieldLength = 20
  1924.           FieldName = 'Rechanrede'
  1925.           IsDetail = True
  1926.           SQLFieldName = 'Rechanrede'
  1927.           TableAlias = 'Patienten'
  1928.           TableName = 'Patienten'
  1929.           TableSQLAlias = 'Patienten'
  1930.         end
  1931.         object daField7: TdaField
  1932.           Alias = 'Rechname'
  1933.           DisplayWidth = 50
  1934.           FieldAlias = 'Rechname'
  1935.           FieldLength = 50
  1936.           FieldName = 'Rechname'
  1937.           IsDetail = True
  1938.           SQLFieldName = 'Rechname'
  1939.           TableAlias = 'Patienten'
  1940.           TableName = 'Patienten'
  1941.           TableSQLAlias = 'Patienten'
  1942.         end
  1943.         object daField8: TdaField
  1944.           Alias = 'Rechvorname'
  1945.           DisplayWidth = 50
  1946.           FieldAlias = 'Rechvorname'
  1947.           FieldLength = 50
  1948.           FieldName = 'Rechvorname'
  1949.           IsDetail = True
  1950.           SQLFieldName = 'Rechvorname'
  1951.           TableAlias = 'Patienten'
  1952.           TableName = 'Patienten'
  1953.           TableSQLAlias = 'Patienten'
  1954.         end
  1955.         object daField9: TdaField
  1956.           Alias = 'Rechstrasse'
  1957.           DisplayWidth = 80
  1958.           FieldAlias = 'Rechstrasse'
  1959.           FieldLength = 80
  1960.           FieldName = 'Rechstrasse'
  1961.           IsDetail = True
  1962.           SQLFieldName = 'Rechstrasse'
  1963.           TableAlias = 'Patienten'
  1964.           TableName = 'Patienten'
  1965.           TableSQLAlias = 'Patienten'
  1966.         end
  1967.         object daField10: TdaField
  1968.           Alias = 'Rechplzort'
  1969.           DisplayWidth = 60
  1970.           FieldAlias = 'Rechplzort'
  1971.           FieldLength = 60
  1972.           FieldName = 'Rechplzort'
  1973.           IsDetail = True
  1974.           SQLFieldName = 'Rechplzort'
  1975.           TableAlias = 'Patienten'
  1976.           TableName = 'Patienten'
  1977.           TableSQLAlias = 'Patienten'
  1978.         end
  1979.         object daField11: TdaField
  1980.           Alias = 'Rechnungsausgangstext'
  1981.           DisplayWidth = 255
  1982.           FieldAlias = 'Rechnungsausgangstext'
  1983.           FieldLength = 255
  1984.           FieldName = 'Rechnungsausgangstext'
  1985.           IsDetail = True
  1986.           SQLFieldName = 'Rechnungsausgangstext'
  1987.           TableAlias = 'Patienten'
  1988.           TableName = 'Patienten'
  1989.           TableSQLAlias = 'Patienten'
  1990.         end
  1991.         object daField12: TdaField
  1992.           Alias = 'Rechnungseingangstext'
  1993.           DisplayWidth = 255
  1994.           FieldAlias = 'Rechnungseingangstext'
  1995.           FieldLength = 255
  1996.           FieldName = 'Rechnungseingangstext'
  1997.           IsDetail = True
  1998.           SQLFieldName = 'Rechnungseingangstext'
  1999.           TableAlias = 'Patienten'
  2000.           TableName = 'Patienten'
  2001.           TableSQLAlias = 'Patienten'
  2002.         end
  2003.         object daField13: TdaField
  2004.           Alias = 'Diagnose'
  2005.           DataType = dtMemo
  2006.           DisplayWidth = 10
  2007.           FieldAlias = 'Diagnose'
  2008.           FieldLength = 0
  2009.           FieldName = 'Diagnose'
  2010.           Linkable = False
  2011.           SQLFieldName = 'Diagnose'
  2012.           TableAlias = 'Behandlungen'
  2013.           TableName = 'Behandlungen'
  2014.           TableSQLAlias = 'Behandlungen'
  2015.         end
  2016.         object daField14: TdaField
  2017.           Alias = 'Nr'
  2018.           DataType = dtInteger
  2019.           DisplayWidth = 10
  2020.           FieldAlias = 'Nr'
  2021.           FieldLength = 0
  2022.           FieldName = 'Nr'
  2023.           IsDetail = True
  2024.           SQLFieldName = 'Nr'
  2025.           TableAlias = 'Kopien'
  2026.           TableName = 'Kopien'
  2027.           TableSQLAlias = 'Kopien'
  2028.         end
  2029.         object daField15: TdaField
  2030.           Alias = 'IdPatient'
  2031.           DataType = dtLongint
  2032.           DisplayWidth = 10
  2033.           FieldAlias = 'Id'
  2034.           FieldLength = 0
  2035.           FieldName = 'Id'
  2036.           IsDetail = True
  2037.           SQLFieldName = 'Id_2'
  2038.           TableAlias = 'Patienten'
  2039.           TableName = 'Patienten'
  2040.           TableSQLAlias = 'Patienten'
  2041.         end
  2042.         object daField16: TdaField
  2043.           Alias = 'bisherbezahlt'
  2044.           DataType = dtDouble
  2045.           DisplayWidth = 20
  2046.           FieldAlias = 'bisherbezahlt'
  2047.           FieldLength = 4
  2048.           FieldName = 'bisherbezahlt'
  2049.           SQLFieldName = 'bisherbezahlt'
  2050.           TableAlias = 'Behandlungen'
  2051.           TableName = 'Behandlungen'
  2052.           TableSQLAlias = 'Behandlungen'
  2053.         end
  2054.         object daField17: TdaField
  2055.           Alias = 'RechAnschrift'
  2056.           DisplayWidth = 255
  2057.           FieldAlias = 'RechAnschrift'
  2058.           FieldLength = 255
  2059.           FieldName = 'RechAnschrift'
  2060.           SQLFieldName = 'RechAnschrift'
  2061.           TableAlias = 'Behandlungen'
  2062.           TableName = 'Behandlungen'
  2063.           TableSQLAlias = 'Behandlungen'
  2064.         end
  2065.         object daField18: TdaField
  2066.           ChildType = 2
  2067.           Alias = 'RechnungsNr'
  2068.           DataType = dtInteger
  2069.           DisplayWidth = 10
  2070.           FieldAlias = 'RechnungsNr'
  2071.           FieldLength = 0
  2072.           FieldName = 'RechnungsNr'
  2073.           SQLFieldName = 'RechnungsNr'
  2074.           TableAlias = 'Behandlungen'
  2075.           TableName = 'Behandlungen'
  2076.           TableSQLAlias = 'Behandlungen'
  2077.         end
  2078.         object daField19: TdaField
  2079.           ChildType = 2
  2080.           Alias = 'Nr'
  2081.           DataType = dtInteger
  2082.           DisplayWidth = 10
  2083.           FieldAlias = 'Nr'
  2084.           FieldLength = 0
  2085.           FieldName = 'Nr'
  2086.           SQLFieldName = 'Nr'
  2087.           TableAlias = 'Kopien'
  2088.           TableName = 'Kopien'
  2089.           TableSQLAlias = 'Kopien'
  2090.         end
  2091.         object daTable1: TdaTable
  2092.           ChildType = 5
  2093.           Alias = 'Behandlungen'
  2094.           JoinType = dajtNone
  2095.           SQLAlias = 'Behandlungen'
  2096.           TableAlias = 'Behandlungen'
  2097.           TableName = 'Behandlungen'
  2098.         end
  2099.         object daTable2: TdaTable
  2100.           ChildType = 5
  2101.           Alias = 'Patienten'
  2102.           SQLAlias = 'Patienten'
  2103.           TableAlias = 'Patienten'
  2104.           TableName = 'Patienten'
  2105.           object daTableJoin1: TdaTableJoin
  2106.             ChildType = 6
  2107.             object daField21: TdaField
  2108.               ChildType = 3
  2109.               Alias = 'Id'
  2110.               DataType = dtLongint
  2111.               DisplayWidth = 10
  2112.               FieldAlias = 'Id'
  2113.               FieldLength = 0
  2114.               FieldName = 'Id'
  2115.               SQLFieldName = 'Id'
  2116.               TableAlias = 'Patienten'
  2117.               TableName = 'Patienten'
  2118.               TableSQLAlias = 'Patienten'
  2119.             end
  2120.             object daField20: TdaField
  2121.               ChildType = 4
  2122.               Alias = 'Patient'
  2123.               DataType = dtInteger
  2124.               DisplayWidth = 10
  2125.               FieldAlias = 'Patient'
  2126.               FieldLength = 0
  2127.               FieldName = 'Patient'
  2128.               SQLFieldName = 'Patient'
  2129.               TableAlias = 'Behandlungen'
  2130.               TableName = 'Behandlungen'
  2131.               TableSQLAlias = 'Behandlungen'
  2132.             end
  2133.           end
  2134.         end
  2135.         object daTable3: TdaTable
  2136.           ChildType = 5
  2137.           Alias = 'Kopien'
  2138.           SQLAlias = 'Kopien'
  2139.           TableAlias = 'Kopien'
  2140.           TableName = 'Kopien'
  2141.           object daTableJoin2: TdaTableJoin
  2142.             ChildType = 6
  2143.             object daField23: TdaField
  2144.               ChildType = 3
  2145.               Alias = 'Anzahl'
  2146.               DataType = dtInteger
  2147.               DisplayWidth = 10
  2148.               FieldAlias = 'Anzahl'
  2149.               FieldLength = 0
  2150.               FieldName = 'Anzahl'
  2151.               SQLFieldName = 'Anzahl'
  2152.               TableAlias = 'Kopien'
  2153.               TableName = 'Kopien'
  2154.               TableSQLAlias = 'Kopien'
  2155.             end
  2156.             object daField22: TdaField
  2157.               ChildType = 4
  2158.               Alias = 'Kopien'
  2159.               DataType = dtInteger
  2160.               DisplayWidth = 10
  2161.               FieldAlias = 'Kopien'
  2162.               FieldLength = 0
  2163.               FieldName = 'Kopien'
  2164.               SQLFieldName = 'Kopien'
  2165.               TableAlias = 'Patienten'
  2166.               TableName = 'Patienten'
  2167.               TableSQLAlias = 'Patienten'
  2168.             end
  2169.           end
  2170.         end
  2171.       end
  2172.     end
  2173.     object daADOQueryDataView2: TdaADOQueryDataView
  2174.       UserName = 'Query_Behandlungsleistungen'
  2175.       Height = 246
  2176.       Left = 297
  2177.       NameColumnWidth = 105
  2178.       SizeColumnWidth = 35
  2179.       SortMode = 0
  2180.       Top = 15
  2181.       TypeColumnWidth = 52
  2182.       Width = 224
  2183.       AutoSearchTabOrder = 0
  2184.       MasterDataViewUserName = 'Query_Behandlungen'
  2185.       object Behandlungsleistungen: TppChildDBPipeline
  2186.         AutoCreateFields = False
  2187.         UserName = 'Behandlungsleistungen'
  2188.         MasterDataPipelineName = 'Behandlungen'
  2189.         object ppField1: TppField
  2190.           FieldAlias = 'Id'
  2191.           FieldName = 'Id'
  2192.           FieldLength = 0
  2193.           DataType = dtLongint
  2194.           DisplayWidth = 10
  2195.           Position = 0
  2196.           TableName = 'Behandlungsleistungen'
  2197.         end
  2198.         object ppField2: TppField
  2199.           FieldAlias = 'Behandlung'
  2200.           FieldName = 'Behandlung'
  2201.           FieldLength = 0
  2202.           DataType = dtInteger
  2203.           DisplayWidth = 10
  2204.           Position = 1
  2205.           TableName = 'Behandlungsleistungen'
  2206.         end
  2207.         object ppField3: TppField
  2208.           FieldAlias = 'Behandlungsdatum'
  2209.           FieldName = 'Behandlungsdatum'
  2210.           FieldLength = 0
  2211.           DataType = dtDateTime
  2212.           DisplayWidth = 18
  2213.           Position = 2
  2214.           TableName = 'Behandlungsleistungen'
  2215.         end
  2216.         object ppField4: TppField
  2217.           FieldAlias = 'Anzahl'
  2218.           FieldName = 'Anzahl'
  2219.           FieldLength = 0
  2220.           DataType = dtDouble
  2221.           DisplayWidth = 10
  2222.           Position = 3
  2223.           TableName = 'Behandlungsleistungen'
  2224.         end
  2225.         object ppField5: TppField
  2226.           FieldAlias = 'Geb'#252'H'
  2227.          FieldName = 'Geb'#252'H'
  2228.          FieldLength = 10
  2229.           DisplayWidth = 10
  2230.           Position = 4
  2231.           TableName = 'Behandlungsleistungen'
  2232.         end
  2233.         object ppField6: TppField
  2234.           FieldAlias = 'Leistung'
  2235.           FieldName = 'Leistung'
  2236.           FieldLength = 255
  2237.           DisplayWidth = 255
  2238.           Position = 5
  2239.           TableName = 'Behandlungsleistungen'
  2240.         end
  2241.         object ppField7: TppField
  2242.           FieldAlias = 'Honorar'
  2243.           FieldName = 'Honorar'
  2244.           FieldLength = 0
  2245.           DataType = dtDouble
  2246.           DisplayWidth = 10
  2247.           Position = 6
  2248.           TableName = 'Behandlungsleistungen'
  2249.         end
  2250.         object ppField8: TppField
  2251.           FieldAlias = 'GesamtHonorar'
  2252.           FieldName = 'GesamtHonorar'
  2253.           FieldLength = 0
  2254.           DataType = dtDouble
  2255.           DisplayWidth = 10
  2256.           Position = 7
  2257.           TableName = 'Behandlungsleistungen'
  2258.         end
  2259.         object ppField9: TppField
  2260.           FieldAlias = 'Anmerkung'
  2261.           FieldName = 'Anmerkung'
  2262.           FieldLength = 0
  2263.           Linkable = False
  2264.           DataType = dtMemo
  2265.           DisplayWidth = 10
  2266.           Position = 8
  2267.           TableName = 'Behandlungsleistungen'
  2268.         end
  2269.         object TppMasterFieldLink
  2270.           MasterFieldName = 'RechnungsNr'
  2271.           GuidCollationType = gcMSAccess
  2272.           DetailFieldName = 'RechnungsNr'
  2273.           DetailSortOrder = soAscending
  2274.           IsCaseSensitive = True
  2275.         end
  2276.         object TppMasterFieldLink
  2277.           MasterFieldName = 'Nr'
  2278.           GuidCollationType = gcMSAccess
  2279.           DetailFieldName = 'Nr'
  2280.           DetailSortOrder = soAscending
  2281.           IsCaseSensitive = True
  2282.         end
  2283.         object TppMasterFieldLink
  2284.           MasterFieldName = 'Id'
  2285.           GuidCollationType = gcMSAccess
  2286.           DetailFieldName = 'Behandlung'
  2287.           DetailSortOrder = soAscending
  2288.           IsCaseSensitive = True
  2289.         end
  2290.       end
  2291.       object daSQL2: TdaSQL
  2292.         GuidCollationType = gcMSAccess
  2293.         DatabaseName = 'ADOConnection'
  2294.         DatabaseType = dtMSAccess
  2295.         DataPipelineName = 'Behandlungsleistungen'
  2296.         IsCaseSensitive = True
  2297.         LinkColor = clNavy
  2298.         LinkType = ltMagicSQL
  2299.         MaxSQLFieldAliasLength = 25
  2300.         SQLText.Strings = (
  2301.           'SELECT Behandlungsleistungen.Id, '
  2302.           '       Behandlungsleistungen.Behandlung, '
  2303.           '       Behandlungsleistungen.Behandlungsdatum, '
  2304.           '       Behandlungsleistungen.Anzahl, '
  2305.           '       Behandlungsleistungen.Geb'#252'H, '
  2306.          '       Behandlungsleistungen.Leistung, '
  2307.           '       Behandlungsleistungen.Honorar, '
  2308.           '       Behandlungsleistungen.GesamtHonorar, '
  2309.           '       Behandlungsleistungen.Anmerkung'
  2310.           'FROM Behandlungsleistungen Behandlungsleistungen'
  2311.           'WHERE ('#39'c'#39' <> '#39'c'#39' )')
  2312.        SQLType = sqSQL2
  2313.         object daField1: TdaField
  2314.           Alias = 'Id'
  2315.           DataType = dtLongint
  2316.           DisplayWidth = 10
  2317.           FieldAlias = 'Id'
  2318.           FieldLength = 0
  2319.           FieldName = 'Id'
  2320.           SQLFieldName = 'Id'
  2321.           TableAlias = 'Behandlungsleistungen'
  2322.           TableName = 'Behandlungsleistungen'
  2323.           TableSQLAlias = 'Behandlungsleistungen'
  2324.         end
  2325.         object daField2: TdaField
  2326.           Alias = 'Behandlung'
  2327.           DataType = dtInteger
  2328.           DisplayWidth = 10
  2329.           FieldAlias = 'Behandlung'
  2330.           FieldLength = 0
  2331.           FieldName = 'Behandlung'
  2332.           SQLFieldName = 'Behandlung'
  2333.           TableAlias = 'Behandlungsleistungen'
  2334.           TableName = 'Behandlungsleistungen'
  2335.           TableSQLAlias = 'Behandlungsleistungen'
  2336.         end
  2337.         object daField3: TdaField
  2338.           Alias = 'Behandlungsdatum'
  2339.           DataType = dtDateTime
  2340.           DisplayWidth = 18
  2341.           FieldAlias = 'Behandlungsdatum'
  2342.           FieldLength = 0
  2343.           FieldName = 'Behandlungsdatum'
  2344.           SQLFieldName = 'Behandlungsdatum'
  2345.           TableAlias = 'Behandlungsleistungen'
  2346.           TableName = 'Behandlungsleistungen'
  2347.           TableSQLAlias = 'Behandlungsleistungen'
  2348.         end
  2349.         object daField4: TdaField
  2350.           Alias = 'Anzahl'
  2351.           DataType = dtDouble
  2352.           DisplayWidth = 10
  2353.           FieldAlias = 'Anzahl'
  2354.           FieldLength = 0
  2355.           FieldName = 'Anzahl'
  2356.           SQLFieldName = 'Anzahl'
  2357.           TableAlias = 'Behandlungsleistungen'
  2358.           TableName = 'Behandlungsleistungen'
  2359.           TableSQLAlias = 'Behandlungsleistungen'
  2360.         end
  2361.         object daField5: TdaField
  2362.           Alias = 'Geb'#252'H'
  2363.          DisplayWidth = 10
  2364.           FieldAlias = 'Geb'#252'H'
  2365.          FieldLength = 10
  2366.           FieldName = 'Geb'#252'H'
  2367.          SQLFieldName = 'Geb'#252'H'
  2368.          TableAlias = 'Behandlungsleistungen'
  2369.           TableName = 'Behandlungsleistungen'
  2370.           TableSQLAlias = 'Behandlungsleistungen'
  2371.         end
  2372.         object daField6: TdaField
  2373.           Alias = 'Leistung'
  2374.           DisplayWidth = 255
  2375.           FieldAlias = 'Leistung'
  2376.           FieldLength = 255
  2377.           FieldName = 'Leistung'
  2378.           SQLFieldName = 'Leistung'
  2379.           TableAlias = 'Behandlungsleistungen'
  2380.           TableName = 'Behandlungsleistungen'
  2381.           TableSQLAlias = 'Behandlungsleistungen'
  2382.         end
  2383.         object daField7: TdaField
  2384.           Alias = 'Honorar'
  2385.           DataType = dtDouble
  2386.           DisplayWidth = 10
  2387.           FieldAlias = 'Honorar'
  2388.           FieldLength = 0
  2389.           FieldName = 'Honorar'
  2390.           SQLFieldName = 'Honorar'
  2391.           TableAlias = 'Behandlungsleistungen'
  2392.           TableName = 'Behandlungsleistungen'
  2393.           TableSQLAlias = 'Behandlungsleistungen'
  2394.         end
  2395.         object daField8: TdaField
  2396.           Alias = 'GesamtHonorar'
  2397.           DataType = dtDouble
  2398.           DisplayWidth = 10
  2399.           FieldAlias = 'GesamtHonorar'
  2400.           FieldLength = 0
  2401.           FieldName = 'GesamtHonorar'
  2402.           SQLFieldName = 'GesamtHonorar'
  2403.           TableAlias = 'Behandlungsleistungen'
  2404.           TableName = 'Behandlungsleistungen'
  2405.           TableSQLAlias = 'Behandlungsleistungen'
  2406.         end
  2407.         object daField9: TdaField
  2408.           Alias = 'Anmerkung'
  2409.           DataType = dtMemo
  2410.           DisplayWidth = 10
  2411.           FieldAlias = 'Anmerkung'
  2412.           FieldLength = 0
  2413.           FieldName = 'Anmerkung'
  2414.           Linkable = False
  2415.           SQLFieldName = 'Anmerkung'
  2416.           TableAlias = 'Behandlungsleistungen'
  2417.           TableName = 'Behandlungsleistungen'
  2418.           TableSQLAlias = 'Behandlungsleistungen'
  2419.         end
  2420.         object daField10: TdaField
  2421.           ChildType = 2
  2422.           Alias = 'Behandlungsdatum'
  2423.           DataType = dtDateTime
  2424.           DisplayWidth = 18
  2425.           FieldAlias = 'Behandlungsdatum'
  2426.           FieldLength = 0
  2427.           FieldName = 'Behandlungsdatum'
  2428.           SQLFieldName = 'Behandlungsdatum'
  2429.           TableAlias = 'Behandlungsleistungen'
  2430.           TableName = 'Behandlungsleistungen'
  2431.           TableSQLAlias = 'Behandlungsleistungen'
  2432.         end
  2433.         object daField11: TdaField
  2434.           ChildType = 2
  2435.           Alias = 'Geb'#252'H'
  2436.          DisplayWidth = 10
  2437.           FieldAlias = 'Geb'#252'H'
  2438.          FieldLength = 10
  2439.           FieldName = 'Geb'#252'H'
  2440.          SQLFieldName = 'Geb'#252'H'
  2441.          TableAlias = 'Behandlungsleistungen'
  2442.           TableName = 'Behandlungsleistungen'
  2443.           TableSQLAlias = 'Behandlungsleistungen'
  2444.         end
  2445.         object daTable1: TdaTable
  2446.           ChildType = 5
  2447.           Alias = 'Behandlungsleistungen'
  2448.           JoinType = dajtNone
  2449.           SQLAlias = 'Behandlungsleistungen'
  2450.           TableAlias = 'Behandlungsleistungen'
  2451.           TableName = 'Behandlungsleistungen'
  2452.         end
  2453.         object TdaSQLLink
  2454.           ChildType = 9
  2455.           object daField12: TdaField
  2456.             ChildType = 10
  2457.             Alias = 'Id'
  2458.             DataType = dtLongint
  2459.             DisplayWidth = 10
  2460.             FieldAlias = 'Id'
  2461.             FieldLength = 0
  2462.             FieldName = 'Id'
  2463.             SQLFieldName = 'Id'
  2464.             TableAlias = 'Behandlungen'
  2465.             TableName = 'Behandlungen'
  2466.             TableSQLAlias = 'Behandlungen'
  2467.           end
  2468.           object daField13: TdaField
  2469.             ChildType = 11
  2470.             Alias = 'Behandlung'
  2471.             DataType = dtInteger
  2472.             DisplayWidth = 10
  2473.             FieldAlias = 'Behandlung'
  2474.             FieldLength = 0
  2475.             FieldName = 'Behandlung'
  2476.             SQLFieldName = 'Behandlung'
  2477.             TableAlias = 'Behandlungsleistungen'
  2478.             TableName = 'Behandlungsleistungen'
  2479.             TableSQLAlias = 'Behandlungsleistungen'
  2480.           end
  2481.         end
  2482.       end
  2483.     end
  2484.     object daADOQueryDataView3: TdaADOQueryDataView
  2485.       UserName = 'Query_Praxisdaten2'
  2486.       Height = 301
  2487.       Left = 571
  2488.       NameColumnWidth = 105
  2489.       SizeColumnWidth = 35
  2490.       SortMode = 0
  2491.       Top = 10
  2492.       TypeColumnWidth = 52
  2493.       Width = 224
  2494.       AutoSearchTabOrder = 0
  2495.       object Praxisdaten: TppChildDBPipeline
  2496.         AutoCreateFields = False
  2497.         UserName = 'Praxisdaten'
  2498.         object ppField1: TppField
  2499.           FieldAlias = 'Stra'#223'e'
  2500.          FieldName = 'Stra'#223'e'
  2501.          FieldLength = 100
  2502.           DisplayWidth = 100
  2503.           Position = 0
  2504.           TableName = 'Praxisdaten'
  2505.         end
  2506.         object ppField2: TppField
  2507.           FieldAlias = 'Ort'
  2508.           FieldName = 'Ort'
  2509.           FieldLength = 100
  2510.           DisplayWidth = 100
  2511.           Position = 1
  2512.           TableName = 'Praxisdaten'
  2513.         end
  2514.         object ppField3: TppField
  2515.           FieldAlias = 'Bank'
  2516.           FieldName = 'Bank'
  2517.           FieldLength = 0
  2518.           Linkable = False
  2519.           DataType = dtMemo
  2520.           DisplayWidth = 10
  2521.           Position = 2
  2522.           TableName = 'Praxisdaten'
  2523.         end
  2524.         object ppField4: TppField
  2525.           FieldAlias = 'Tel1'
  2526.           FieldName = 'Tel1'
  2527.           FieldLength = 50
  2528.           DisplayWidth = 50
  2529.           Position = 3
  2530.           TableName = 'Praxisdaten'
  2531.         end
  2532.         object ppField5: TppField
  2533.           FieldAlias = 'Tel2'
  2534.           FieldName = 'Tel2'
  2535.           FieldLength = 50
  2536.           DisplayWidth = 50
  2537.           Position = 4
  2538.           TableName = 'Praxisdaten'
  2539.         end
  2540.         object ppField6: TppField
  2541.           FieldAlias = 'Fax'
  2542.           FieldName = 'Fax'
  2543.           FieldLength = 50
  2544.           DisplayWidth = 50
  2545.           Position = 5
  2546.           TableName = 'Praxisdaten'
  2547.         end
  2548.         object ppField7: TppField
  2549.           FieldAlias = 'Email'
  2550.           FieldName = 'Email'
  2551.           FieldLength = 50
  2552.           DisplayWidth = 50
  2553.           Position = 6
  2554.           TableName = 'Praxisdaten'
  2555.         end
  2556.         object ppField8: TppField
  2557.           FieldAlias = 'Berufsbezeichnung'
  2558.           FieldName = 'Berufsbezeichnung'
  2559.           FieldLength = 50
  2560.           DisplayWidth = 50
  2561.           Position = 7
  2562.           TableName = 'Praxisdaten'
  2563.         end
  2564.         object ppField9: TppField
  2565.           FieldAlias = 'Praxisname'
  2566.           FieldName = 'Praxisname'
  2567.           FieldLength = 100
  2568.           DisplayWidth = 100
  2569.           Position = 8
  2570.           TableName = 'Praxisdaten'
  2571.         end
  2572.         object ppField10: TppField
  2573.           FieldAlias = 'VollerName'
  2574.           FieldName = 'Vorname_Name'
  2575.           FieldLength = 50
  2576.           DisplayWidth = 50
  2577.           Position = 9
  2578.           TableName = 'Praxisdaten'
  2579.         end
  2580.         object ppField11: TppField
  2581.           FieldAlias = 'Absender'
  2582.           FieldName = 'Vorname_Name_Stra'#223'e_Ort'
  2583.          FieldLength = 50
  2584.           DisplayWidth = 50
  2585.           Position = 10
  2586.           TableName = 'Praxisdaten'
  2587.         end
  2588.       end
  2589.       object daSQL3: TdaSQL
  2590.         GuidCollationType = gcMSAccess
  2591.         DatabaseName = 'ADOConnection'
  2592.         DatabaseType = dtMSAccess
  2593.         DataPipelineName = 'Praxisdaten'
  2594.         IsCaseSensitive = True
  2595.         LinkColor = clGreen
  2596.         LinkType = ltMagicSQL
  2597.         MaxSQLFieldAliasLength = 25
  2598.         SQLText.Strings = (
  2599.           'SELECT Praxisdaten.Stra'#223'e, Praxisdaten.Ort, '
  2600.          '       Praxisdaten.Bank, Praxisdaten.Tel1, '
  2601.           '       Praxisdaten.Tel2, Praxisdaten.Fax, '
  2602.           '       Praxisdaten.Email, '
  2603.           '       Praxisdaten.Berufsbezeichnung, '
  2604.           '       Praxisdaten.Praxisname, '
  2605.           '       Vorname+'#39' '#39'+Name AS Vorname_Name, '
  2606.          
  2607.             '       Vorname+'#39' '#39'+Name+'#39'    '#39'+Stra'#223'e+'#39'    '#39'+Ort AS Vorname_Name' +
  2608.            '_Stra'#223'e_Ort'
  2609.          'FROM Praxisdaten Praxisdaten'
  2610.           'WHERE ('#39'c'#39' <> '#39'c'#39' )')
  2611.        SQLType = sqSQL2
  2612.         object daCalculation1: TdaCalculation
  2613.           ChildType = 8
  2614.           Alias = 'VollerName'
  2615.           DisplayWidth = 50
  2616.           FieldAlias = 'Name'
  2617.           FieldLength = 50
  2618.           FieldName = 'Name'
  2619.           SQLFieldName = 'Vorname_Name'
  2620.           TableAlias = 'Praxisdaten'
  2621.           TableName = 'Praxisdaten'
  2622.           TableSQLAlias = 'Praxisdaten'
  2623.           CalcType = dacaExpression
  2624.           Expression = 'Vorname+'#39' '#39'+Name'
  2625.        end
  2626.         object daCalculation2: TdaCalculation
  2627.           ChildType = 8
  2628.           Alias = 'Absender'
  2629.           DisplayWidth = 50
  2630.           FieldAlias = 'Vorname'
  2631.           FieldLength = 50
  2632.           FieldName = 'Vorname'
  2633.           SQLFieldName = 'Vorname_Name_Stra'#223'e_Ort'
  2634.          TableAlias = 'Praxisdaten'
  2635.           TableName = 'Praxisdaten'
  2636.           TableSQLAlias = 'Praxisdaten'
  2637.           CalcType = dacaExpression
  2638.           Expression = 'Vorname+'#39' '#39'+Name+'#39'    '#39'+Stra'#223'e+'#39'    '#39'+Ort'
  2639.        end
  2640.         object daField1: TdaField
  2641.           Alias = 'Stra'#223'e'
  2642.          DisplayWidth = 100
  2643.           FieldAlias = 'Stra'#223'e'
  2644.          FieldLength = 100
  2645.           FieldName = 'Stra'#223'e'
  2646.          SQLFieldName = 'Stra'#223'e'
  2647.          TableAlias = 'Praxisdaten'
  2648.           TableName = 'Praxisdaten'
  2649.           TableSQLAlias = 'Praxisdaten'
  2650.         end
  2651.         object daField2: TdaField
  2652.           Alias = 'Ort'
  2653.           DisplayWidth = 100
  2654.           FieldAlias = 'Ort'
  2655.           FieldLength = 100
  2656.           FieldName = 'Ort'
  2657.           SQLFieldName = 'Ort'
  2658.           TableAlias = 'Praxisdaten'
  2659.           TableName = 'Praxisdaten'
  2660.           TableSQLAlias = 'Praxisdaten'
  2661.         end
  2662.         object daField3: TdaField
  2663.           Alias = 'Bank'
  2664.           DataType = dtMemo
  2665.           DisplayWidth = 10
  2666.           FieldAlias = 'Bank'
  2667.           FieldLength = 0
  2668.           FieldName = 'Bank'
  2669.           Linkable = False
  2670.           SQLFieldName = 'Bank'
  2671.           TableAlias = 'Praxisdaten'
  2672.           TableName = 'Praxisdaten'
  2673.           TableSQLAlias = 'Praxisdaten'
  2674.         end
  2675.         object daField4: TdaField
  2676.           Alias = 'Tel1'
  2677.           DisplayWidth = 50
  2678.           FieldAlias = 'Tel1'
  2679.           FieldLength = 50
  2680.           FieldName = 'Tel1'
  2681.           SQLFieldName = 'Tel1'
  2682.           TableAlias = 'Praxisdaten'
  2683.           TableName = 'Praxisdaten'
  2684.           TableSQLAlias = 'Praxisdaten'
  2685.         end
  2686.         object daField5: TdaField
  2687.           Alias = 'Tel2'
  2688.           DisplayWidth = 50
  2689.           FieldAlias = 'Tel2'
  2690.           FieldLength = 50
  2691.           FieldName = 'Tel2'
  2692.           SQLFieldName = 'Tel2'
  2693.           TableAlias = 'Praxisdaten'
  2694.           TableName = 'Praxisdaten'
  2695.           TableSQLAlias = 'Praxisdaten'
  2696.         end
  2697.         object daField6: TdaField
  2698.           Alias = 'Fax'
  2699.           DisplayWidth = 50
  2700.           FieldAlias = 'Fax'
  2701.           FieldLength = 50
  2702.           FieldName = 'Fax'
  2703.           SQLFieldName = 'Fax'
  2704.           TableAlias = 'Praxisdaten'
  2705.           TableName = 'Praxisdaten'
  2706.           TableSQLAlias = 'Praxisdaten'
  2707.         end
  2708.         object daField7: TdaField
  2709.           Alias = 'Email'
  2710.           DisplayWidth = 50
  2711.           FieldAlias = 'Email'
  2712.           FieldLength = 50
  2713.           FieldName = 'Email'
  2714.           SQLFieldName = 'Email'
  2715.           TableAlias = 'Praxisdaten'
  2716.           TableName = 'Praxisdaten'
  2717.           TableSQLAlias = 'Praxisdaten'
  2718.         end
  2719.         object daField8: TdaField
  2720.           Alias = 'Berufsbezeichnung'
  2721.           DisplayWidth = 50
  2722.           FieldAlias = 'Berufsbezeichnung'
  2723.           FieldLength = 50
  2724.           FieldName = 'Berufsbezeichnung'
  2725.           SQLFieldName = 'Berufsbezeichnung'
  2726.           TableAlias = 'Praxisdaten'
  2727.           TableName = 'Praxisdaten'
  2728.           TableSQLAlias = 'Praxisdaten'
  2729.         end
  2730.         object daField9: TdaField
  2731.           Alias = 'Praxisname'
  2732.           DisplayWidth = 100
  2733.           FieldAlias = 'Praxisname'
  2734.           FieldLength = 100
  2735.           FieldName = 'Praxisname'
  2736.           SQLFieldName = 'Praxisname'
  2737.           TableAlias = 'Praxisdaten'
  2738.           TableName = 'Praxisdaten'
  2739.           TableSQLAlias = 'Praxisdaten'
  2740.         end
  2741.         object daTable1: TdaTable
  2742.           ChildType = 5
  2743.           Alias = 'Praxisdaten'
  2744.           JoinType = dajtNone
  2745.           SQLAlias = 'Praxisdaten'
  2746.           TableAlias = 'Praxisdaten'
  2747.           TableName = 'Praxisdaten'
  2748.         end
  2749.       end
  2750.     end
  2751.     object daADOQueryDataView4: TdaADOQueryDataView
  2752.       UserName = 'Query_Optionen'
  2753.       Height = 127
  2754.       Left = 845
  2755.       NameColumnWidth = 105
  2756.       SizeColumnWidth = 35
  2757.       SortMode = 0
  2758.       Top = 10
  2759.       TypeColumnWidth = 52
  2760.       Width = 224
  2761.       AutoSearchTabOrder = 0
  2762.       object Optionen: TppChildDBPipeline
  2763.         AutoCreateFields = False
  2764.         UserName = 'Optionen'
  2765.         object ppField1: TppField
  2766.           FieldAlias = 'Zieltage'
  2767.           FieldName = 'Zieltage'
  2768.           FieldLength = 0
  2769.           DataType = dtInteger
  2770.           DisplayWidth = 10
  2771.           Position = 0
  2772.           TableName = 'Optionen'
  2773.         end
  2774.         object ppField2: TppField
  2775.           FieldAlias = 'Briefpapier'
  2776.           FieldName = 'Briefpapier'
  2777.           FieldLength = 0
  2778.           DataType = dtBoolean
  2779.           DisplayWidth = 6
  2780.           Position = 1
  2781.           TableName = 'Optionen'
  2782.         end
  2783.         object ppField3: TppField
  2784.           FieldAlias = 'W'#228'hrung'
  2785.          FieldName = 'W'#228'hrung'
  2786.          FieldLength = 3
  2787.           IsDetail = True
  2788.           DisplayWidth = 3
  2789.           Position = 2
  2790.           TableName = 'Waehrungen'
  2791.         end
  2792.       end
  2793.       object daSQL4: TdaSQL
  2794.         GuidCollationType = gcMSAccess
  2795.         DatabaseName = 'ADOConnection'
  2796.         DatabaseType = dtMSAccess
  2797.         DataPipelineName = 'Optionen'
  2798.         IsCaseSensitive = True
  2799.         LinkColor = clPurple
  2800.         LinkType = ltMagicSQL
  2801.         MaxSQLFieldAliasLength = 25
  2802.         SQLText.Strings = (
  2803.           'SELECT Optionen.Zieltage, Optionen.Briefpapier, '
  2804.           '       Waehrungen.W'#228'hrung'
  2805.          'FROM (Optionen Optionen'
  2806.           '      INNER JOIN Waehrungen Waehrungen ON '
  2807.           '     (Waehrungen.Id = Optionen.W'#228'hrung) )'
  2808.          'WHERE ('#39'c'#39' <> '#39'c'#39' )')
  2809.        SQLType = sqSQL2
  2810.         object daField1: TdaField
  2811.           Alias = 'Zieltage'
  2812.           DataType = dtInteger
  2813.           DisplayWidth = 10
  2814.           FieldAlias = 'Zieltage'
  2815.           FieldLength = 0
  2816.           FieldName = 'Zieltage'
  2817.           SQLFieldName = 'Zieltage'
  2818.           TableAlias = 'Optionen'
  2819.           TableName = 'Optionen'
  2820.           TableSQLAlias = 'Optionen'
  2821.         end
  2822.         object daField2: TdaField
  2823.           Alias = 'Briefpapier'
  2824.           DataType = dtBoolean
  2825.           DisplayWidth = 6
  2826.           FieldAlias = 'Briefpapier'
  2827.           FieldLength = 0
  2828.           FieldName = 'Briefpapier'
  2829.           SQLFieldName = 'Briefpapier'
  2830.           TableAlias = 'Optionen'
  2831.           TableName = 'Optionen'
  2832.           TableSQLAlias = 'Optionen'
  2833.         end
  2834.         object daField3: TdaField
  2835.           Alias = 'W'#228'hrung'
  2836.          DisplayWidth = 3
  2837.           FieldAlias = 'W'#228'hrung'
  2838.          FieldLength = 3
  2839.           FieldName = 'W'#228'hrung'
  2840.          IsDetail = True
  2841.           SQLFieldName = 'W'#228'hrung'
  2842.          TableAlias = 'Waehrungen'
  2843.           TableName = 'Waehrungen'
  2844.           TableSQLAlias = 'Waehrungen'
  2845.         end
  2846.         object daTable1: TdaTable
  2847.           ChildType = 5
  2848.           Alias = 'Optionen'
  2849.           JoinType = dajtNone
  2850.           SQLAlias = 'Optionen'
  2851.           TableAlias = 'Optionen'
  2852.           TableName = 'Optionen'
  2853.         end
  2854.         object daTable2: TdaTable
  2855.           ChildType = 5
  2856.           Alias = 'Waehrungen'
  2857.           SQLAlias = 'Waehrungen'
  2858.           TableAlias = 'Waehrungen'
  2859.           TableName = 'Waehrungen'
  2860.           object daTableJoin1: TdaTableJoin
  2861.             ChildType = 6
  2862.             object daField5: TdaField
  2863.               ChildType = 3
  2864.               Alias = 'Id'
  2865.               DataType = dtLongint
  2866.               DisplayWidth = 10
  2867.               FieldAlias = 'Id'
  2868.               FieldLength = 0
  2869.               FieldName = 'Id'
  2870.               SQLFieldName = 'Id'
  2871.               TableAlias = 'Waehrungen'
  2872.               TableName = 'Waehrungen'
  2873.               TableSQLAlias = 'Waehrungen'
  2874.             end
  2875.             object daField4: TdaField
  2876.               ChildType = 4
  2877.               Alias = 'W'#228'hrung'
  2878.              DataType = dtInteger
  2879.               DisplayWidth = 10
  2880.               FieldAlias = 'W'#228'hrung'
  2881.              FieldLength = 0
  2882.               FieldName = 'W'#228'hrung'
  2883.              SQLFieldName = 'W'#228'hrung'
  2884.              TableAlias = 'Optionen'
  2885.               TableName = 'Optionen'
  2886.               TableSQLAlias = 'Optionen'
  2887.             end
  2888.           end
  2889.         end
  2890.       end
  2891.     end
  2892.     object daADOQueryDataView5: TdaADOQueryDataView
  2893.       UserName = 'Query_Buchungen'
  2894.       Height = 214
  2895.       Left = 303
  2896.       NameColumnWidth = 105
  2897.       SizeColumnWidth = 35
  2898.       SortMode = 0
  2899.       Top = 318
  2900.       TypeColumnWidth = 52
  2901.       Width = 224
  2902.       AutoSearchTabOrder = 0
  2903.       MasterDataViewUserName = 'Query_Behandlungen'
  2904.       object Buchungen: TppChildDBPipeline
  2905.         AutoCreateFields = False
  2906.         SkipWhenNoRecords = False
  2907.         UserName = 'Buchungen'
  2908.         MasterDataPipelineName = 'Behandlungen'
  2909.         object ppField1: TppField
  2910.           FieldAlias = 'Id'
  2911.           FieldName = 'Id'
  2912.           FieldLength = 0
  2913.           DataType = dtLongint
  2914.           DisplayWidth = 10
  2915.           Position = 0
  2916.           TableName = 'Buchungen'
  2917.         end
  2918.         object ppField2: TppField
  2919.           FieldAlias = 'BehandlungsNr'
  2920.           FieldName = 'BehandlungsNr'
  2921.           FieldLength = 0
  2922.           DataType = dtInteger
  2923.           DisplayWidth = 10
  2924.           Position = 1
  2925.           TableName = 'Buchungen'
  2926.         end
  2927.         object ppField3: TppField
  2928.           FieldAlias = 'Zahlungsweise'
  2929.           FieldName = 'Zahlungsweise'
  2930.           FieldLength = 0
  2931.           DataType = dtInteger
  2932.           DisplayWidth = 10
  2933.           Position = 2
  2934.           TableName = 'Buchungen'
  2935.         end
  2936.         object ppField4: TppField
  2937.           FieldAlias = 'BelegNr'
  2938.           FieldName = 'BelegNr'
  2939.           FieldLength = 0
  2940.           DataType = dtInteger
  2941.           DisplayWidth = 10
  2942.           Position = 3
  2943.           TableName = 'Buchungen'
  2944.         end
  2945.         object ppField5: TppField
  2946.           FieldAlias = 'Datum'
  2947.           FieldName = 'Datum'
  2948.           FieldLength = 0
  2949.           DataType = dtDateTime
  2950.           DisplayWidth = 18
  2951.           Position = 4
  2952.           TableName = 'Buchungen'
  2953.         end
  2954.         object ppField6: TppField
  2955.           FieldAlias = 'Betrag'
  2956.           FieldName = 'Betrag'
  2957.           FieldLength = 0
  2958.           DataType = dtDouble
  2959.           DisplayWidth = 10
  2960.           Position = 5
  2961.           TableName = 'Buchungen'
  2962.         end
  2963.         object TppMasterFieldLink
  2964.           MasterFieldName = 'RechnungsNr'
  2965.           GuidCollationType = gcMSAccess
  2966.           DetailFieldName = 'RechnungsNr'
  2967.           DetailSortOrder = soAscending
  2968.         end
  2969.         object TppMasterFieldLink
  2970.           MasterFieldName = 'Nr'
  2971.           GuidCollationType = gcMSAccess
  2972.           DetailFieldName = 'Nr'
  2973.           DetailSortOrder = soAscending
  2974.         end
  2975.         object TppMasterFieldLink
  2976.           MasterFieldName = 'Id'
  2977.           GuidCollationType = gcMSAccess
  2978.           DetailFieldName = 'BehandlungsNr'
  2979.           DetailSortOrder = soAscending
  2980.         end
  2981.       end
  2982.       object daSQL5: TdaSQL
  2983.         GuidCollationType = gcMSAccess
  2984.         DatabaseName = 'ADOConnection'
  2985.         DatabaseType = dtMSAccess
  2986.         DataPipelineName = 'Buchungen'
  2987.         LinkColor = clMaroon
  2988.         LinkType = ltMagicSQL
  2989.         MaxSQLFieldAliasLength = 25
  2990.         SkipWhenNoRecords = False
  2991.         SQLText.Strings = (
  2992.           'SELECT Buchungen.Id, Buchungen.BehandlungsNr, '
  2993.           '       Buchungen.Zahlungsweise, '
  2994.           '       Buchungen.BelegNr, Buchungen.Datum, '
  2995.           '       Buchungen.Betrag'
  2996.           'FROM Buchungen Buchungen'
  2997.           'WHERE ( Buchungen.Storniert IS NULL  )')
  2998.         SQLType = sqSQL2
  2999.         object daCriteria1: TdaCriteria
  3000.           ChildType = 7
  3001.           Level = 0
  3002.           Operator = dacoBlank
  3003.           object TdaField
  3004.             Alias = 'Storniert'
  3005.             DataType = dtDateTime
  3006.             DisplayWidth = 18
  3007.             FieldAlias = 'Storniert'
  3008.             FieldLength = 0
  3009.             FieldName = 'Storniert'
  3010.             SQLFieldName = 'Storniert'
  3011.             TableAlias = 'Buchungen'
  3012.             TableName = 'Buchungen'
  3013.             TableSQLAlias = 'Buchungen'
  3014.           end
  3015.         end
  3016.         object daField1: TdaField
  3017.           Alias = 'Id'
  3018.           DataType = dtLongint
  3019.           DisplayWidth = 10
  3020.           FieldAlias = 'Id'
  3021.           FieldLength = 0
  3022.           FieldName = 'Id'
  3023.           SQLFieldName = 'Id'
  3024.           TableAlias = 'Buchungen'
  3025.           TableName = 'Buchungen'
  3026.           TableSQLAlias = 'Buchungen'
  3027.         end
  3028.         object daField2: TdaField
  3029.           Alias = 'BehandlungsNr'
  3030.           DataType = dtInteger
  3031.           DisplayWidth = 10
  3032.           FieldAlias = 'BehandlungsNr'
  3033.           FieldLength = 0
  3034.           FieldName = 'BehandlungsNr'
  3035.           SQLFieldName = 'BehandlungsNr'
  3036.           TableAlias = 'Buchungen'
  3037.           TableName = 'Buchungen'
  3038.           TableSQLAlias = 'Buchungen'
  3039.         end
  3040.         object daField3: TdaField
  3041.           Alias = 'Zahlungsweise'
  3042.           DataType = dtInteger
  3043.           DisplayWidth = 10
  3044.           FieldAlias = 'Zahlungsweise'
  3045.           FieldLength = 0
  3046.           FieldName = 'Zahlungsweise'
  3047.           SQLFieldName = 'Zahlungsweise'
  3048.           TableAlias = 'Buchungen'
  3049.           TableName = 'Buchungen'
  3050.           TableSQLAlias = 'Buchungen'
  3051.         end
  3052.         object daField4: TdaField
  3053.           Alias = 'BelegNr'
  3054.           DataType = dtInteger
  3055.           DisplayWidth = 10
  3056.           FieldAlias = 'BelegNr'
  3057.           FieldLength = 0
  3058.           FieldName = 'BelegNr'
  3059.           SQLFieldName = 'BelegNr'
  3060.           TableAlias = 'Buchungen'
  3061.           TableName = 'Buchungen'
  3062.           TableSQLAlias = 'Buchungen'
  3063.         end
  3064.         object daField5: TdaField
  3065.           Alias = 'Datum'
  3066.           DataType = dtDateTime
  3067.           DisplayWidth = 18
  3068.           FieldAlias = 'Datum'
  3069.           FieldLength = 0
  3070.           FieldName = 'Datum'
  3071.           SQLFieldName = 'Datum'
  3072.           TableAlias = 'Buchungen'
  3073.           TableName = 'Buchungen'
  3074.           TableSQLAlias = 'Buchungen'
  3075.         end
  3076.         object daField6: TdaField
  3077.           Alias = 'Betrag'
  3078.           DataType = dtDouble
  3079.           DisplayWidth = 10
  3080.           FieldAlias = 'Betrag'
  3081.           FieldLength = 0
  3082.           FieldName = 'Betrag'
  3083.           SQLFieldName = 'Betrag'
  3084.           TableAlias = 'Buchungen'
  3085.           TableName = 'Buchungen'
  3086.           TableSQLAlias = 'Buchungen'
  3087.         end
  3088.         object daTable1: TdaTable
  3089.           ChildType = 5
  3090.           Alias = 'Buchungen'
  3091.           JoinType = dajtNone
  3092.           SQLAlias = 'Buchungen'
  3093.           TableAlias = 'Buchungen'
  3094.           TableName = 'Buchungen'
  3095.         end
  3096.         object TdaSQLLink
  3097.           ChildType = 9
  3098.           object daField7: TdaField
  3099.             ChildType = 10
  3100.             Alias = 'Id'
  3101.             DataType = dtLongint
  3102.             DisplayWidth = 10
  3103.             FieldAlias = 'Id'
  3104.             FieldLength = 0
  3105.             FieldName = 'Id'
  3106.             SQLFieldName = 'Id'
  3107.             TableAlias = 'Behandlungen'
  3108.             TableName = 'Behandlungen'
  3109.             TableSQLAlias = 'Behandlungen'
  3110.           end
  3111.           object daField8: TdaField
  3112.             ChildType = 11
  3113.             Alias = 'BehandlungsNr'
  3114.             DataType = dtInteger
  3115.             DisplayWidth = 10
  3116.             FieldAlias = 'BehandlungsNr'
  3117.             FieldLength = 0
  3118.             FieldName = 'BehandlungsNr'
  3119.             SQLFieldName = 'BehandlungsNr'
  3120.             TableAlias = 'Buchungen'
  3121.             TableName = 'Buchungen'
  3122.             TableSQLAlias = 'Buchungen'
  3123.           end
  3124.         end
  3125.       end
  3126.     end
  3127.   end
  3128.   object ppDesignLayers2: TppDesignLayers
  3129.     object ppDesignLayer2: TppDesignLayer
  3130.       UserName = 'Foreground1'
  3131.       LayerType = ltBanded
  3132.       Index = 0
  3133.     end
  3134.   end
  3135.   object ppParameterList1: TppParameterList
  3136.     object ppParameter1: TppParameter
  3137.       AutoSearchSettings.LogicalPrefix = []
  3138.       AutoSearchSettings.Mandatory = True
  3139.       AutoSearchSettings.SearchExpression = 'True'
  3140.       DataType = dtBoolean
  3141.       LookupSettings.DisplayType = dtNameOnly
  3142.       LookupSettings.SortOrder = soName
  3143.       Value = True
  3144.       UserName = 'RNDruck'
  3145.     end
  3146.     object ppParameter2: TppParameter
  3147.       AutoSearchSettings.LogicalPrefix = []
  3148.       AutoSearchSettings.Mandatory = True
  3149.       AutoSearchSettings.SearchExpression = 'True'
  3150.       DataType = dtBoolean
  3151.       LookupSettings.DisplayType = dtNameOnly
  3152.       LookupSettings.SortOrder = soName
  3153.       Value = True
  3154.       UserName = 'InfoDruck'
  3155.     end
  3156.     object ppParameter3: TppParameter
  3157.       AutoSearchSettings.LogicalPrefix = []
  3158.       AutoSearchSettings.Mandatory = True
  3159.       AutoSearchSettings.SearchExpression = 'False'
  3160.       DataType = dtBoolean
  3161.       LookupSettings.DisplayType = dtNameOnly
  3162.       LookupSettings.SortOrder = soName
  3163.       Value = False
  3164.       UserName = 'NurBeleg'
  3165.     end
  3166.   end

Quellcode

Hier kannst du den Code kopieren und ihn in deinen bevorzugten Editor einfügen. PASTEBIN_DOWNLOAD_SNIPPET_EXPLAIN