LX100 Programdump for Stack 0495 (Mix number 838/880) BOSR=002C2DF7 Saturday, November 02, 2002 07:48:43 Name: (PAUL)OBJECT/UNITE/AS4027/COBOL74/SAMPLE ON OPS. MCP 48.189.8298: *SYSTEM/481/020204/DELTA/MCP. (MCP/AS) Intrinsics: *SYSTEM/INTRINSICS ON DISK. (Not loaded) System serial: #9583 Hostname: MCP0. Group ID: DEFAULTNAME. Cause of dump: Fault termination @ 013:0031:2 (653050), 01A:000B:1. Task history word at entry to program dump: 0 000000 040404 Programdump options: Arrays 0747 = LOSR (Absolute memory address = 002C353E) 008A (02,0008) 1 049500 81000B SIRW: Offset=008C (0081+000B) in this stack 0089 (02,0007) 7 E00600 30029C PCW: ASD=0014E7, LL=3, Segment @ 1195:0030:0, Normal state 0088 (02,0006) C 900000 0019E9 Desc: Present-copy, ASD=00CF4C, Length=90 (Mom @ [4080,443] via offset 000B in the MCP) 0087 (02,0005) 0 000000 000001 Op: Dec: 1 0086 (02,0004) 0 000000 000000 0085 (02,0003) 0 000000 000001 Op: Dec: 1 0084 (02,0002) 0 000000 000000 0083 7 E05B57 10029C RCW: ASD=0014E7, LL=1, Control state [MCP segment @ 1195:02DA:5 (17713840)] Segment Descriptor: C E80000 00029C Code: 3 000000 085196 3 AA9581 43E7AD 3 9A1E01 A1A2DA >3 DF600E B0AB95< 3 8143E2 A5B281 0082 -----D[2]=>3 049500 710000 *ENVW: D[1] @ 0071 in this stack 0081 1 049500 70000A *HISW: Previous HISW @ 0070, Sign 0080 (01,000F) 7 E01440 20029C PCW: ASD=0014E7, LL=2, Segment @ 1195:00A2:0, Normal state 007F (01,000E) 7 E00CCA 20029C PCW: ASD=0014E7, LL=2, Segment @ 1195:0066:2, Control state 007E (01,000D) 1 049500 160000 SIRW: Offset=0016 (0016+0000) in this stack 007D (01,000C) C B00000 000092 Desc: Present-copy, ASD=000495, Length=1864 (Points @ offset 0000 in this stack) 007C (01,000B) C F00000 0018DE Desc: Present-copy, ASD=00C6F7, Length=139 (Mom @ [49] via offset 00E9 in stack 01A0 [*SYSTEM/CANDE]) 007B (01,000A) 0 000000 000080 Op: Dec: 128 007A (01,0009) 0 000000 000000 0079 (01,0008) 0 000000 000748 Op: Dec: 1864 0078 (01,0007) 0 000000 000923 Op: Dec: 2339 0077 (01,0006) 0 000000 000000 0076 (01,0005) 0 000000 000001 Op: Dec: 1 0075 (01,0004) 0 000000 000000 0074 (01,0003) 0 FFFFFF FFFFFF Op: Dec: -7.006492321611341-46 0073 (01,0002) 0 000000 000176 Op: Dec: 374 0072 7 8035B7 10024D RCW: ASD=00126C, LL=1, Control state [MCP segment @ 101A:01AD:5 (11064000)] Segment Descriptor: C 880000 00024D Code: 3 8CB020 02B213 3 8C9091 879C2C 3 012002 9C1708 >3 ABDF43 B5ABA3< 3 B0B0B2 0695B4 0071 -----D[1]=>3 001200 090000 *ENVW: D[0] @ 0009 in the MCP 0070 1 049500 67000A *HISW: Previous HISW @ 0067, Sign 006F (01,0007) 0 000000 000001 Op: Dec: 1 006E (01,0006) 1 049500 520000 SIRW: Offset=0052 (0052+0000) in this stack 006D (01,0005) 1 049500 5E0001 SIRW: Offset=005F (005E+0001) in this stack 006C (01,0004) 0 000000 00005D Op: Dec: 93 EBCDIC: ?????) 006B (01,0003) 1 049500 5E0001 SIRW: Offset=005F (005E+0001) in this stack 006A (01,0002) 0 000000 000004 Op: Dec: 4 0069 7 80718B 10024D RCW: ASD=00126C, LL=1, Control state [MCP segment @ 101A:038C:2 (11128764)] Segment Descriptor: C 880000 00024D Code: 3 B3CFB8 B2A99C 3 1708AB 9540DF 3 4FACB2 046002 >3 BDABA3 FFFFFF< 3 6002BC A2049D 0068 -----D[1]=>3 001200 090000 *ENVW: D[0] @ 0009 in the MCP 0067 1 049500 63000A *HISW: Previous HISW @ 0063, Sign 0066 (01,0002) 1 049500 5E0001 SIRW: Offset=005F (005E+0001) in this stack 0065 7 A0D027 10024D RCW: ASD=00126D, LL=1, Control state [MCP segment @ 1018:0681:1 (01064800/11129850)] Segment Descriptor: C A80000 00024D Code: 3 409BAB DF442B 3 B1ABA3 B5B5B5 3 DF4FD1 6001AF >3 ABA3FF FFFFFF< 3 DF4FD3 6001AF 0064 -----D[1]=>3 001200 090000 *ENVW: D[0] @ 0009 in the MCP 0063 1 049500 5D000A *HISW: Previous HISW @ 005D, Sign 0062 (01,0004) 7 A0AEA2 20024D PCW: ASD=00126D, LL=2, Segment @ 1018:0575:0, Control state 0061 (01,0003) D 120001 101A24 Desc: Present-copy, ASD=00D120, Hex, Index=17+0, Reindexable (Mom @ 0039 in this stack) 0060 (01,0002) 0 000000 000000 ***************BOUNDS ERROR ************************************************** 005F 7 E00628 3019A8 RCW: ASD=00CD47, LL=3, Normal state [User segment @ 0013:0031:2 (653050)] Segment Descriptor: C E80000 0019A8 Code: 3 83CDB8 B206C6 3 0024A6 C20026 3 B780C6 0025A6 >3 B20B95 75B207< 3 C60024 AD8FB2 005E -----D[1]=>3 001200 090000 *ENVW: D[0] @ 0009 in the MCP 005D 1 049500 51000A *HISW: Previous HISW @ 0051, Sign 005C (03,000A) 0 000000 00000B Op: Dec: 11 005B (03,0009) D 126001 001A24 Desc: Present-copy, ASD=00D120, Hex, Index=16+6, Reindexable (Mom @ 0039 in this stack) 005A (03,0008) D 100000 601A24 Desc: Present-copy, ASD=00D120, Index=6, Reindexable (Mom @ 0039 in this stack) 0059 (03,0007) 0 000000 000013 Op: Dec: 19 0058 (03,0006) 7 A00734 301A73 PCW: ASD=00D39D, LL=3, Segment @ 000F:0039:5, Normal state 0057 (03,0005) 0 000000 000009 Op: Dec: 9 0056 (03,0004) 7 601A54 301A71 PCW: ASD=00D38B, LL=3, Segment @ 0005:00D2:5, Normal state 0055 (03,0003) 0 000000 000000 0054 (03,0002) 4 8C4000 000000 SCW: COBOL perform environment marker 0053 7 600165 2019AB RCW: ASD=00CD5B, LL=2, Normal state [User segment @ 001A:000B:1] Segment Descriptor: C 680000 0019AB ------ SAMPLE Code: 3 A2200B AEC600 3 2BB38C 409A0F 3 30B204 95B4B0 >3 ABAEC5 0017AB< 3 A3AEC5 001DAB 0052 -----D[3]=>3 049500 160000 *ENVW: D[2] @ 0016 in this stack 0051 1 049500 150008 *HISW: Previous HISW @ 0015, Sign 0050 (02,003A) 6 800000 00A800 SCW: Blockexit marker: Events/Interlocks, Files, Single-dim Arrays 004F (02,0039) 0 000000 000000 004E (02,0038) 2 000000 000000 Double: 2nd word:0 004D (02,0037) 2 000000 000000 Double: 1st word:0 , Double:0.0 004C (02,0036) 0 000000 000000 004B (02,0035) 0 000000 000000 004A (02,0034) 7 E00004 3019A8 PCW: ASD=00CD47, LL=3, Segment @ 0013:0000:1, Normal state 0049 (02,0033) 7 A00004 301A58 PCW: ASD=00D2C5, LL=3, Segment @ 0010:0000:1, Normal state 0048 (02,0032) 7 200004 301A5E PCW: ASD=00D2F1, LL=3, Segment @ 0012:0000:1, Normal state 0047 (02,0031) C F00000 E019E2 Desc: Present-copy, ASD=00CF17, Length=14 (Mom @ 001F in this stack) 0046 (02,0030) 7 E00004 3019F6 PCW: ASD=00CFB7, LL=3, Segment @ 000E:0000:1, Normal state 0045 (02,002F) 7 A00004 301A73 PCW: ASD=00D39D, LL=3, Segment @ 000F:0000:1, Normal state 0044 (02,002E) C 700000 E01A60 Desc: Present-copy, ASD=00D303, Length=14 (Mom @ 001C in this stack) 0043 (02,002D) C 040000 0019D0 Desc: Present-mom, ASD=00CE80, EBCDIC, Length=18 0(0000) 0 F7F5F0 F3F0F0 0 000000 000000 0 000000 000000 /750300 / 0042 (02,002C) 7 600004 301A71 PCW: ASD=00D38B, LL=3, Segment @ 0005:0000:1, Normal state 0041 (02,002B) 7 600004 301A71 PCW: ASD=00D38B, LL=3, Segment @ 0005:0000:1, Normal state 0040 (02,002A) 7 A000A0 301A61 PCW: ASD=00D30D, LL=3, Segment @ 0015:0005:0, Normal state 003F (02,0029) 7 A00000 301A61 PCW: ASD=00D30D, LL=3, Segment @ 0015:0000:0, Normal state 003E (02,0028) 0 000000 000000 003D (02,0027) 5 000002 B40007 Desc: ASD deallocated 003C (02,0026) 0 000000 000063 WLN-FX (Real) Dec: 99 003B (02,0025) C 12000C C01A24 Desc: Present-copy, ASD=00D120, Hex, Length=204 (Mom @ 0039 in this stack) 003A (02,0024) C 100001 101A24 Desc: Present-copy, ASD=00D120, Length=17 (Mom @ 0039 in this stack) 0039 (02,0023) C 040000 001A24 WLN-LOG-AREA (EBCDIC array) Present-mom, ASD=00D120, EBCDIC, Length=102 0(0000) 2 211DCD 650000 2 000000 000000 0 000000 000000 0 00019D 25DDBE 2 068000 000FAE / / 5(0005) 2 004881 AA1880 0 269986 D2DEE2 0 29A9B0 8039FC 0 C00014 C09999 0 964239 D04998 / a rfK S z { {rro } q/ 10(000A) 0 741238 C03317 0 990258 D02407 0 338084 C01676 0 540711 D00953 0 293897 C00360 / { r } d{ } p{ -/ 15(000F) 0 884937 D00064 0 535442 000000 /h } / 0038 (02,0022) C A40000 001A60 WUM-UTILITY-MESSAGES (EBCDIC array) Present-mom, ASD=00D305, EBCDIC, Length=30 0(0000) 0 D7D7D7 D7D7D7 0 D2D2C6 C64040 0 E3C9E3 D3C540 0 404040 404040 0 404040 404040 /PPPPPPKKFF TITLE / 0037 (02,0021) C 040000 0019E6 WPL-HEADER-4 (EBCDIC array) Present-mom, ASD=00CF30, EBCDIC, Length=72 0(0000) 0 E2C5C7 E24040 0 C2D3D6 C3D2E2 0 C9E9C5 4040E6 0 C1E2E3 C54040 0 C5D5E3 D9C9C5 /SEGS BLOCKSIZE WASTE ENTRIE/ 5(0005) 0 E24040 C1E5C7 0 60C5D5 E3D9C9 0 C5E240 40D4C9 0 D560D3 C5E5C5 0 D3E240 40D4C1 /S AVG-ENTRIES MIN-LEVELS MA/ 10(000A) 0 E760D3 C5E5C5 0 D3E240 400000 /X-LEVELS / 0036 (02,0020) C 240000 001A58 WPL-HEADER-3 (EBCDIC array) Present-mom, ASD=00D2C1, EBCDIC, Length=24 0(0000) 0 D3D6C1 C460C6 0 C1C3E3 D6D97A 0 404040 40F7F5 0 406C00 000000 /LOAD-FACTOR: 75 % / 0035 (02,001F) C 440000 001A3F WPL-HEADER-2 (EBCDIC array) Present-mom, ASD=00D1FA, EBCDIC, Length=24 0(0000) 0 D2C5E8 40E2C9 0 E9C57A 404040 0 404040 4040F3 0 40E6D6 D9C4E2 /KEY SIZE: 3 WORDS / 0034 (02,001E) C 040000 0019F4 WPL-HEADER-1 (EBCDIC array) Present-mom, ASD=00CFA0, EBCDIC, Length=18 0(0000) 0 D9C5C3 D6D9C4 0 E27A40 404040 0 F2F06B F0F0F0 /RECORDS: 20,000 / 0033 (02,001D) C C40000 0019E2 WPL-PRINT-LINES (EBCDIC array) Present-mom, ASD=00CF16, EBCDIC, Length=144 0(0000) 0 4040E2 C1D4D7 0 D3C540 D9E4D5 0 40E3D6 40C7C5 0 D5C5D9 C1E3C5 0 40C140 C3D6C2 / SAMPLE RUN TO GENERATE A COB/ 5(0005) 0 D6D360 F7F440 0 D7D9D6 C7D9C1 0 D4C4E4 D4D740 0 404040 404040 0 404040 404040 /OL-74 PROGRAMDUMP / 10(000A) 0 404040 40F1F1 0 61F0F2 61F0F2 0 000000 000000 0 000000 000000 0 000000 000000 / 11/02/02 / 15(000F) 0 000000 000000 Thru 23(0017) / / 0032 (02,001C) C F20005 401A40 Desc: Present-copy, ASD=00D207, Hex, Length=84, In-stack array (Points @ offset 002A in this stack, Mom @ 0028) 0031 (02,001B) 3 000000 000000 In-stack array marker (Array appears below) 0030 (02,001A) 0 000000 000000 W-SLOP (Real) 002F (02,0019) 0 000000 000000 W-MIN-LEVELS (Real) 002E (02,0018) 0 000000 000000 W-MAX-LEVELS (Real) 002D (02,0017) 0 000000 000000 W-BLOCK-ENTRIES (Real) 002C (02,0016) 0 000000 000000 W-BLOCK-SIZE (Real) 002B (02,0015) 0 000000 000000 W-BLOCK-SEGS (Real) 002A (02,0014) 0 000000 000000 0029 (02,0013) C F00000 101A40 Desc: Present-copy, ASD=00D207, Length=7, In-stack array (Points @ offset 002A in this stack, Mom @ 0028) 0028 (02,0012) C E00000 001A40 Desc: Present-mom, ASD=00D207, Length=7, In-stack array (Contents @ offset 002A in this stack) 0027 (02,0011) 0 000000 000000 W-POPULATION-LN (Real) 0026 (02,0010) 0 000000 004E20 W-POPULATION (Real) Dec: 20000 EBCDIC: ????+? 0025 (02,000F) 0 000000 000003 W-KEY-SIZE (Real) Dec: 3 0024 (02,000E) 0 000000 00004B W-LOAD-FACTOR (Real) Dec: 75 EBCDIC: ?????. 0023 (02,000D) 0 000000 000003 W-ENTRY-SIZE (Real) Dec: 3 0022 (02,000C) 0 000000 000032 W-SEGMENT-LIMIT (Real) Dec: 50 0021 (02,000B) 0 000000 00001E W-SEGMENT-SIZE (Real) Dec: 30 0020 (02,000A) 0 000000 000004 W-BLOCK-OVERHEAD (Real) Dec: 4 001F (02,0009) C E40000 0019E2 PR-FILE/PR-REC (EBCDIC array) Present-mom, ASD=00CF17, EBCDIC, Length=84 0(0000) 0 404040 404040 Thru 12(000C) / / 13(000D) 0 404000 000000 / / 001E (02,0008) C E00000 001A64 PR-FILE (File) Present-mom, ASD=00D327, Length=110 (File: Intname=PR-FILE, Title=PR- FILE) 001D (02,0007) 0 000000 000002 Op: Dec: 2 001C (02,0006) C 640000 001A60 DC-FILE/DC-REC (EBCDIC array) Present-mom, ASD=00D303, EBCDIC, Length=84 0(0000) 0 404040 404040 Thru 12(000C) / / 13(000D) 0 404000 000000 / / 001B (02,0005) C E00000 001A48 DC-FILE (File) Present-mom, ASD=00D247, Length=110 (File: Intname=DC-FILE, Title=DC- FILE) 001A (02,0004) 1 049600 072000 SIRW: Offset=2007 (0007+2000) in Segment Dictionary (Stack 0496) 0019 (02,0003) 0 000000 000003 Op: Dec: 3 0018 (02,0002) 0 000000 000000 0017 7 815376 20024C RCW: ASD=001264, LL=2, Control state [MCP segment @ 1166:0A9B:5 (16007760)] Segment Descriptor: C 880000 00024C Code: 3 BD9E16 B8B5FE 3 DF4300 ABDF43 3 B11002 B205AB >3 DF42FF ABA3B2< 3 34B202 95B8B1 0016 -----D[2]=>3 049600 070000 *ENVW: D[1] @ 0007 in Segment Dictionary (Stack 0496) 0015 1 049500 120001 *HISW: Previous HISW @ 0012, Blockexit 0014 7 000000 002000 RCW: Dummy (Run) 0013 -----D[2]=>3 80D267 000000 *ENVW: D[1] @ word 00 of PIB @ ASD 00D267 0000 = BOSR (Absolute memory address = 002C2DF7)