希望将这本习字簿的开头字母从“O-”替换为“IT-”。有谁知道如何做到这一点。
FD INPUT-TRANSACTION-FILE
RECORDING MODE IS F.
01 ITRANS-RECORD.
05 O-ACCOUNT-ID PIC X(6).
05 O-FIRST-NAME PIC X(15).
05 O-SURNAME PIC X(20).
05 O-SALARY PIC 9(6)V99.
05 O-TEMP REDEFINES O-SALARY PIC X(7).
Run Code Online (Sandbox Code Playgroud)
当我在程序中调用抄写本时,我想将“O”替换为“IT”。我相信你可以使用 REPLACING 但我似乎无法让它工作
这取决于所使用的编译器(您没有指定),但是“在 COBOL 中”您有一个LEADING用于该子句的短语REPLACING:
COPY FDITF REPLACING LEADING ==O-== BY ==IT-==.
Run Code Online (Sandbox Code Playgroud)