暫無描述
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

全域變數.vb 11KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. Module 全域變數
  2. '----系統登入----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  3. Public g_conn_type, gUserName, 登入人部門, 登入人課別, 登入人組別, 登入人級別, 登入人IP, 登入人職稱, 版本號, Target, Target1, Target2, FTP帳號, FTP密碼, FTP物理位置, 電腦識別碼 As String
  4. Public 倉儲倉級1, 倉儲倉級2, 倉儲倉級3, 倉儲倉級4, 倉儲倉級5, 倉儲倉級6, 倉儲倉級7, 倉儲倉級8, 倉儲倉級9, 簽核圖片編號, 系統語言, 介面, 低網, 圖片庫, 計算機調, AA(99) As String
  5. Public 密碼時限, 行政採購簽核級別基數, 建築採購簽核級別基數, 工程圖庫限制 As Integer
  6. Public 零用金選擇, 低網速模式, 重新計算, BB(99), CC(200) As Boolean
  7. Public 不變形 As Boolean = True
  8. Public lastFoundRowIndex, lastFoundColIndex As Integer
  9. '------LINE變數-------
  10. Public 發送對象, LINE_權限代號, PA201, PA202, PA203, PA204, PA205, 通知變數X, 通知變數Y As String
  11. '----系統版本----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  12. Public 版本 As String = "2023122804" : Public 資料庫版本 As String
  13. '----系統閒置----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  14. Public 判斷重登, 重登確認, 主頁開啟, 首次開啟, 物料查詢, 深色風格, 不刪除檔案 As Boolean
  15. Public timeExit, timeExit2, timeNow, timeNow2 As Integer
  16. '----系統用全域變數----------------------------------------------------------------------------------------------------------------------------------------------------------------------
  17. Public 圖片傳遞 As Image
  18. Public 進度條後墜, 工程日報控制, 工程日報明細, 清單列表, 幣別, 列印用SQL, 列印用SQL2, PPAA, DTP, DTP1, DTP2, DTP3, 物料關鍵字, PDF路徑, 通知訊息, 訊息回應, 訊息類型, 語言 As String
  19. '--------------整數變數
  20. Public 比例1, 比例2, 比例3, 分母, NN1, 計算累加 As Integer
  21. '--------------布林函數
  22. Public 系統分區控制, BL, BL1, BL2, BL3, BL4, BL5, BL6, BL7, BL8, BL9, H(999), 一級, 二級, 三級, 四級, TW, EN, 在職, 工人, 不用WEB As Boolean
  23. '--------------雙精變數
  24. Public 分段1, 分段2, 分段3, 分段4, NU1, NU2, NU3, NU4, NU5 As Double
  25. '--------------字串變數
  26. Public BBL1, BBL2, BBL3, BBL4, BBL5, BBL6 As String
  27. Public PA, PA1, PA2, PA3, PA4, PA5, PA6, PA7, PA8, PA9, PA10, PA11, PA12, PA13, PA14, PA15, PA16, PA17, PA18, PA19, PA20, PA21, PA22, PA23, PA24, PA25, PA26, PA27, PA28, PA29, PA30,
  28. PA31, PA32, PA33, PA34, PA35, PA36, PA37, PA38, PA39, PA40, PA41, PA42, PA43, PA44, PA45, PA46, PA47, PA48, PA49, PA50 As String
  29. Public 翻譯EN, 翻譯IN, 翻譯, 翻譯CH As String
  30. Public PPBB(3000), 指定會科 As String
  31. '--------------物料格式表頭專用
  32. Public AAA1, AAA2, AAA3, AAA4, AAA5, AAA6, AAA7, AAA8 As String
  33. '--------------桌面捷徑預設使用
  34. Public 捷徑名稱(100), 顯示名稱(100), 捷徑類別(100) As String : Public 捷徑數量 As Integer
  35. '----表頭宣告-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  36. Public 表頭(200), 合約試算表頭(40) As String
  37. ' *************************************************************************************************************************************************************************************************
  38. ' * 介面、關閉__________表頭(0) * 控件、預計開始_______表頭(1) * 語言、工作天數_____表頭(2) * 內容、預計結束______表頭(3) * 姓名、聯絡人________表頭(4) * 帳號、長期執行______表頭(5) *
  39. ' * 部門、申請部門______表頭(6) * 課別、聯繫部門_______表頭(7) * 組別、執行部門_____表頭(8) * 職稱、執行人________表頭(9) * ID卡、執行時間______表頭(10) * 項次________________表頭(11) *
  40. ' * 品名________________表頭(12) * 規格_________________表頭(13) * 備註_______________表頭(14) * 數量、人數__________表頭(15) * 單位________________表頭(16) * 用途、執行情況______表頭(17) *
  41. ' * 單號________________表頭(18) * 申請人_______________表頭(19) * 申請日期___________表頭(20) * 核准人______________表頭(21) * 核准日期____________表頭(22) * 準備採購____________表頭(23) *
  42. ' * 採購單號____________表頭(24) * 已收貨_______________表頭(25) * 單價_______________表頭(26) * 金額________________表頭(27) * 已採購、已建檔______表頭(28) * 供應商______________表頭(29) *
  43. ' * 需求日期____________表頭(30) * 採購員_______________表頭(31) * 採購日期___________表頭(32) * 折扣金額____________表頭(33) * 稅__________________表頭(34) * 稅金________________表頭(35) *
  44. ' * 稅後金額____________表頭(36) * 會計作業_____________表頭(37) * 出納作業___________表頭(38) * 現金________________表頭(39) * 備用金______________表頭(40) * 公障________________表頭(41) *
  45. ' * 已申請入庫__________表頭(42) * 已入庫_______________表頭(43) * 選擇_______________表頭(44) * 入庫________________表頭(45) * 出庫________________表頭(46) * 倉儲單號____________表頭(47) *
  46. ' * 指定倉庫____________表頭(48) * 編碼_________________表頭(49) * 簡稱_______________表頭(50) * 公司名______________表頭(51) * 地址________________表頭(52) * 公司電話1___________表頭(53) *
  47. ' * 公司電話2___________表頭(54) * 公司電話3____________表頭(55) * 傳真1______________表頭(56) * 傳真2_______________表頭(57) * 傳真3_______________表頭(58) * 聯繫人1_____________表頭(59) *
  48. ' * 聯繫人2_____________表頭(60) * 聯繫人3______________表頭(61) * 群組碼_____________表頭(62) * 料號原則____________表頭(63) * 原則說明____________表頭(64) * 最低庫存____________表頭(65) *
  49. ' * 最高庫存____________表頭(66) * 指定_________________表頭(67) * 倉級_______________表頭(68) * 倉名編號____________表頭(69) * 倉名________________表頭(70) * 狀態________________表頭(71) *
  50. ' * 倉庫作業、已作業____表頭(72) * 作業日期、派工日_____表頭(73) * 指定入倉___________表頭(74) * 使用工地____________表頭(75) * 類別________________表頭(76) * 料號________________表頭(77) *
  51. ' * 庫存________________表頭(78) * 未入庫_______________表頭(79) * 未出庫_____________表頭(80) * 可領用______________表頭(81) * 進度條______________表頭(82) * 申請數、總數________表頭(83) *
  52. ' * 出貨定點____________表頭(84) * 收貨地點_____________表頭(85) * 使用地點___________表頭(86) * 圖檔編碼____________表頭(87) * 請購單號____________表頭(88) * 年__________________表頭(89) *
  53. ' * 月__________________表頭(90) * 買進匯率_____________表頭(91) * 賣出匯率___________表頭(92) * 中心匯率____________表頭(93) * 美金匯率____________表頭(94) * 印尼盾______________表頭(95) *
  54. ' * 第一層______________表頭(96) * 第二層_______________表頭(97) * 會計科目___________表頭(98) * 編號________________表頭(99) * 層級________________表頭(100) * 英文名稱____________表頭(101) *
  55. ' * 統制科目____________表頭(102 * 抵銷科目_____________表頭(103) * 停用_______________表頭(104) * 附註________________表頭(105) * 顯示________________表頭(106) * 收支單號____________表頭(107) *
  56. ' * 審核日期____________表頭(108) * 用途_________________表頭(109) * 零用金_____________表頭(110) * 支票________________表頭(111) * 支出________________表頭(112) * 票期________________表頭(113) *
  57. ' * 匯率________________表頭(114) * 幣別_________________表頭(115) * 日期_______________表頭(116) * 主項、主旨__________表頭(117) * 子項________________表頭(118) * 子細項______________表頭(119) *
  58. ' * 審核人、本地幹部____表頭(120) * 審核日期_____________表頭(121) * 用途與內容_________表頭(122) * 作帳日期____________表頭(123) * 點交________________表頭(124) * 點交日期____________表頭(125) *
  59. ' * 零用金點交__________表頭(126) * 支票兌現_____________表頭(127) * 現金點交___________表頭(128) * 支出點交____________表頭(129) * 會計________________表頭(130) * 主項金額____________表頭(131) *
  60. ' * 子項金額____________表頭(132) * 細項金額_____________表頭(133) * 合約號_____________表頭(134) * 地點編號____________表頭(135) * 地點名稱____________表頭(136) * 資料流水號__________表頭(137) *
  61. ' * 級別________________表頭(138) * 部___________________表頭(139) * 處_________________表頭(140) * 課__________________表頭(141) * 組__________________表頭(142) * 時效________________表頭(143) *
  62. ' * 授權________________表頭(144) * 負責人_______________表頭(145) * 負責人電話_________表頭(146) * 聯繫人1電話_________表頭(147) * 聯繫人1郵件_________表頭(148) * 聯繫人2電話_________表頭(149) *
  63. ' * 聯繫人2郵件_________表頭(150) * 工程地點_____________表頭(151) * 工地名稱___________表頭(152) * 開工時間____________表頭(153) * 作業代碼____________表頭(154) * 工作、項目__________表頭(155) *
  64. ' * 工作說明____________表頭(156) * 今日完成比例_________表頭(157) * orang______________表頭(158) * 已完成比例、已完成__表頭(159) * 資料庫______________表頭(160) * 工作內容____________表頭(161) *
  65. ' * 簽名檔人名__________表頭(162) * 年份_________________表頭(163) * FTP地址____________表頭(164) * FTP帳號_____________表頭(165) * FTP密碼_____________表頭(166) * 地區________________表頭(167) *
  66. ' * FTP物理位置_________表頭(168) * 天氣_________________表頭(169) * 天氣_______________表頭(170) * 時段________________表頭(171) * 請購單號____________表頭(172) * 執行單號____________表頭(173) *
  67. ' * 倉名編號1___________表頭(174) * 授權功能_____________表頭(175) * 授權人_____________表頭(176) * 授權碼______________表頭(177) * 甲方________________表頭(178) * 到期________________表頭(179) *
  68. ' * 追加減______________表頭(180) * 結算_________________表頭(181) * 請款_______________表頭(182) * 剩餘________________表頭(183) * 預付________________表頭(184) * 到貨________________表頭(185) *
  69. ' * 施工________________表頭(186) * 驗收_________________表頭(187) * 保固_______________表頭(188) *
  70. ' *************************************************************************************************************************************************************************************************
  71. Public screenWidth = Screen.PrimaryScreen.Bounds.Width
  72. Public screenHeight = Screen.PrimaryScreen.Bounds.Height
  73. '====語轉字典====
  74. Public 系統語言字典 As New Dictionary(Of String, String)()
  75. End Module