case1.tcl

这是一个Linux下的集成开发环境

# Copyright (c) 2000, Red Hat, Inc.
# 
# This file is part of Source-Navigator.
# 
# Source-Navigator is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License as published
# by the Free Software Foundation; either version 2, or (at your option)
# any later version.
# 
# Source-Navigator is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
# General Public License for more details.
# 
# You should have received a copy of the GNU General Public License along
# with Source-Navigator; see the file COPYING.  If not, write to
# the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
# MA 02111-1307, USA.
# 
itcl_class test_class {
   method test_method {
        Land_Party
        Call_Id
        Dialed_Digits
        {Within 5}
        {New_World_Number ""}
        {Billing_On 1}
        {Satellite_Indicator 0}
        {Continuity_Check_Indicator 0}
        {Echo_Control_Device_Indicator 0}
        {National_International_Call_Indicator 0}
        {End_To_End_Method_Indicator 0}
        {Interworking_Indicator 0}
        {IAM_Segmentation_Indicator 0}
        {ISDN_User_Part_Indicator 0}
        {ISDN_User_Part_Preference_Indicator 0}
        {ISDN_Access_Indicator 0}
        {SCCP_Method_Indicator 0}
        {Calling_Party_Category 10}
        {Coding_Standard 0}
        {Information_Transfer_Capability 0}
        {Transfer_Mode 0}
        {Information_Transfer_Rate 16}
        {User_Information_Layer1_Protocol 2}
        {Called_Nature_Of_Address_Indicator 3}
        {Called_Numbering_Plan_Indicator 1}
        {Calling_Number_Present 1}
        {Calling_Party_Number ""}
        {Calling_Party_Nature_Of_Address_Indicator 3}
        {Calling_Numbering_Plan_Indicator 1}
        {Calling_Party_Presentation_Restricted 0}
        {Calling_Screen_Indicator 0}
        {Optional_Charge_Number_Present 0}
        {Charge_Nature_Of_Address_Indicator 3}
        {Charge_Numbering_Plan_Indicator 1}
        {Charge_Number ""}
        {Optional_Originating_Information_Present 0}
        {Originating_Line_Information 11}
        {Optional_Transit_Network_Present 0}
        {Network_Identification 2}
        {Network_Identification_Plan 2}
        {Transit_Network_Digits ""}
        {Circuit_Code 0}
        {Optional_Carrier_Selection_Present 0}
        {Carrier_Selection 0}
        {Optional_Service_Code_Present 0}
        {Service_Code_Indicator 0}} {}
}