例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2403.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT REPFILE ASSIGN TO SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD REPFILE REPORT REP1.
000010 WORKING-STORAGE SECTION.
000011 REPORT SECTION.
000012 RD REP1 PAGE 46
000013 HEADING 1
000014 FIRST DETAIL 7
000015 LAST DETAIL 44.
000016 01 TYPE PAGE HEADING.
000017 02 LINE 01 COLUMN 35 PIC N(6) SOURCE LABEL1.
000018 PROCEDURE DIVISION.
000019 LABEL1.
000020 END PROGRAM P2403.
P2403.cob (17) : JMN2403I-S SOURCE句の一意名は，データ名，PAGE-COUNTERまたはLINE-COUNTERでなければなりません．
詳細な説明
SOURCE句は，印字項目に転記される値の送出し側データ項目を指定する句です．同句には，データ項目あるいは，ページカウンタ/行カウンタを示す特殊レジスタを指定できます．
報告書作成管理システムが報告集団の印字行を作成するときに，SOURCE句で指定された項目を送出し側とする暗黙のMOVE文を実行します．