_IORC_の書式化されたエラーメッセージを返します。
カテゴリ: | SASファイルI/O |
libname bank 'SAS-library'; data bank.master(index=(AccountNum)); infile 'external-file-1'; format balance dollar8.; input @ 1 AccountNum $ 1–3 @ 5 balance 5–9; run; data bank.trans(index=(AccountNum)); infile 'external-file-2'; format deposit dollar8.; input @ 1 AccountNum $ 1–3 @ 5 deposit 5–9; run; data bank.master; set bank.trans; modify bank.master key=AccountNum; if (_IORC_ EQ %sysrc(_SOK)) then do; balance=balance+deposit; replace; end; else if (_IORC_= %sysrc(_DSENOM)) then do; balance=deposit; output; _error_=0; end; else do; errmsg=IORCMSG(); put 'Unknown error condition:' errmsg; end; run;