#--------------------------------------------------
# メイン処理
#--------------------------------------------------
#画面起動時
[Form_Init]
@form          = centering
@form          = subroutine(Sub_loadStaticCombos)
txt_sum_weight = configinput(number,8)
spd_list       = configlistfieldnames(label1,genryou,genryoutani,label2,itiji,itijitani,label3,tyuuwa,tyuuwatani,label4,niji,nijitani,label5,saisyuu,saisyuutani)
spd_list2      = configlistfieldnames(label,data,tani,label2,data2)
spd_ShipHistry = configlistfieldnames(name_shipment,name_grade,weight_wp)
@form          = subroutine(Sub_Debug_False)

#画面起動時
[Form_FormStart]
spd_list       = setlistcount(6)
spd_list2      = setlistcount(3)

#新規＋修正ボタンの共有処理
[Form_Common]

#新規ボタン
[Form_Insert]
@form        = eventlocked(true)
@form        = subroutine(Sub_Init)
txt_mode     = string(ins)
this         = subroutine(Sub_dispInsMode)
@form        = subroutine(Sub_loadInitialItems)
@form        = subroutine(Sub_refreshHeader)
@form        = subroutine(Sub_unlockedHeaderIns)
@form        = subroutine(Sub_lockedBody)
@form        = eventlocked(false)
@form        = changed(false)
tim_auto     = enabled(true)
txt_cd_staff = setfocus()

#修正ボタン
[Form_Update]
@form        = eventlocked(true)
@form        = subroutine(Sub_Init)
txt_mode     = string(upd)
this         = subroutine(Sub_dispUpdMode)
@form        = subroutine(Sub_Today)
@form        = subroutine(Sub_unlockedHeaderUpd)
@form        = subroutine(Sub_lockedBody)
@form        = eventlocked(false)
@form        = changed(false)
txt_dts_year = setfocus()

#投入開始ボタン
[Form_Start]
@form         = eventlocked(true)
@form         = subroutine(Sub_lockedHeaderIns)
txt_editstart = string(1)
@form         = eventlocked(false)

## 新規保存後処理
[Form_SaveInsFinish]
@form  = subroutine(Sub_saveInitialItems)
#@form = sleep(10000)
@form  = subroutine(Form_Insert)
@form  = action(start,auto,now)
[Form_SaveInsFinishEnd]
@form  = subroutine(Sub_saveInitialItems)
#@form = sleep(10000)
@form  = subroutine(Form_Insert)
#@form  = action(start,auto,now)
[Form_SaveInsFinishStep1]
txt_medicines_kasei  = setcookie(medicines_kasei)
txt_medicines_ryusan = setcookie(medicines_ryusan)
txt_medicines_jia    = setcookie(medicines_jia)
txt_time_melt1       = setcookie(time_melt1)
txt_time_neutralize  = setcookie(time_neutralize)
txt_time_melt2       = setcookie(time_melt2)

[Form_SaveInsFinishStep2]
#工程スキップの為　Form_SaveInsFinishStep1　へ統合
#txt_medicines_ryusan = setcookie(medicines_ryusan)
[Form_SaveInsFinishStep3]
#工程スキップの為　Form_SaveInsFinishStep1　へ統合
#txt_medicines_jia    = setcookie(medicines_jia)
[Form_SaveInsFinishStep4]
txt_medicines_tio    = setcookie(medicines_tio)

#ステップ(1)
[Form_EditStep1]
@form             = eventlocked(true)
txt_process       = string(1)
@form             = subroutine(Sub_refreshMiddle)
@form             = subroutine(Sub_setVisibleStep1)
@form             = eventlocked(false)
txt_temperature_1 = setfocus()

#ステップ(1)デフォルト値
[Form_EditStep1Init]
@form               = eventlocked(true)
this                = subroutine(sub_TimeSet)
#txt_medicines_kasei = string(43)
txt_medicines_kasei = getcookie(medicines_kasei)
txt_Hour_start      = copystring(txt_Hour)
txt_minute_start    = copystring(txt_minute)
txt_medicines_ryusan = getcookie(medicines_ryusan)
txt_medicines_jia    = getcookie(medicines_jia)
txt_time_melt1       = getcookie(time_melt1)
txt_time_neutralize  = getcookie(time_neutralize)
txt_time_melt2       = getcookie(time_melt2)

@form               = subroutine(Sub_refreshMiddle)
@form               = eventlocked(false)

#ステップ(2)
[Form_EditStep2]
#工程スキップの為　Form_EditStep1　へ統合
@form         = eventlocked(true)
txt_process   = string(2)
@form         = subroutine(Sub_refreshMiddle)
@form         = subroutine(Sub_setVisibleStep2)
@form         = eventlocked(false)
txt_medicines_ryusan = setfocus()

#ステップ(2)デフォルト値
[Form_EditStep2Init]
@form = eventlocked(true)
#this = subroutine(sub_TimeSet)
#txt_medicines_ryusan = string(28)
txt_medicines_ryusan = getcookie(medicines_ryusan)
txt_fuka = clear()
txt_capacity =clear()
@form = subroutine(Sub_refreshMiddle)
@form = eventlocked(false)

#ステップ(3)
[Form_EditStep3]
@form = eventlocked(true)
txt_process = string(3)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep3)
@form = eventlocked(false)
#txt_medicines_jia = setfocus()

#ステップ(3)デフォルト値
[Form_EditStep3Init]
@form = eventlocked(true)
#this = subroutine(sub_TimeSet)
#txt_medicines_jia = string(140)
txt_medicines_jia    = getcookie(medicines_jia)
txt_fuka = clear()
txt_capacity =clear()
@form = subroutine(Sub_refreshMiddle)
@form = eventlocked(false)

#ステップ(4)
[Form_EditStep4]
@form = eventlocked(true)
txt_process = string(4)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep4)
@form = eventlocked(false)
#txt_medicines_tio = setfocus()

#ステップ(4)デフォルト値
[Form_EditStep4Init]
@form = eventlocked(true)
#this = subroutine(sub_TimeSet)
#txt_medicines_tio = string(5)
txt_medicines_tio    = getcookie(medicines_tio)
@form = subroutine(Sub_refreshMiddle)
@form = eventlocked(false)

#ステップ(5)
[Form_EditStep5]
@form = eventlocked(true)
txt_process = string(5)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep5)
@form = eventlocked(false)
txt_note1 = setfocus()

#ステップ(5)デフォルト値
[Form_EditStep5Init]
@form = eventlocked(true)
#this = subroutine(sub_TimeSet)
@form = subroutine(Sub_refreshMiddle)
@form = eventlocked(false)

#ステップ(6)
[Form_EditStep6]
@form = eventlocked(true)
txt_process = string(6)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep6)
@form = eventlocked(false)
txt_note1 = setfocus()

#ステップ(6)デフォルト値
[Form_EditStep6Init]
@form = eventlocked(true)
#this = subroutine(sub_TimeSet)
@form = subroutine(Sub_refreshMiddle)
@form = eventlocked(false)

#検証開始
[Form_Verification]
@form = eventlocked(true)
@form = subroutine(Sub_lockedHeaderUpd)
@form = subroutine(Sub_refreshHeader)
@form = eventlocked(false)

#検証開始(1回目)
[Form_VerificationFirst]
@form = eventlocked(true)
txt_process = string(7)
#txt_Hour1 = sysdate(hour)
#txt_minute1 = sysdate(minute)
@form = sysdatetimeparts(txt_year1,txt_month1,txt_day1,txt_Hour1,txt_minute1)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep7)
@form = eventlocked(false)
#txt_up = setfocus()
txt_Hour1 = setfocus()
#検証開始(2回目以降)
[Form_VerificationSecond]
@form = eventlocked(true)
txt_process = string(7)
@form = subroutine(Sub_refreshMiddle)
@form = subroutine(Sub_setVisibleStep7)
@form = eventlocked(false)
#txt_up = setfocus()
txt_Hour1 = setfocus()
#最新の状態へ更新(投入前)
[Form_RefreshStart]
@form = eventlocked(true)
@form = subroutine(Sub_refreshHeader)
@form = eventlocked(false)

#--------------------------------------------------
# イベントトラップ
#--------------------------------------------------
#担当者変更時
[cmb_Staff_Click]
txt_cd_staff = copystring(cmb_Staff)
[txt_cd_staff_LostFocus]
cmb_Staff = copystring(txt_cd_staff)
txt_cd_staff = copystring(cmb_Staff)

#作業日付変更時
[txt_dts_year_LostFocus]
this = formatstring(0000)
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)
[txt_dts_month_LostFocus]
this = formatstring(00)
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)
[txt_dts_day_LostFocus]
this = formatstring(00)
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)

#開始時刻変更時
[txt_Hour_LostFocus]
txt_time = timeby2parts(txt_Hour,txt_minute)
[txt_minute_LostFocus]
txt_time = timeby2parts(txt_Hour,txt_minute)

#検証時刻変更時
[txt_Hour1_LostFocus]
txt_time1 = timeby2parts(txt_Hour1,txt_minute1)
[txt_minute1_LostFocus]
txt_time1 = timeby2parts(txt_Hour1,txt_minute1)

## タイマー
[tim_auto_Timer]
@form = action(refresh,auto)
#@form = action(start,auto)
#@form = action(save,auto)

[txt_up_LostFocus]
[txt_ph_LostFocus]
[txt_tokeguai_LostFocus]
[txt_tyest_LostFocus]
[txt_fuka_LostFocus]
[txt_capacity_LostFocus]
[txt_kasei_LostFocus]
[txt_temperature_1_LostFocus]
[txt_medicines_jia_LostFocus]
[txt_medicines_kasei_LostFocus]
[txt_medicines_ryusan_LostFocus]
[txt_medicines_tio_LostFocus]
[txt_no_Batch_LostFocus]


#--------------------------------------------------
# サブルーチン
#--------------------------------------------------
## 初期処理
[Sub_Init]
@form = clearall
@form = action(settingspread)
spd_ShipHistry = setlistcount(0)
txt_termid = termid
txt_pulperNo = string(1)
tim_auto = enabled(false)

## ヘッダ部の整合性をとる
[Sub_refreshHeader]
@form = subroutine(Sub_loadBatchInfos)
@form = subroutine(Sub_loadHeaderCombos)
cmb_Staff         = copystring(txt_cd_staff)
txt_cd_staff      = copystring(cmb_Staff)
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)
txt_dts_year      = formatstring(0000)
txt_dts_month     = formatstring(00)
txt_dts_day       = formatstring(00)

## 中央部の整合性をとる
[Sub_refreshMiddle]
txt_time_start    = timeby2parts(txt_Hour_start,txt_minute_start)
txt_time1         = timeby2parts(txt_Hour1,txt_minute1)

## ヘッダ部のロック(新規)
[Sub_lockedHeaderIns]
txt_dts_year      = enabled(false)
txt_dts_month     = enabled(false)
txt_dts_day       = enabled(false)
txt_cd_staff      = enabled(false)
cmb_Staff         = enabled(false)
txt_no_batch      = enabled(false)
cmd_start         = visible(true)
cmd_start         = enabled(false)
cmd_historyPulper = visible(false)
cmd_historyPulper = enabled(false)
cmd_cancel        = enabled(true)

## ヘッダ部のロック(修正)
[Sub_lockedHeaderUpd]
txt_dts_year      = enabled(false)
txt_dts_month     = enabled(false)
txt_dts_day       = enabled(false)
txt_cd_staff      = enabled(false)
cmb_Staff         = enabled(false)
txt_no_batch      = enabled(false)
cmd_start         = visible(false)
cmd_start         = enabled(false)
cmd_historyPulper = visible(true)
cmd_historyPulper = enabled(false)
cmd_cancel        = enabled(true)

## ヘッダ部のロック(修正)
[Sub_unlockedHeaderUpd]
txt_dts_year      = enabled(true)
txt_dts_month     = enabled(true)
txt_dts_day       = enabled(true)
txt_cd_staff      = enabled(false)
cmb_Staff         = enabled(false)
txt_no_batch      = enabled(false)
cmd_start         = visible(false)
cmd_start         = enabled(false)
cmd_historyPulper = visible(true)
cmd_historyPulper = enabled(true)
cmd_cancel        = enabled(true)

## ヘッダ部のロック解除(新規)
[Sub_unlockedHeaderIns]
txt_dts_year      = enabled(false)
txt_dts_month     = enabled(false)
txt_dts_day       = enabled(false)
txt_cd_staff      = enabled(true)
cmb_Staff         = enabled(true)
txt_no_batch      = enabled(false)
cmd_start         = visible(true)
cmd_start         = enabled(true)
cmd_historyPulper = visible(false)
cmd_historyPulper = enabled(false)
cmd_cancel        = enabled(true)

## ヘッダ部のロック解除(修正)
[Sub_unlockedHeaderUpd]
txt_dts_year      = enabled(true)
txt_dts_month     = enabled(true)
txt_dts_day       = enabled(true)
txt_cd_staff      = enabled(true)
cmb_Staff         = enabled(true)
txt_no_batch      = enabled(true)
cmd_start         = visible(false)
cmd_start         = enabled(false)
cmd_historyPulper = visible(true)
cmd_historyPulper = enabled(true)
cmd_cancel        = enabled(true)

## 本体のロック
[Sub_lockedBody]
txt_Hour_start       = enabled(False)
txt_minute_start     = enabled(False)
txt_temperature      = enabled(False)
txt_Hour_end         = enabled(False)
txt_minute_end       = enabled(False)
spd_ShipHistry       = enabled(False)
spd_list             = enabled(False)
spd_list2            = enabled(False)
txt_purewater_disp   = enabled(False)
txt_dust_count_disp  = enabled(False)
txt_no_dust_disp     = enabled(False)
@form                = subroutine(Sub_setVisibleAll)

## 可視不可視切り替え
[Sub_setVisibleAll]
Fra_1                = Visible(False)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = Visible(False)
cmd_End_2            = Visible(False)
cmd_End_3            = Visible(False)
cmd_End_4            = Visible(False)
cmd_End_5            = Visible(False)
cmd_End_6            = Visible(False)
spd_list2            = Visible(False)
cmd_check            = Visible(False)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep1]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_8                = Visible(False)
Fra_chemicals_fuka   = Visible(True)
Fra_chemicals_ryusan = Visible(True)
Fra_chemicals_jia    = Visible(True)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(True)
Fra_temperature      = Visible(True)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(True)
Fra_capacity         = Visible(True)
cmd_End_1            = visible(true)
cmd_End_2            = visible(false)
cmd_End_3            = visible(false)
cmd_End_4            = visible(false)
cmd_End_5            = visible(false)
cmd_End_6            = visible(false)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(true)
[Sub_setVisibleStep2]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(True)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(True)
Fra_capacity         = Visible(True)
cmd_End_1            = visible(false)
cmd_End_2            = visible(true)
cmd_End_3            = visible(false)
cmd_End_4            = visible(false)
cmd_End_5            = visible(false)
cmd_End_6            = visible(false)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep3]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(True)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = visible(false)
cmd_End_2            = visible(false)
cmd_End_3            = visible(true)
cmd_End_4            = visible(false)
cmd_End_5            = visible(false)
cmd_End_6            = visible(false)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep4]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(True)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = visible(false)
cmd_End_2            = visible(false)
cmd_End_3            = visible(false)
cmd_End_4            = visible(true)
cmd_End_5            = visible(false)
cmd_End_6            = visible(false)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep5]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = visible(false)
cmd_End_2            = visible(false)
cmd_End_3            = visible(false)
cmd_End_4            = visible(false)
cmd_End_5            = visible(true)
cmd_End_6            = visible(false)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep6]
Fra_1                = Visible(True)
Fra_2                = Visible(False)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = visible(false)
cmd_End_2            = visible(false)
cmd_End_3            = visible(false)
cmd_End_4            = visible(false)
cmd_End_5            = visible(false)
cmd_End_6            = visible(true)
spd_list2            = Visible(true)
cmd_check            = Visible(true)
Fra_8            　　= Visible(False)
[Sub_setVisibleStep7]
Fra_1                = Visible(False)
Fra_2                = Visible(True)
Fra_chemicals_fuka   = Visible(False)
Fra_chemicals_ryusan = Visible(False)
Fra_chemicals_jia    = Visible(False)
Fra_chemicals_tio    = Visible(False)
Fra_time             = Visible(False)
Fra_temperature      = Visible(False)
Fra_kasei            = Visible(False)
Fra_fuka             = Visible(False)
Fra_capacity         = Visible(False)
cmd_End_1            = Visible(False)
cmd_End_2            = Visible(False)
cmd_End_3            = Visible(False)
cmd_End_4            = Visible(False)
cmd_End_5            = Visible(False)
cmd_End_6            = Visible(False)
spd_list2            = Visible(true)
Fra_8            　　= Visible(False)

## 固定コンボボックス作成
[Sub_loadStaticCombos]
cmb_Staff = loadcombo(activestaff,cd_staff,name_staff,true)

## ヘッダ部のコンボボックス作成
[Sub_loadHeaderCombos]

## バッチNOの取得
[Sub_loadBatchInfos]
@form = action(loadbatch)
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)
@form = action(loadbatchobjects)

## 日付変更時の処理
[Sub_changedDts]
txt_dt_Pulper = dateby3parts(txt_dts_year,txt_dts_month,txt_dts_day)
@form = subroutine(Sub_refreshHeader)

#本日日付をセット
[Sub_Today]
#txt_dts_year  = sysdate(year)
#txt_dts_month = sysdate(month)
#txt_dts_day   = sysdate(day)
@form = sysdateparts(txt_dts_year,txt_dts_month,txt_dts_day)
@form = subroutine(Sub_changedDts)

#時間の設定
[sub_TimeSet]
#txt_year   = sysdate(year)
#txt_month  = sysdate(month)
#txt_day    = sysdate(day)
#txt_Hour   = sysdate(Hour)
#txt_minute = sysdate(minute)
@form = sysdatetimeparts(txt_year,txt_month,txt_day,txt_Hour,txt_minute)
txt_time   = timeby2parts(txt_Hour,txt_minute)

#入力部を不可視にする
[Sub_InputVisible_False]
Fra_1 = Visible(False) 
Fra_2 = Visible(False) 
Fra_chemicals_fuka = Visible(False) 
Fra_chemicals_ryusan = Visible(False) 
Fra_chemicals_jia = Visible(False) 
Fra_chemicals_tio = Visible(False) 
Fra_time = Visible(False)
Fra_temperature = Visible(False)
Fra_kasei = Visible(False)
Fra_fuka = Visible(False)
Fra_capacity = Visible(False)
cmd_End_1 = Visible(False)
cmd_End_2 = Visible(False)
cmd_End_3 = Visible(False)
cmd_End_4 = Visible(False)
cmd_End_5 = Visible(False)
cmd_End_6 = Visible(False)
spd_list2 = Visible(False)

#明細部を仕様不可にする
[Sub_MeisaEnabled_False]
txt_Hour_start = enabled(False)
txt_minute_start = enabled(False)
txt_temperature = enabled(False)
txt_Hour_end = enabled(False)
txt_minute_end = enabled(False)
spd_ShipHistry = enabled(False)
spd_list = enabled(False)
spd_list2 = enabled(False)
txt_dust_count_disp = enabled(False)
txt_no_dust_disp = enabled(False)
txt_purewater_disp = enabled(False)

## 初期値設定の読み込み
[Sub_loadInitialItems]
txt_cd_staff    = getcookie(cd_staff)

## 初期値設定の書き込み
[Sub_saveInitialItems]
txt_cd_staff    = setcookie(cd_staff)

## 処理選択表示
[Sub_dispInsMode]
cmd_ins         = backcolor(&HFFDFFF)
cmd_upd         = backcolor(&H8000000F&)
[Sub_dispUpdMode]
cmd_ins         = backcolor(&H8000000F&)
cmd_upd         = backcolor(&HFFDFFF)

#隠しコントロール非表示
[Sub_Debug_False]
txt_mode = Visible(False)
txt_dt_Pulper = Visible(False)
txt_no_Pulper = Visible(False)
txt_pulperNo = Visible(False)
txt_termid = Visible(False)
txt_subselected = Visible(False)
txt_time = Visible(False)
txt_time1 = Visible(False)
txt_process = Visible(False)
txt_time_start = Visible(False)
txt_time_end = Visible(False)
txt_ins = Visible(False)
txt_editstart = Visible(False)
txt_year = visible(false)
txt_month = visible(false)
txt_day = visible(false)
txt_year1 = visible(false)
txt_month1 = visible(false)
txt_day1 = visible(false)
txt_dispalert = visible(false)
txt_note = visible(false)