制作一個功能塊，可以在DB112的數據塊里找到輸入接口CODE給的一組數。

將搜索到DB112里的內容傳到DB115里：

DB112:

AUF DI 112 打開DB112功能塊

L P#0.0 張載地址指針0.0

T #Code_Pionter

L 10

next: T #Index_C 使用LOOP指令循環10次

L DID [#Code_Pionter] 提取 DB112中的0.0開始對比

L #code 輸入變量的給入參數16#4444

==D 比較數是否相同

S #OK 相同就置位OK提示找到了并跳到END位置

SPB end

L P#18.0 從0.0開始找如果沒有找到，就向下找相隔18.0

L #Code_Pionter

+D

T #Code_Pionter

L #Index_C

LOOP next 循環10次

SPA ext1 循環結束后直接跳出塊

end: L DID [#Code_Pionter] 如果找到了相同的內容傳到DB115

T #Parts_date.code

L P#4.0 -尋找UDT中的sequence

L #Code_Pionter

+D

T #Code_Pionter 再次將 下移的4.0位保存

L DIW [#Code_Pionter]

T #Parts_date.sequence 將DB112的equence存到DB115里

L P#2.0 -尋找UDT中的sta_1_time

L #Code_Pionter

+D

T #Code_Pionter

L DID [#Code_Pionter]

T #Parts_date.sta_1_time 將DB112的sta_1_time存到DB115里

L P#4.0 -尋找UDT中的sta_2_time

L #Code_Pionter

+D

T #Code_Pionter

L DID [#Code_Pionter]

T #Parts_date.sta_2_time 將DB112的sta_2_time存到DB115里

L P#4.0 -尋找UDT中的sta_3_time

L #Code_Pionter

+D

T #Code_Pionter

L DID [#Code_Pionter]

T #Parts_date.sta_3_time 將DB112的sta_3_time存到DB115里

ext1: U #rest

R #OK 復位OK

BE 結束塊

編輯：黃飛