Pokaż
Ignoruj:
Data:
2009-07-06 14:15:34 (17 years ago)
Autor:
marek
Opis:

poprawiono raporty, miejsce po przecinku przy obliczaniu rozmiaru dla Master Truck

Pliki:
1 zmodyfikowane

Legenda:

Bez zmian
Dodane
Usunięte
  • trunk/RaportySQL/ListaReklamA3.rdl

    r735 r738  
    1616        </Values> 
    1717      </DefaultValue> 
    18       <AllowBlank>true</AllowBlank> 
    19       <Prompt>tytul</Prompt> 
     18      <Prompt>Tytuł:</Prompt> 
    2019      <ValidValues> 
    2120        <DataSetReference> 
     
    2928      <DataType>String</DataType> 
    3029      <AllowBlank>true</AllowBlank> 
    31       <Prompt>nr wydania</Prompt> 
     30      <Prompt>Nr wydania:</Prompt> 
    3231    </ReportParameter> 
    3332    <ReportParameter Name="agencja"> 
    3433      <DataType>String</DataType> 
    3534      <Nullable>true</Nullable> 
    36       <Prompt>agencja</Prompt> 
     35      <Prompt>Agencja:</Prompt> 
    3736      <ValidValues> 
    3837        <DataSetReference> 
     
    4645      <DataType>String</DataType> 
    4746      <Nullable>true</Nullable> 
    48       <Prompt>agent</Prompt> 
     47      <Prompt>Agent:</Prompt> 
    4948      <ValidValues> 
    5049        <DataSetReference> 
     
    5756    <ReportParameter Name="grzbiet"> 
    5857      <DataType>Integer</DataType> 
    59       <Nullable>true</Nullable> 
    60       <Prompt>grzbiet</Prompt> 
     58      <DefaultValue> 
     59        <DataSetReference> 
     60          <DataSetName>ListaGrzebietow</DataSetName> 
     61          <ValueField>ID</ValueField> 
     62        </DataSetReference> 
     63      </DefaultValue> 
     64      <Prompt>Grzbiet:</Prompt> 
    6165      <ValidValues> 
    6266        <DataSetReference> 
     
    6670        </DataSetReference> 
    6771      </ValidValues> 
     72      <MultiValue>true</MultiValue> 
     73    </ReportParameter> 
     74    <ReportParameter Name="dzial"> 
     75      <DataType>String</DataType> 
     76      <DefaultValue> 
     77        <DataSetReference> 
     78          <DataSetName>ListaDzialow</DataSetName> 
     79          <ValueField>Id</ValueField> 
     80        </DataSetReference> 
     81      </DefaultValue> 
     82      <AllowBlank>true</AllowBlank> 
     83      <Prompt>Działy:</Prompt> 
     84      <ValidValues> 
     85        <DataSetReference> 
     86          <DataSetName>ListaDzialow</DataSetName> 
     87          <ValueField>Id</ValueField> 
     88          <LabelField>Name</LabelField> 
     89        </DataSetReference> 
     90      </ValidValues> 
     91      <MultiValue>true</MultiValue> 
    6892    </ReportParameter> 
    6993    <ReportParameter Name="sortuj"> 
     
    88112        </ParameterValues> 
    89113      </ValidValues> 
    90     </ReportParameter> 
    91     <ReportParameter Name="dzial"> 
    92       <DataType>String</DataType> 
    93       <DefaultValue> 
    94         <DataSetReference> 
    95           <DataSetName>ListaDzialow</DataSetName> 
    96           <ValueField>Id</ValueField> 
    97         </DataSetReference> 
    98       </DefaultValue> 
    99       <AllowBlank>true</AllowBlank> 
    100       <Prompt>Działy:</Prompt> 
    101       <ValidValues> 
    102         <DataSetReference> 
    103           <DataSetName>ListaDzialow</DataSetName> 
    104           <ValueField>Id</ValueField> 
    105           <LabelField>Name</LabelField> 
    106         </DataSetReference> 
    107       </ValidValues> 
    108       <MultiValue>true</MultiValue> 
    109114    </ReportParameter> 
    110115  </ReportParameters> 
     
    344349FROM            GRZBIETY 
    345350WHERE Active=1 AND TytulId=@tytul 
    346 UNION 
    347 SELECT NULL ,'Wszystkie' 
    348351ORDER BY Nazwa</CommandText> 
    349352        <QueryParameters> 
     
    391394    </DataSet> 
    392395  </DataSets> 
    393   <Code /> 
    394   <Width>25.5cm</Width> 
     396  <Code>Public Function GetMultiSelectLabels(P as Parameter) as String 
     397  Dim i As Integer 
     398  Dim s As String 
     399  s = p.Label(0)                 
     400  For i = 1 to Ubound(P.Value) 
     401    s = s + ", " + p.Label(i) 
     402  Next i 
     403  Return s 
     404End Function</Code> 
     405  <Width>24.52646cm</Width> 
    395406  <Body> 
    396407    <ColumnSpacing>1cm</ColumnSpacing> 
    397408    <ReportItems> 
     409      <Textbox Name="textbox3"> 
     410        <Top>1.2cm</Top> 
     411        <Width>2.55cm</Width> 
     412        <Style> 
     413          <FontSize>12pt</FontSize> 
     414          <FontWeight>700</FontWeight> 
     415          <Format>d</Format> 
     416          <TextAlign>Left</TextAlign> 
     417          <PaddingLeft>2pt</PaddingLeft> 
     418          <PaddingRight>2pt</PaddingRight> 
     419          <PaddingTop>2pt</PaddingTop> 
     420          <PaddingBottom>2pt</PaddingBottom> 
     421          <Language>pl-PL</Language> 
     422        </Style> 
     423        <ZIndex>4</ZIndex> 
     424        <CanGrow>true</CanGrow> 
     425        <Height>0.75cm</Height> 
     426        <Value>Grzbiet(y):</Value> 
     427      </Textbox> 
     428      <Textbox Name="textbox7"> 
     429        <Top>1.2cm</Top> 
     430        <Width>21.45cm</Width> 
     431        <Style> 
     432          <FontSize>12pt</FontSize> 
     433          <Format>d</Format> 
     434          <TextAlign>Left</TextAlign> 
     435          <PaddingLeft>2pt</PaddingLeft> 
     436          <PaddingRight>2pt</PaddingRight> 
     437          <PaddingTop>2pt</PaddingTop> 
     438          <PaddingBottom>2pt</PaddingBottom> 
     439          <Language>pl-PL</Language> 
     440        </Style> 
     441        <ZIndex>3</ZIndex> 
     442        <CanGrow>true</CanGrow> 
     443        <Left>2.55cm</Left> 
     444        <Height>0.75cm</Height> 
     445        <Value>=Code.GetMultiSelectLabels(Parameters!grzbiet)</Value> 
     446      </Textbox> 
    398447      <Textbox Name="textbox6"> 
    399448        <Top>0.25cm</Top> 
     
    410459          <Language>pl-PL</Language> 
    411460        </Style> 
    412         <ZIndex>3</ZIndex> 
     461        <ZIndex>2</ZIndex> 
    413462        <CanGrow>true</CanGrow> 
    414463        <Left>15.5cm</Left> 
    415464        <Height>0.75cm</Height> 
    416465        <Value>=Today</Value> 
    417       </Textbox> 
    418       <Textbox Name="textbox5"> 
    419         <Top>0.25cm</Top> 
    420         <Width>4.5cm</Width> 
    421         <Style> 
    422           <FontSize>12pt</FontSize> 
    423           <FontWeight>700</FontWeight> 
    424           <Format>d</Format> 
    425           <TextAlign>Left</TextAlign> 
    426           <PaddingLeft>2pt</PaddingLeft> 
    427           <PaddingRight>2pt</PaddingRight> 
    428           <PaddingTop>2pt</PaddingTop> 
    429           <PaddingBottom>2pt</PaddingBottom> 
    430           <Language>pl-PL</Language> 
    431         </Style> 
    432         <ZIndex>2</ZIndex> 
    433         <CanGrow>true</CanGrow> 
    434         <Left>11.5cm</Left> 
    435         <Height>0.75cm</Height> 
    436         <Value>="Grzbiet: " &amp; Parameters!grzbiet.Label</Value> 
    437466      </Textbox> 
    438467      <Textbox Name="textbox17"> 
     
    457486      <Table Name="table1"> 
    458487        <DataSetName>ListaReklam</DataSetName> 
    459         <Top>1.25cm</Top> 
    460         <Width>24.52646cm</Width> 
     488        <Top>2.1cm</Top> 
    461489        <Details> 
    462490          <TableRows> 
     
    13161344      </Table> 
    13171345    </ReportItems> 
    1318     <Height>2.88492cm</Height> 
     1346    <Height>3.73492cm</Height> 
    13191347  </Body> 
    13201348  <Language>pl-PL</Language>