cobol
INSPECTステートメント
サーチ…
備考
INSPECT
ステートメントは、COBOLのスキャンおよび置換動詞です。
tallying-phrase
がどこにあるか:
replacing-phrase
は次のとおりです。
missing image
before-after-phrase
は次のとおりです。
INSPECT日付行の再フォーマット
GCobol identification division.
program-id. inspecting.
data division.
working-storage section.
01 ORIGINAL pic XXXX/XX/XXBXX/XX/XXXXXXX/XX.
01 DATEREC pic XXXX/XX/XXBXX/XX/XXXXXXX/XX.
procedure division.
move function when-compiled to DATEREC ORIGINAL
INSPECT DATEREC REPLACING ALL "/" BY ":" AFTER INITIAL SPACE
display "Formatted function WHEN-COMPILED " ORIGINAL
display " after INSPECT REPLACING " DATEREC
goback.
end program inspecting.
与える:
Formatted function WHEN-COMPILED 2010/03/25 23/05/0900-04/00
after INSPECT REPLACING 2010/03/25 23:05:0900-04:00
Modified text is an extract of the original Stack Overflow Documentation
ライセンスを受けた CC BY-SA 3.0
所属していない Stack Overflow