※ 2頁 実行 前 IU_L下nks ン 必要 あ
※ 保 先 送信元 絶対 指定 さい
※ 検査規格 指定
※ _V・LUE_MODEL01ヤtxt 機種毎 検査規格 ソコンへ MELQIC 内 規格 込 修
通信経由 MELQIC 送信
・ャルラ IU2 設計事例集
2.
〇標準
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム 安安Publ下c関数 設定
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム Publ下cブIUCommブ・sブNewブIUCOML下bヤCl下ent
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム
安安処理 称ブブ:ブ通信 設定
安安処理概要ブブ:ブIU2 通信 必要 一括
安安引数ブブブブブブ:ブ 安安戻 値ブブブブ:ブ
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム Publ下cブSubブSetDefaultPropaty止正
ブブ
ブブD下mブlValueブ・sブLon三 ブブ
ブブ安=============================================================
ブブ安●処理概要
ブブ安ブブ各種 設定 ｡
ブブブブ
ブブ安 設定ブャ>ブ 設定 ソ 実行
ブブlValueブ=ブ0
ブブIUCommヤCl下entProperty止"Commun下cat下onMode"正ブ=ブlValue ブブlValueブ=ブ守H・C110001
ブブIUCommヤCl下entProperty止"IP・ddress"正ブ=ブlValue ブブlValueブ=ブ0
ブブIUCommヤCl下entProperty止"PortNumber"正ブ=ブlValue ブブlValueブ=ブ20
ブブIUCommヤCl下entProperty止"T下meOut"正ブ=ブlValue ブブブ
EndブSub
〇更新 ン
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム
安安処理 称ブブ:ブ 出
安安処理概要ブブ:ブIU2 指定 値 得
安安引数ブブブブブブ:ブ 安安戻 値ブブブブ:ブ
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム Pr下vateブSubブMon下ter_Start_Cl下ck止正
・ャルリ IU2 設計事例集
モータ検査装置
ブブD下mブlTypeブ・sブLon三 ブブD下mブlStartNumブ・sブLon三 ブブD下mブlDーLOffSetブ・sブLon三 ブブD下mブlNumブ・sブLon三 ブブD下mブl下DataTypeブ・sブLon三 ブブD下mブloDataブ・sブLon三 ブブD下mブvar・rrayData ブブD下mブlRetブ・sブLon三 ブブD下mブIDブ・sブInte三er ブブ
ブブ安=============================================================
ブブ安●処理概要
ブブ安ブブIU2 指定 値 得
ブブ安=============================================================
ブブブブ
ブブ安■通信 通信
ブブ安通信 ブブブ
ブブブSetDefaultPropaty ブブブブ
ブブ安各種 設定
ブブlTypeブ=ブ守H8000000ルブブブブブブブブブブ安 出 種 =M ブブlStartNumブ=ブ10ブブブブブブブブブブブブブブ安 出 開始 番号=10 ブブlNumブ=ブロブブブブブブブブブブブブブブブブブブブブ安 出 数
ブブl下DataTypeブ=ブ守H22000000ブブブブブ安 出 型=ーool型 ブブブブ
ブ
ブ安IU2通信MュWブCOMコ 出
ブブOnブErrorブResumeブNext
ブブブブIUCommヤDev下ceReadブlTypeモブlStartNumモブlDーLOffSetモブlNumモブ_
ブブブブブブブブブブブブブブブブブブブブブブブブブブブブブl下DataTypeモブloDataモブvar・rrayData ブブブブ
ブブ安=============================================================
ブブ安■ コ 得
ブブlRetブ=ブIUCommヤCl下entProperty止"ErrorCode"正
ブブ安=============================================================
ブブIfブlRetブ<>ブ0ブT上en
ブブブブMs三ーoxブ" コ :"ブ守ブlRet ブブEndブIf
・ャルル IU2 設計事例集
ブブ安■ へ結果 出力
ブブIfブvar・rrayData止1正ブ=ブ1ブT上en
ブブブブRan三e止"ール"正ヤValueブ=ブ"定 特性 "
ブブElseIfブvar・rrayData止2正ブ=ブ1ブT上en
ブブブブRan三e止"ール"正ヤValueブ=ブ" 特性 "
ブブEndブIf ブブ
ブブRan三e止"ー10:ー1リ"正ヤSelect
ブブSelect下onヤInter下orヤColorIndexブ=ブxlNone ブブブブ
ブブIfブvar・rrayData止ラ正ブ=ブ1ブT上en ブブブブRan三e止"ー10"正ヤSelect ブブブブW下t上ブSelect下onヤInter下or ブブブブブブブブヤColorIndexブ=ブ8 ブブブブブブブブヤPatternブ=ブxlSol下d
ブブブブブブブブヤPatternColorIndexブ=ブxl・utomat下c ブブブブEndブW下t上
ブブブブIDブ=ブ1
ブブElseIfブvar・rrayData止リ正ブ=ブ1ブT上en ブブブブRan三e止"ー11"正ヤSelect
ブブブブW下t上ブSelect下onヤInter下or ブブブブブブブブヤColorIndexブ=ブ8 ブブブブブブブブヤPatternブ=ブxlSol下d
ブブブブブブブブヤPatternColorIndexブ=ブxl・utomat下c ブブブブEndブW下t上
ブブブブIDブ=ブ2
ブブElseIfブvar・rrayData止ル正ブ=ブ1ブT上en ブブブブRan三e止"ー12"正ヤSelect
ブブブブW下t上ブSelect下onヤInter下or ブブブブブブブブヤColorIndexブ=ブ8 ブブブブブブブブヤPatternブ=ブxlSol下d
ブブブブブブブブヤPatternColorIndexブ=ブxl・utomat下c ブブブブEndブW下t上
ブブブブIDブ=ブラ
ブブElseIfブvar・rrayData止レ正ブ=ブ1ブT上en ブブブブRan三e止"ー1ラ"正ヤSelect
ブブブブW下t上ブSelect下onヤInter下or ブブブブブブブブヤColorIndexブ=ブ8 ブブブブブブブブヤPatternブ=ブxlSol下d
ブブブブブブブブヤPatternColorIndexブ=ブxl・utomat下c ブブブブEndブW下t上
ブブブブIDブ=ブリ
・ャルレ IU2 設計事例集
モータ検査装置
ブブElseIfブvar・rrayData止ロ正ブ=ブ1ブT上en ブブブブRan三e止"ー1リ"正ヤSelect
ブブブブW下t上ブSelect下onヤInter下or ブブブブブブブブヤColorIndexブ=ブ8 ブブブブブブブブヤPatternブ=ブxlSol下d
ブブブブブブブブヤPatternColorIndexブ=ブxl・utomat下c ブブブブEndブW下t上
ブブブブIDブ=ブル ブブEndブIf ブブ
ブブ安各種 設定
ブブlTypeブ=ブ守H8000000ロブブブブブブブブブブ安 出 種 =D ブブlStartNumブ=ブ20ブブブブブブブブブブブブブブ安 出 開始 番号=20 ブブlNumブ=ブ10ブブブブブブブブブブブブブブブブブブブブ安 出 数
ブブl下DataTypeブ=ブ守H2C000000ブブブブブ安 出 型=S上ort型 ブブブブ
ブ
ブ安IU2通信MュWブCOMコ 出
ブブOnブErrorブResumeブNext
ブブブブIUCommヤDev下ceReadブlTypeモブlStartNumモブlDーLOffSetモブlNumモブ_
ブブブブブブブブブブブブブブブブブブブブブブブブブブブブブl下DataTypeモブloDataモブvar・rrayData ブブブブ
ブブ安=============================================================
ブブ安■ コ 得
ブブlRetブ=ブIUCommヤCl下entProperty止"ErrorCode"正
ブブ安=============================================================
ブブIfブlRetブ<>ブ0ブT上en
ブブブブMs三ーoxブ" コ :"ブ守ブlRet ブブEndブIf
・ャルロ IU2 設計事例集
ブ安■ へ結果 出力
ブブSelectブCaseブID ブブCaseブ1
ブブブブRan三e止"C10"正ヤValueブ=ブvar・rrayData止1正 ブブブブRan三e止"D10"正ヤValueブ=ブvar・rrayData止レ正 ブブCaseブ2
ブブブブRan三e止"C11"正ヤValueブ=ブvar・rrayData止2正 ブブブブRan三e止"D11"正ヤValueブ=ブvar・rrayData止ロ正 ブブCaseブラ
ブブブブRan三e止"C12"正ヤValueブ=ブvar・rrayData止ラ正 ブブブブRan三e止"D12"正ヤValueブ=ブvar・rrayData止8正 ブブCaseブリ
ブブブブRan三e止"C1ラ"正ヤValueブ=ブvar・rrayData止リ正 ブブブブRan三e止"D1ラ"正ヤValueブ=ブvar・rrayData止9正 ブブCaseブル
ブブブブRan三e止"C1リ"正ヤValueブ=ブvar・rrayData止ル正 ブブブブRan三e止"D1リ"正ヤValueブ=ブvar・rrayData止10正 ブブEndブSelect
ブブブブ EndブSub
〇 信 ン
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム
安安処理 称ブブ:ブ指定 信
安安処理概要ブブ:ブIU2 指定 得
安安引数ブブブブブブ:ブ 安安戻 値ブブブブ:ブ
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム Pr下vateブSubブF下le_Get_Cl下ck止正
ブブD下mブstrF下leNameブ・sブStr下n三 ブブD下mブstrF下lePat上ブ・sブStr下n三 ブブD下mブstrFullPat上ブ・sブStr下n三 ブブD下mブstrNameブ・sブStr下n三 ブブD下mブlRetブ・sブLon三 ブブ
ブブ安=============================================================
ブブ安●処理概要
ブブ安ブブIU2 指定 得
ブブ安=============================================================
・ャル8 IU2 設計事例集
モータ検査装置
ブブブ安■通信 通信
ブブ安通信
ブブSetDefaultPropaty ブブ
ブブ安各種
ブブstrF下lePat上ブ=ブRan三e止"Hル"正ヤValue ブブstrF下leNameブ=ブRan三e止"Hレ"正ヤValue
ブブstrNameブ=ブ・ppl下cat下onヤSubst下tute止strF下lePat上モブ":\"モブ":\\"正 ブブstrFullPat上ブ=ブstrNameブメブ"\"ブメブstrF下leName
ブブ
ブブIfブvbYesブ=ブMs三ーox止" 信 "モブvbYesNo正ブT上en ブブブブIfブD下r止strFullPat上正ブ=ブ""ブT上en
ブブブブブブ
ブブブブブブ安IU2通信MュWブCOMコ 信
ブブブブブブOnブErrorブResumeブNext
ブブブブブブブブIUCommヤF下leGetブstrF下leNameモブstrF下lePat上 ブブブブブブブブブブブ
ブブブブブブ安=============================================================
ブブブブブブ安■ コ 得
ブブブブブブlRetブ=ブIUCommヤCl下entProperty止"ErrorCode"正
ブブブブブブ安=============================================================
ブブブブブブ
ブブブブブブIfブlRetブ=ブ0ブT上en
ブブブブブブブブMs三ーoxブ" 信 "
ブブブブブブElse
ブブブブブブブブMs三ーoxブ" コ "ブ守ブlRet ブブブブブブEndブIf
ブブブブElse
ブブブブブブIfブvbYesブ=ブMs三ーox止" "ブ守ブvbcrlブ守ブ"削除 "モブvbYesNo正ブT上en ブブブブブブブブ
ブブブブブブブブ安保 先 削除
ブブブブブブブブK下llブstrFullPat上 ブブブブブブブブブブ
ブブブブブブブブ安IU2通信MュWブCOMコ 信
ブブブブブブブブOnブErrorブResumeブNext
ブブブブブブブブブブIUCommヤF下leGetブstrF下leNameモブstrF下lePat上 ブブブブブブブブブブブブブ
ブブブブブブブブ安=============================================================
ブブブブブブブブ安■ コ 得
ブブブブブブブブlRetブ=ブIUCommヤCl下entProperty止"ErrorCode"正
ブブブブブブブブ安=============================================================
・ャル9 IU2 設計事例集 ブブブブブブブIfブlRetブ=ブ0ブT上en
ブブブブブブブブブブMs三ーoxブ" 信 "
ブブブブブブブブElse
ブブブブブブブブブブMs三ーoxブ" コ "ブ守ブlRet ブブブブブブブブEndブIf
ブブブブブブEndブIf ブブブブEndブIf ブブEndブIf ブブ EndブSub
〇送信 ン
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム
安安処理 称ブブ:ブ指定 送信
安安処理概要ブブ:ブIU2へ指定 送信
安安引数ブブブブブブ:ブ 安安戻 値ブブブブ:ブ
安安ムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムムム
ブPr下vateブSubブF下le_Put_Cl下ck止正
ブブD下mブstrF下leNameブ・sブStr下n三 ブブD下mブstrF下lePat上ブ・sブStr下n三 ブブD下mブstrFullPat上ブ・sブStr下n三 ブブD下mブstrNameブ・sブStr下n三 ブブD下mブlRetブ・sブLon三 ブブブ
ブブ安=============================================================
ブブ安●処理概要
ブブ安ブブIU2 指定 得
ブブ安=============================================================
ブブ
ブブ安■通信 通信
ブブ安通信
ブブSetDefaultPropaty ブブ
安各種
ブブstrF下lePat上ブ=ブRan三e止"H10"正ヤValue ブブstrF下leNameブ=ブRan三e止"H11"正ヤValue
ブブstrNameブ=ブ・ppl下cat下onヤSubst下tute止strF下lePat上モブ":\"モブ":\\"正 ブブstrFullPat上ブ=ブstrNameブメブ"\"ブメブstrF下leName