ASCIIデータチェック
s2_AsciiDataで指定したエリアに格納されているASCIIコードを、n_ConversionMethodで指定した変換方法およびs1_Controlで指定した4文字の制御文字により、正常に変換できるかをチェックします。
入力
制御文字
H: 16進ASCIIデータへ変換
- 逆方向
32: 32ビット(2ワード)の変換
アスキーデータを格納するエリアの先頭
変換方法を格納している16ビットエリア
出力
バイナリデータを格納しているエリアの先頭
結果が正しい場合、システム変数sys_bIsEqualがONになります。
結果が正しくない場合、システム変数sys_bIsEqualがOFFになります。
s1_ControlおよびF251_ATOBの詳細については、F251_ATOB ASCII ->バイナリ変換を参照してください。
s1_Controlで指定した制御文字列に異常がある場合
s1_Controlで指定した変換フォーマットが10進数のときに、変換方向を順方向 (+) とした場合
s1_Controlで指定した変換フォーマットが16進数のときに、n_ConversionMethodで指定したアスキーコード格納エリアの大きさが規定値を超える場合 (16ビットの場合の規定値: 4、32ビットの場合の規定値: 8)
n_ConversionMethodで指定した変換データ数が0の場合
変換結果がn_ConversionMethodで指定したアスキーコード格納エリアの大きさを超える場合
変換結果がエリアを超える場合
s1_Controlで指定した制御文字列に異常がある場合
s1_Controlで指定した変換フォーマットが10進数のときに、変換方向を順方向 (+) とした場合
s1_Controlで指定した変換フォーマットが16進数のときに、n_ConversionMethodで指定したアスキーコード格納エリアの大きさが規定値を超える場合 (16ビットの場合の規定値: 4、32ビットの場合の規定値: 8)
n_ConversionMethodで指定した変換データ数が0の場合
変換結果がn_ConversionMethodで指定したアスキーコード格納エリアの大きさを超える場合
変換結果がエリアを超える場合
POUヘッダには、このプログラムで使用するすべての入力変数と出力変数を宣言します。 POUヘッダは全プログラム言語で使用できます。
VAR
bExecute: BOOL:=FALSE;
sString1: STRING[10]:='1234567890';
(*Important: Initialize the string with the desired current length*)
bAsciiDataAreCorrect: BOOL:=FALSE;
END_VAR
bExecuteがON (TRUE)のとき、s2_AsciiDataで指定したデータが、制御文字D-16および変換方法16#214により変換可能かどうかチェックします。
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 9 ;
NETWORK_BODY
B(B_VARIN,,'D-16',21,5,23,7,);
B(B_VARIN,,16#214,21,7,23,9,);
B(B_F,F252_ACHK!,Instance,23,3,35,9,,?DEN?Ds1_Control?Ds2_AsciiData?Dn_ConversionMethod?AENO);
B(B_CONTACT,,sys_bIsEQ,36,4,38,6,);
B(B_F,Adr_Of_VarOffs_I!,Instance,10,5,19,9,,?D@'Var'?DOffs?CAdr);
B(B_VARIN,,2,8,7,10,9,);
B(B_VARIN,,sString1,8,6,10,8,);
B(B_COIL,,bAsciiDataAreCorrect,43,4,45,6,S);
B(B_COMMENT,,Result ø^bAsciiDataAreCorrect: TRUE,35,6,48,8,);
B(B_CONTACT,,bExecute,3,4,5,6,R);
B(B_COMMENT,,When bExcecute ist set to TRUE~ the instruction checks whether the data connectd atø^s2_AsciiData can be converted when the control string is 'D-16' and the conversion method 16#214.,2,1,40,3,);
L(19,7,23,7);
L(35,5,36,5);
L(38,5,43,5);
L(1,0,1,9);
L(1,5,3,5);
L(5,5,23,5);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF DF(bExecute) then
F252_ACHK(s1_Control := 'D-16', s2_AsciiData := Adr_Of_VarOffs(Var := sString1, Offs := 2), n_ConversionMethod := 16#214);
IF (sys_bIsEQ) then
bAsciiDataAreCorrect := TRUE;
end_if;
END_IF;