原文:WPF教程002 - 实现Step步骤条控件

在网上看到这么一个效果,刚好在用WPF做控件,就想着用WPF来实现一下

1、实现原理

1.1、该控件分为2个模块,类似ComboBox控件分为StepBar和StepBarItem
1.2、StepBarItem定义一个Number依赖属性,用来实现每个节点上显示的步骤编号
1.3、StepBar定义一个Progress依赖属性,用来标识该控件走到了第几步,之外可以根据Progress属性与当前Item的Index来进行比较,来实现当控件进入到不同进度时,各个Item节点的样式

2、控件实现

StepBar类似ComboBox控件,但与ComboBox不同的是,由于控件本身并不需要选中,因此直接继承自ItemsControl,而不是ListBox。StepBarItem继承自ContentControl
2.1、新增StepBar、StepBarItem,分别继承自ItemsControl与ContentControl
  1. public class StepBar : ItemsControl
  2. {
  3. #region Constructors
  4. static StepBar()
  5. {
  6. DefaultStyleKeyProperty.OverrideMetadata(typeof(StepBar), new FrameworkPropertyMetadata(typeof(StepBar)));
  7. }
  8. #endregion
  9. }
  1. public class StepBarItem : ContentControl
  2. {
  3. #region Constructors
  4. static StepBarItem()
  5. {
  6. DefaultStyleKeyProperty.OverrideMetadata(typeof(StepBarItem), new FrameworkPropertyMetadata(typeof(StepBarItem)));
  7. }
  8. #endregion
  9. }
2、2、在Generic.xaml资源文件中定义这两个控件的基本样式
首先讲下大概的布局思路,StepBar比较简单,就是使用UniformGrid布局,然后设置Rows="1",这样所有的StepBarItem就会在一行显示,并且平分一行大小,否则UniformGrid默认一行是只显示2个的,重点是在StepBarItem的布局上面。
首先将文字和那根横线进行拆分,分为2列,文字那列根据内容自适应,横线则填充,因此每个StepBarItem由两部分组成:文字+横线。但是这样会有个问题,前面几个Item都会很正常的显示,但一到最后一个Item的时候,就会多出来右边的那根横线,那怎么去掉呢。我这边参照网上的思路,使用了Converter转换器,将每个Item作为参数传入转换器中,判断Item的Index与整个空间的Items.Count进行比较,如果当前的Index和Items的最后一个相等,那么久将最后一个Item的右边的那根横线给隐藏,这样就能达到文章一开始的那个效果。
  1. <ResourceDictionary xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  2. xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  3. xmlns:ec="http://schemas.microsoft.com/expression/2010/controls"
  4. xmlns:ZUI="clr-namespace:ZdfFlatUI"
  5. xmlns:Converters="clr-namespace:ZdfFlatUI.Converters">
  6. <Converters:IsLastItemConverter x:Key="IsLastItemConverter" />
  7. <Converters:IsProgressedConverter x:Key="IsProgressedConverter" />
  8. <PathGeometry x:Key="Icon_Gou" Figures="M378.410667 850.450963C364.491852 850.450963 350.610963 845.293037 340.02963 834.939259L20.920889 523.529481C-0.279704 502.821926-0.279704 469.295407 20.920889 448.587852 42.121481 427.880296 76.48237 427.880296 97.682963 448.587852L378.410667 722.526815 925.75763 188.491852C946.958222 167.784296 981.319111 167.784296 1002.519704 188.491852 1023.720296 209.161481 1023.720296 242.688 1002.519704 263.395556L416.791704 834.939259C406.172444 845.293037 392.291556 850.450963 378.410667 850.450963L378.410667 850.450963Z" />
  9. <Style TargetType="{x:Type ZUI:StepBarItem}">
  10. <Setter Property="FontWeight" Value="Bold" />
  11. <Setter Property="FontSize" Value="14" />
  12. <Setter Property="FontFamily" Value="宋体" />
  13. <Setter Property="Template">
  14. <Setter.Value>
  15. <ControlTemplate TargetType="{x:Type ZUI:StepBarItem}">
  16. <Grid>
  17. <Grid.ColumnDefinitions>
  18. <ColumnDefinition Width="auto" />
  19. <ColumnDefinition Width="*" />
  20. </Grid.ColumnDefinitions>
  21. <StackPanel Orientation="Horizontal">
  22. <Grid Margin="0,0,10,0">
  23. <Border x:Name="Bd" BorderBrush="#CCCCCC" Width="25" Height="25" CornerRadius="100"
  24. BorderThickness="1" SnapsToDevicePixels="True" UseLayoutRounding="True">
  25. </Border>
  26. <TextBlock x:Name="Number" Text="{TemplateBinding Number}"
  27. HorizontalAlignment="Center" VerticalAlignment="Center" />
  28. <Path x:Name="path" Data="{StaticResource Icon_Gou}" Stretch="Uniform" Width="12" Fill="#3399FF" Visibility="Collapsed" />
  29. </Grid>
  30. <ContentPresenter VerticalAlignment="Center" />
  31. </StackPanel>
  32. <Border x:Name="Line" Grid.Column="1" BorderBrush="#E3E8EE" BorderThickness="0,1,0,0"
  33. VerticalAlignment="Center" Margin="10,0"
  34. SnapsToDevicePixels="True" UseLayoutRounding="True" />
  35. </Grid>
  36. <ControlTemplate.Triggers>
  37. <DataTrigger Value="True">
  38. <DataTrigger.Binding>
  39. <MultiBinding Converter="{StaticResource IsLastItemConverter}">
  40. <Binding RelativeSource="{RelativeSource Self}" />
  41. <Binding RelativeSource="{RelativeSource AncestorType={x:Type ZUI:StepBar}}" Path="Items.Count"/>
  42. </MultiBinding>
  43. </DataTrigger.Binding>
  44. <Setter TargetName="Line" Property="Visibility" Value="Collapsed" />
  45. </DataTrigger>
  46. <DataTrigger Value="False">
  47. <DataTrigger.Binding>
  48. <MultiBinding Converter="{StaticResource IsLastItemConverter}">
  49. <Binding RelativeSource="{RelativeSource Self}" />
  50. <Binding RelativeSource="{RelativeSource AncestorType={x:Type ZUI:StepBar}}" Path="Items.Count"/>
  51. </MultiBinding>
  52. </DataTrigger.Binding>
  53. <Setter TargetName="Line" Property="Visibility" Value="Visible" />
  54. </DataTrigger>
  55. <DataTrigger Value="Less">
  56. <DataTrigger.Binding>
  57. <MultiBinding Converter="{StaticResource IsProgressedConverter}">
  58. <Binding RelativeSource="{RelativeSource Self}" />
  59. <Binding RelativeSource="{RelativeSource AncestorType={x:Type ZUI:StepBar}}" Path="Progress"/>
  60. </MultiBinding>
  61. </DataTrigger.Binding>
  62. <Setter TargetName="Bd" Property="Background" Value="#003399FF" />
  63. <Setter TargetName="Bd" Property="BorderBrush" Value="#3399FF" />
  64. <Setter TargetName="Number" Property="Visibility" Value="Collapsed" />
  65. <Setter TargetName="Line" Property="BorderBrush" Value="#3399FF" />
  66. <Setter TargetName="path" Property="Visibility" Value="Visible" />
  67. <Setter Property="Foreground" Value="#999999" />
  68. </DataTrigger>
  69. <DataTrigger Value="Equal">
  70. <DataTrigger.Binding>
  71. <MultiBinding Converter="{StaticResource IsProgressedConverter}">
  72. <Binding RelativeSource="{RelativeSource Self}" />
  73. <Binding RelativeSource="{RelativeSource AncestorType={x:Type ZUI:StepBar}}" Path="Progress"/>
  74. </MultiBinding>
  75. </DataTrigger.Binding>
  76. <Setter TargetName="Bd" Property="Background" Value="#3399FF" />
  77. <Setter TargetName="Bd" Property="BorderBrush" Value="#3399FF" />
  78. <Setter TargetName="Number" Property="Visibility" Value="Visible" />
  79. <Setter TargetName="Number" Property="Foreground" Value="#FFFFFF" />
  80. <Setter TargetName="path" Property="Visibility" Value="Collapsed" />
  81. <Setter Property="Foreground" Value="#666666" />
  82. </DataTrigger>
  83. <DataTrigger Value="Large">
  84. <DataTrigger.Binding>
  85. <MultiBinding Converter="{StaticResource IsProgressedConverter}">
  86. <Binding RelativeSource="{RelativeSource Self}" />
  87. <Binding RelativeSource="{RelativeSource AncestorType={x:Type ZUI:StepBar}}" Path="Progress"/>
  88. </MultiBinding>
  89. </DataTrigger.Binding>
  90. <Setter Property="Foreground" Value="#999999" />
  91. </DataTrigger>
  92. </ControlTemplate.Triggers>
  93. </ControlTemplate>
  94. </Setter.Value>
  95. </Setter>
  96. </Style>
  97. <Style TargetType="{x:Type ZUI:StepBar}">
  98. <Setter Property="Template">
  99. <Setter.Value>
  100. <ControlTemplate TargetType="{x:Type ZUI:StepBar}">
  101. <Border>
  102. <ItemsPresenter />
  103. </Border>
  104. </ControlTemplate>
  105. </Setter.Value>
  106. </Setter>
  107. <Setter Property="ItemsPanel">
  108. <Setter.Value>
  109. <ItemsPanelTemplate>
  110. <UniformGrid IsItemsHost="True" Rows="1" />
  111. </ItemsPanelTemplate>
  112. </Setter.Value>
  113. </Setter>
  114. </Style>
  115. </ResourceDictionary>
这里有个地方需要注意一下:我在 IsLastItemConverter 转换器中同时传入了Items.Count,但是转换器中又没用到这个参数,是因为什么呢?因为在StepBar可能会在中途Add或者Remove一个Item,这样就可以动态的设置倒数第二个本来已经隐藏的横线为Visible,而不至于Add一个Item后,后面几个Item右边的横线都不显示。

2.3、新增两个转换器:IsProgressedConverter(进度转换器)和IsLastItemConverter(是否是最后一个Item)
IsProgressedConverter
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Windows;
  6. using System.Windows.Controls;
  7. using System.Windows.Data;
  8. namespace ZdfFlatUI.Converters
  9. {
  10. public class IsProgressedConverter : IMultiValueConverter
  11. {
  12. public object Convert(object[] values, Type targetType, object parameter, System.Globalization.CultureInfo culture)
  13. {
  14. if ((values[0] is ContentControl && values[1] is int) == false)
  15. {
  16. return EnumCompare.None;
  17. }
  18. ContentControl contentControl = values[0] as ContentControl;
  19. int progress = (int)values[1];
  20. ItemsControl itemsControl = ItemsControl.ItemsControlFromItemContainer(contentControl);
  21. if(itemsControl == null)
  22. {
  23. return EnumCompare.None;
  24. }
  25. int index = itemsControl.ItemContainerGenerator.IndexFromContainer(contentControl);
  26. if(index < progress)
  27. {
  28. return EnumCompare.Less;
  29. }
  30. else if(index == progress)
  31. {
  32. return EnumCompare.Equal;
  33. }
  34. return EnumCompare.Large;
  35. }
  36. public object[] ConvertBack(object value, Type[] targetTypes, object parameter, System.Globalization.CultureInfo culture)
  37. {
  38. throw new NotSupportedException();
  39. }
  40. }
  41. }
IsLastItemConverter
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Windows;
  6. using System.Windows.Controls;
  7. using System.Windows.Data;
  8. namespace ZdfFlatUI.Converters
  9. {
  10. /// <summary>
  11. /// true则隐藏,false则显示
  12. /// </summary>
  13. public class IsLastItemConverter : IMultiValueConverter
  14. {
  15. #region IValueConverter 成员
  16. public object Convert(object[] value, Type targetType, object parameter, System.Globalization.CultureInfo culture)
  17. {
  18. ContentControl contentPresenter = value[0] as ContentControl;
  19. ItemsControl itemsControl = ItemsControl.ItemsControlFromItemContainer(contentPresenter);
  20. bool flag = false;
  21. if(itemsControl != null)
  22. {
  23. int index = itemsControl.ItemContainerGenerator.IndexFromContainer(contentPresenter);
  24. flag = (index == (itemsControl.Items.Count - 1));
  25. }
  26. return flag;
  27. }
  28. public object[] ConvertBack(object value, Type[] targetType, object parameter, System.Globalization.CultureInfo culture)
  29. {
  30. return null;
  31. }
  32. #endregion
  33. }
  34. }
2.4、在StepBar和StepBarItem分别新增Progress、Number依赖属性,具体的看代码,就不解释了
StepBar
  1. using System;
  2. using System.Collections;
  3. using System.Collections.Generic;
  4. using System.Collections.Specialized;
  5. using System.Linq;
  6. using System.Text;
  7. using System.Windows;
  8. using System.Windows.Controls;
  9. namespace ZdfFlatUI
  10. {
  11. public class StepBar : ItemsControl
  12. {
  13. #region Private属性
  14. #endregion
  15. #region 依赖属性定义
  16. public int Progress
  17. {
  18. get { return (int)GetValue(ProgressProperty); }
  19. set { SetValue(ProgressProperty, value); }
  20. }
  21. public static readonly DependencyProperty ProgressProperty =
  22. DependencyProperty.Register("Progress", typeof(int), typeof(StepBar), new PropertyMetadata(0, OnProgressChangedCallback, OnProgressCoerceValueCallback));
  23. private static object OnProgressCoerceValueCallback(DependencyObject d, object baseValue)
  24. {
  25. //不让Progress超出边界
  26. StepBar stepBar = d as StepBar;
  27. int newValue = Convert.ToInt32(baseValue);
  28. if (newValue < 0)
  29. {
  30. return 0;
  31. }
  32. else if(newValue >= stepBar.Items.Count)
  33. {
  34. return stepBar.Items.Count - 1;
  35. }
  36. return newValue;
  37. }
  38. private static void OnProgressChangedCallback(DependencyObject d, DependencyPropertyChangedEventArgs e)
  39. {
  40. }
  41. #endregion
  42. #region 依赖属性set get
  43. #endregion
  44. #region Constructors
  45. static StepBar()
  46. {
  47. DefaultStyleKeyProperty.OverrideMetadata(typeof(StepBar), new FrameworkPropertyMetadata(typeof(StepBar)));
  48. }
  49. #endregion
  50. #region Override方法
  51. protected override DependencyObject GetContainerForItemOverride()
  52. {
  53. return new StepBarItem();
  54. }
  55. protected override void PrepareContainerForItemOverride(DependencyObject element, object item)
  56. {
  57. //设置Item的显示数字
  58. StepBarItem stepBarItem = element as StepBarItem;
  59. ItemsControl itemsControl = ItemsControl.ItemsControlFromItemContainer(stepBarItem);
  60. int index = itemsControl.ItemContainerGenerator.IndexFromContainer(stepBarItem);
  61. stepBarItem.Number = Convert.ToString(++index);
  62. base.PrepareContainerForItemOverride(element, item);
  63. }
  64. protected override void OnItemsChanged(NotifyCollectionChangedEventArgs e)
  65. {
  66. base.OnItemsChanged(e);
  67. //ItemsControl数量变化时,重新设置各个Item的显示的数字
  68. for (int i = 0; i < this.Items.Count; i++)
  69. {
  70. StepBarItem stepBarItem = this.ItemContainerGenerator.ContainerFromIndex(i) as StepBarItem;
  71. if(stepBarItem != null)
  72. {
  73. int temp = i;
  74. stepBarItem.Number = Convert.ToString(++temp);
  75. }
  76. }
  77. //进度重新回到第一个
  78. this.Progress = 0;
  79. }
  80. #endregion
  81. #region Private方法
  82. #endregion
  83. }
  84. }
StepBarItem
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Linq;
  4. using System.Text;
  5. using System.Windows;
  6. using System.Windows.Controls;
  7. namespace ZdfFlatUI
  8. {
  9. public class StepBarItem : ContentControl
  10. {
  11. #region Private属性
  12. #endregion
  13. #region 依赖属性定义
  14. public string Number
  15. {
  16. get { return (string)GetValue(NumberProperty); }
  17. set { SetValue(NumberProperty, value); }
  18. }
  19. public static readonly DependencyProperty NumberProperty =
  20. DependencyProperty.Register("Number", typeof(string), typeof(StepBarItem));
  21. #endregion
  22. #region 依赖属性set get
  23. #endregion
  24. #region Constructors
  25. static StepBarItem()
  26. {
  27. DefaultStyleKeyProperty.OverrideMetadata(typeof(StepBarItem), new FrameworkPropertyMetadata(typeof(StepBarItem)));
  28. }
  29. #endregion
  30. #region Override方法
  31. #endregion
  32. #region Private方法
  33. #endregion
  34. }
  35. }

3、控件的具体使用

  1. <StackPanel Orientation="Vertical" VerticalAlignment="Center" HorizontalAlignment="Center">
  2. <TextBlock x:Name="text" Text="{Binding ., StringFormat=当前正在进行 {0} 步}" Foreground="#957180" FontSize="14" Margin="0,0,0,20" />
  3. <WPF.UI:StepBar x:Name="stepBar1" Width="900" Margin="0,20,0,0" />
  4. <StackPanel Orientation="Horizontal">
  5. <WPF.UI:FlatButton Width="70" Height="28" CornerRadius="3" Click="FlatButton_Click1" Content="Previous" Margin="10,20" />
  6. <WPF.UI:FlatButton Width="70" Height="28" CornerRadius="3" Click="FlatButton_Click" Content="Next" Margin="10,10" />
  7. <WPF.UI:FlatButton Width="70" Height="28" CornerRadius="3" Click="btn_AddItem" Content="Add" Margin="10,10" />
  8. <WPF.UI:FlatButton Width="70" Height="28" CornerRadius="3" Click="btn_RemoveItem" Content="Remove" Margin="10,10" />
  9. </StackPanel>
  10. </StackPanel>
  1. public partial class UCTStepBarTest : UserControl
  2. {
  3. private int _Step;
  4. public int Step
  5. {
  6. get
  7. {
  8. int temp = this.stepBar.Progress;
  9. return ++temp;
  10. }
  11. }
  12. ObservableCollection<string> list = new ObservableCollection<string>();
  13. public UCTStepBarTest()
  14. {
  15. InitializeComponent();
  16. list.Add("已完成");
  17. list.Add("进行中");
  18. list.Add("已完成");
  19. list.Add("进行中");
  20. this.stepBar1.ItemsSource = list;
  21. this.text.DataContext = Step;
  22. }
  23. private void FlatButton_Click(object sender, RoutedEventArgs e)
  24. {
  25. this.stepBar1.Progress++;
  26. this.text.DataContext = Step;
  27. }
  28. private void FlatButton_Click1(object sender, RoutedEventArgs e)
  29. {
  30. this.stepBar1.Progress--;
  31. this.text.DataContext = Step;
  32. }
  33. private void btn_AddItem(object sender, RoutedEventArgs e)
  34. {
  35. list.Add("进行中");
  36. }
  37. private void btn_RemoveItem(object sender, RoutedEventArgs e)
  38. {
  39. list.RemoveAt(0);
  40. this.text.DataContext = Step;
  41. }
  42. }

最终的效果图如下:
 最后仍然是没有达到一开始的那个效果,我设想的是文字部分应该是可以使用DataTemplate模板自定义的,但是文字详细描述那部分和横线的部分不太好布局,目前想不到该怎么去布局,思维受限了,先搁置等到后面看能不能找到合适的解决方法。

















WPF教程002 - 实现Step步骤条控件的更多相关文章

  1. C#开发step步骤条控件

    现在很多的javascript控件,非常的不错,其中step就是一个,如下图所示: 那么如何用C#来实现一个step控件呢? 先定义一个StepEntity类来存储步骤条节点的信息: public c ...

  2. WPF-自定义实现步骤条控件

    步骤条实现的效果: 步骤条控件是在listbox的基础上实现的. 一. xaml代码: <Window.Resources> <convert1:StepListBarWidthCo ...

  3. Photoshop和WPF双剑配合,打造炫酷个性的进度条控件

    现在如果想打造一款专业的App,UI的设计和操作的简便性相当重要.UI设计可以借助Photoshop或者AI等设计工具,之前了解到WPF设计工具Expression Blend可以直接导入PSD文件或 ...

  4. 示例:WPF中Slider控件封装的缓冲播放进度条控件

    原文:示例:WPF中Slider控件封装的缓冲播放进度条控件 一.目的:模仿播放器播放进度条,支持缓冲任务功能 二.进度: 实现类似播放器中带缓存的播放样式(播放区域.缓冲区域.全部区域等样式) 实现 ...

  5. DevExpress的进度条控件ProgressBarControl的使用-以ZedGraph添加曲线进度为例

    场景 Winform控件-DevExpress18下载安装注册以及在VS中使用: https://blog.csdn.net/BADAO_LIUMANG_QIZHI/article/details/1 ...

  6. WPF中嵌入WinForm中的webbrowser控件

    原文:WPF中嵌入WinForm中的webbrowser控件 使用VS2008创建WPF应用程序,需使用webbrowser.从工具箱中添加WPF组件中的webbrowser发现其中有很多属性事件不能 ...

  7. HslControls组件库 工业控件库 曲线控件 时间控件 管道控件 温度计控件 阀门控件 传送带控件 进度条控件 电池控件 数码管控件等等

    本篇博客主要对 HslControls 组件做一个大概的总览介绍,更详细的内容可以参照页面里的子链接,还有github上的源代码,然后进行相关的学习,和使用. Prepare 先从nuget下载到组件 ...

  8. WPF 构建无外观(Lookless)控件

    原文:WPF 构建无外观(Lookless)控件 构建一个用户可以使用Template属性设置外观的WPF控件需要以下几步 1.继承自System.Windows.Controls.Control 2 ...

  9. WPF中自定义的DataTemplate中的控件,在Window_Loaded事件中加载机制初探

    原文:WPF中自定义的DataTemplate中的控件,在Window_Loaded事件中加载机制初探         最近因为项目需要,开始学习如何使用WPF开发桌面程序.使用WPF一段时间之后,感 ...

随机推荐

  1. Java解析HTML之HTMLParser使用与详解 分类: C_OHTERS 2014-05-19 21:46 2309人阅读 评论(0) 收藏

    转自:http://free0007.iteye.com/blog/1131163 HTMLParser具有小巧,快速的优点,缺点是相关文档比较少(英文的也少),很多功能需要自己摸索.对于初学者还是要 ...

  2. pandas 学习(四)—— 数据处理(清洗)、缺失值的处理

    创建 DataFrame: df = pd.DataFrame(np.random.randint(0, 10, (2, 4)), columns=list('ABCD')) 0. 为 data fr ...

  3. 洛谷 P1984 [SDOI2008]烧水问题

    洛谷 P1984 [SDOI2008]烧水问题 题目描述 把总质量为1kg的水分装在n个杯子里,每杯水的质量均为(1/n)kg,初始温度均为0℃.现需要把每一杯水都烧开.我们可以对任意一杯水进行加热. ...

  4. 三列自适应布局的实现方式(兼容IE6+)

    1.绝对定位方式 <div class="nm-3-lr"> <div class="aside-f"> <p>侧边栏1固定 ...

  5. [Javascript] Javascript 'in' opreator

    If you want to check whether a key is inside an Object or Array, you can use 'in': Object: const obj ...

  6. ASP.NET 生命周期及管道事件

    Client(发送报文:请求行+请求头+空行+请求体) <------ Http 协议 ------> Server,由 Http.sys 监听 Http 请求 -> WAS+Met ...

  7. AndroidStudio实现JNI的示例详解

    1. NDK简介 Android NDK 是在SDK前面又加上了“原生”二字,即Native Development Kit,因此又被Google称为“NDK” 1.1 NDK产生的背景 Androi ...

  8. 利用performSelectorInBackground和performSelectorOnMainThread实现多线程

    NSObject类的performSelectorOnMainThread和performSelectorInBackground能够实现简单的多线程编程技术 1.- (void)performSel ...

  9. 微信小程序开发实战视频教程

    微信小程序开发实战视频教程发布  有全套的 pan.baidu.com/s/1o8GuJOY 密码:2dbo 腾讯终于发布了没有APPid,无需申请也可以进行微信小程序开发的视频教程了,我在在第一时间 ...

  10. Oracle数据库零散知识06 -- Package的定义与简单触发器

    CREATE OR REPLACE PACKAGE pak_02 IS--包头 --这里可定义公共参数 FUNCTION fun_01 RETURN NUMBER; PROCEDURE pro_01 ...