ページの先頭行へ戻る
NetCOBOL for .NET V8.0 メッセージ集
FUJITSU Software

2.2.160 JMN1267I-S

ALTERNATE RECORD KEYの個数は,125個以下でなければなりません.

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.     C1267.
      000003 ENVIRONMENT     DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT IDX-F ASSIGN TO IDXFILE
      000007       ORGANIZATION IS INDEXED
      000008       RECORD KEY IS MAINKEY
      000009       ALTERNATE RECORD KEY IS KEY1
      000010       ALTERNATE RECORD KEY IS KEY2
      000011       ALTERNATE RECORD KEY IS KEY3
      000012       ALTERNATE RECORD KEY IS KEY4
      000013       ALTERNATE RECORD KEY IS KEY5
      000014       ALTERNATE RECORD KEY IS KEY6
      000015       ALTERNATE RECORD KEY IS KEY7
      000016       ALTERNATE RECORD KEY IS KEY8
      000017       ALTERNATE RECORD KEY IS KEY9
      000018       ALTERNATE RECORD KEY IS KEY0
      000019       ALTERNATE RECORD KEY IS KEY11
      000020       ALTERNATE RECORD KEY IS KEY12
      000021       ALTERNATE RECORD KEY IS KEY13
      000022       ALTERNATE RECORD KEY IS KEY14
      000023       ALTERNATE RECORD KEY IS KEY15
      000024       ALTERNATE RECORD KEY IS KEY16
      000025       ALTERNATE RECORD KEY IS KEY17
      000026       ALTERNATE RECORD KEY IS KEY18
      000027       ALTERNATE RECORD KEY IS KEY19
      000028       ALTERNATE RECORD KEY IS KEY10
      000029       ALTERNATE RECORD KEY IS KEY21
      000030       ALTERNATE RECORD KEY IS KEY22
      000031       ALTERNATE RECORD KEY IS KEY23
      000032       ALTERNATE RECORD KEY IS KEY24
      000033       ALTERNATE RECORD KEY IS KEY25
      000034       ALTERNATE RECORD KEY IS KEY26
      000035       ALTERNATE RECORD KEY IS KEY27
      000036       ALTERNATE RECORD KEY IS KEY28
      000037       ALTERNATE RECORD KEY IS KEY29
      000038       ALTERNATE RECORD KEY IS KEY20
      000039       ALTERNATE RECORD KEY IS KEY31
      000040       ALTERNATE RECORD KEY IS KEY32
      000041       ALTERNATE RECORD KEY IS KEY33
      000042       ALTERNATE RECORD KEY IS KEY34
      000043       ALTERNATE RECORD KEY IS KEY35
      000044       ALTERNATE RECORD KEY IS KEY36
      000045       ALTERNATE RECORD KEY IS KEY37
      000046       ALTERNATE RECORD KEY IS KEY38
      000047       ALTERNATE RECORD KEY IS KEY39
      000048       ALTERNATE RECORD KEY IS KEY30
      000049       ALTERNATE RECORD KEY IS KEY41
      000050       ALTERNATE RECORD KEY IS KEY42
      000051       ALTERNATE RECORD KEY IS KEY43
      000052       ALTERNATE RECORD KEY IS KEY44
      000053       ALTERNATE RECORD KEY IS KEY45
      000054       ALTERNATE RECORD KEY IS KEY46
      000055       ALTERNATE RECORD KEY IS KEY47
      000056       ALTERNATE RECORD KEY IS KEY48
      000057       ALTERNATE RECORD KEY IS KEY49
      000058       ALTERNATE RECORD KEY IS KEY40
      000059       ALTERNATE RECORD KEY IS KEY51
      000060       ALTERNATE RECORD KEY IS KEY52
      000061       ALTERNATE RECORD KEY IS KEY53
      000062       ALTERNATE RECORD KEY IS KEY54
      000063       ALTERNATE RECORD KEY IS KEY55
      000064       ALTERNATE RECORD KEY IS KEY56
      000065       ALTERNATE RECORD KEY IS KEY57
      000066       ALTERNATE RECORD KEY IS KEY58
      000067       ALTERNATE RECORD KEY IS KEY59
      000068       ALTERNATE RECORD KEY IS KEY50
      000069       ALTERNATE RECORD KEY IS KEY61
      000070       ALTERNATE RECORD KEY IS KEY62
      000071       ALTERNATE RECORD KEY IS KEY63
      000072       ALTERNATE RECORD KEY IS KEY64
      000073       ALTERNATE RECORD KEY IS KEY65
      000074       ALTERNATE RECORD KEY IS KEY66
      000075       ALTERNATE RECORD KEY IS KEY67
      000076       ALTERNATE RECORD KEY IS KEY68
      000077       ALTERNATE RECORD KEY IS KEY69
      000078       ALTERNATE RECORD KEY IS KEY60
      000079       ALTERNATE RECORD KEY IS KEY71
      000080       ALTERNATE RECORD KEY IS KEY72
      000081       ALTERNATE RECORD KEY IS KEY73
      000082       ALTERNATE RECORD KEY IS KEY74
      000083       ALTERNATE RECORD KEY IS KEY75
      000084       ALTERNATE RECORD KEY IS KEY76
      000085       ALTERNATE RECORD KEY IS KEY77
      000086       ALTERNATE RECORD KEY IS KEY78
      000087       ALTERNATE RECORD KEY IS KEY79
      000088       ALTERNATE RECORD KEY IS KEY70
      000089       ALTERNATE RECORD KEY IS KEY81
      000090       ALTERNATE RECORD KEY IS KEY82
      000091       ALTERNATE RECORD KEY IS KEY83
      000092       ALTERNATE RECORD KEY IS KEY84
      000093       ALTERNATE RECORD KEY IS KEY85
      000094       ALTERNATE RECORD KEY IS KEY86
      000095       ALTERNATE RECORD KEY IS KEY87
      000096       ALTERNATE RECORD KEY IS KEY88
      000097       ALTERNATE RECORD KEY IS KEY89
      000098       ALTERNATE RECORD KEY IS KEY80
      000099       ALTERNATE RECORD KEY IS KEY91
      000100       ALTERNATE RECORD KEY IS KEY92
      000101       ALTERNATE RECORD KEY IS KEY93
      000102       ALTERNATE RECORD KEY IS KEY94
      000103       ALTERNATE RECORD KEY IS KEY95
      000104       ALTERNATE RECORD KEY IS KEY96
      000105       ALTERNATE RECORD KEY IS KEY97
      000106       ALTERNATE RECORD KEY IS KEY98
      000107       ALTERNATE RECORD KEY IS KEY99
      000108       ALTERNATE RECORD KEY IS KEY90
      000109       ALTERNATE RECORD KEY IS KEY01
      000110       ALTERNATE RECORD KEY IS KEY02
      000111       ALTERNATE RECORD KEY IS KEY03
      000112       ALTERNATE RECORD KEY IS KEY04
      000113       ALTERNATE RECORD KEY IS KEY05
      000114       ALTERNATE RECORD KEY IS KEY06
      000115       ALTERNATE RECORD KEY IS KEY07
      000116       ALTERNATE RECORD KEY IS KEY08
      000117       ALTERNATE RECORD KEY IS KEY09
      000118       ALTERNATE RECORD KEY IS KEY00
      000119       ALTERNATE RECORD KEY IS KEYA1
      000120       ALTERNATE RECORD KEY IS KEYA2
      000121       ALTERNATE RECORD KEY IS KEYA3
      000122       ALTERNATE RECORD KEY IS KEYA4
      000123       ALTERNATE RECORD KEY IS KEYA5
      000124       ALTERNATE RECORD KEY IS KEYA6
      000125       ALTERNATE RECORD KEY IS KEYA7
      000126       ALTERNATE RECORD KEY IS KEYA8
      000127       ALTERNATE RECORD KEY IS KEYA9
      000128       ALTERNATE RECORD KEY IS KEYA0
      000129       ALTERNATE RECORD KEY IS KEYB1
      000130       ALTERNATE RECORD KEY IS KEYB2
      000131       ALTERNATE RECORD KEY IS KEYB3
      000132       ALTERNATE RECORD KEY IS KEYB4
      000133       ALTERNATE RECORD KEY IS KEYB5
      000134       ALTERNATE RECORD KEY IS KEYB6.
      000135 DATA            DIVISION.
      000136 FILE            SECTION.
      000137 FD  IDX-F.
      000138 01  IDX-R  PIC X(130).
      000139 01  MAINKEY PIC X.
      000140 01  KEY1  PIC X.
      000141 01  KEY2  PIC X.
      000142 01  KEY3  PIC X.
      000143 01  KEY4  PIC X.
      000144 01  KEY5  PIC X.
      000145 01  KEY6  PIC X.
      000146 01  KEY7  PIC X.
      000147 01  KEY8  PIC X.
      000148 01  KEY9  PIC X.
      000149 01  KEY0  PIC X.
      000150 01  KEY11 PIC X.
      000151 01  KEY12 PIC X.
      000152 01  KEY13 PIC X.
      000153 01  KEY14 PIC X.
      000154 01  KEY15 PIC X.
      000155 01  KEY16 PIC X.
      000156 01  KEY17 PIC X.
      000157 01  KEY18 PIC X.
      000158 01  KEY19 PIC X.
      000159 01  KEY10 PIC X.
      000160 01  KEY21 PIC X.
      000161 01  KEY22 PIC X.
      000162 01  KEY23 PIC X.
      000163 01  KEY24 PIC X.
      000164 01  KEY25 PIC X.
      000165 01  KEY26 PIC X.
      000166 01  KEY27 PIC X.
      000167 01  KEY28 PIC X.
      000168 01  KEY29 PIC X.
      000169 01  KEY20 PIC X.
      000170 01  KEY31 PIC X.
      000171 01  KEY32 PIC X.
      000172 01  KEY33 PIC X.
      000173 01  KEY34 PIC X.
      000174 01  KEY35 PIC X.
      000175 01  KEY36 PIC X.
      000176 01  KEY37 PIC X.
      000177 01  KEY38 PIC X.
      000178 01  KEY39 PIC X.
      000179 01  KEY30 PIC X.
      000180 01  KEY41 PIC X.
      000181 01  KEY42 PIC X.
      000182 01  KEY43 PIC X.
      000183 01  KEY44 PIC X.
      000184 01  KEY45 PIC X.
      000185 01  KEY46 PIC X.
      000186 01  KEY47 PIC X.
      000187 01  KEY48 PIC X.
      000188 01  KEY49 PIC X.
      000189 01  KEY40 PIC X.
      000190 01  KEY51 PIC X.
      000191 01  KEY52 PIC X.
      000192 01  KEY53 PIC X.
      000193 01  KEY54 PIC X.
      000194 01  KEY55 PIC X.
      000195 01  KEY56 PIC X.
      000196 01  KEY57 PIC X.
      000197 01  KEY58 PIC X.
      000198 01  KEY59 PIC X.
      000199 01  KEY50 PIC X.
      000200 01  KEY61 PIC X.
      000201 01  KEY62 PIC X.
      000202 01  KEY63 PIC X.
      000203 01  KEY64 PIC X.
      000204 01  KEY65 PIC X.
      000205 01  KEY66 PIC X.
      000206 01  KEY67 PIC X.
      000207 01  KEY68 PIC X.
      000208 01  KEY69 PIC X.
      000209 01  KEY60 PIC X.
      000210 01  KEY71 PIC X.
      000211 01  KEY72 PIC X.
      000212 01  KEY73 PIC X.
      000213 01  KEY74 PIC X.
      000214 01  KEY75 PIC X.
      000215 01  KEY76 PIC X.
      000216 01  KEY77 PIC X.
      000217 01  KEY78 PIC X.
      000218 01  KEY79 PIC X.
      000219 01  KEY70 PIC X.
      000220 01  KEY81 PIC X.
      000221 01  KEY82 PIC X.
      000222 01  KEY83 PIC X.
      000223 01  KEY84 PIC X.
      000224 01  KEY85 PIC X.
      000225 01  KEY86 PIC X.
      000226 01  KEY87 PIC X.
      000227 01  KEY88 PIC X.
      000228 01  KEY89 PIC X.
      000229 01  KEY80 PIC X.
      000230 01  KEY91 PIC X.
      000231 01  KEY92 PIC X.
      000232 01  KEY93 PIC X.
      000233 01  KEY94 PIC X.
      000234 01  KEY95 PIC X.
      000235 01  KEY96 PIC X.
      000236 01  KEY97 PIC X.
      000237 01  KEY98 PIC X.
      000238 01  KEY99 PIC X.
      000239 01  KEY90 PIC X.
      000240 01  KEY01 PIC X.
      000241 01  KEY02 PIC X.
      000242 01  KEY03 PIC X.
      000243 01  KEY04 PIC X.
      000244 01  KEY05 PIC X.
      000245 01  KEY06 PIC X.
      000246 01  KEY07 PIC X.
      000247 01  KEY08 PIC X.
      000248 01  KEY09 PIC X.
      000249 01  KEY00 PIC X.
      000250 01  KEYA1 PIC X.
      000251 01  KEYA2 PIC X.
      000252 01  KEYA3 PIC X.
      000253 01  KEYA4 PIC X.
      000254 01  KEYA5 PIC X.
      000255 01  KEYA6 PIC X.
      000256 01  KEYA7 PIC X.
      000257 01  KEYA8 PIC X.
      000258 01  KEYA9 PIC X.
      000259 01  KEYA0 PIC X.
      000260 01  KEYB1 PIC X.
      000261 01  KEYB2 PIC X.
      000262 01  KEYB3 PIC X.
      000263 01  KEYB4 PIC X.
      000264 01  KEYB5 PIC X.
      000265 01  KEYB6 PIC X.
      000266 01  KEYB7 PIC X.
      000267 01  KEYB8 PIC X.
      000268 01  KEYB9 PIC X.
      000269 01  KEYB0 PIC X.
      000270 END PROGRAM C1267.
    

C1267.cob (134) : JMN1267I-S ALTERNATE RECORD KEYの個数は,125個以下でなければなりません.