),
or the severity code is omitted, the statement number of the MNOTE
is listed in the diagnostic cross-reference.
Figure 1. Sample error diagnostic
messages Active Usings: None
Loc Object Code Addr1 Addr2 Stmt Source Statement HLASM R6.0 2008/07/11 17.48
1 *********************************************************************** DIA00010
2 * SAMPLE ERROR DIAGNOSTIC MESSAGES * DIA00020
3 * IN SOURCE PROGRAM (OPEN CODE) AND GENERATED BY MACRO CALLS * DIA00030
4 *********************************************************************** DIA00040
000000 00000 0003C 5 A CSECT DIA00050
000000 0000 0000 00000 6 STM 14,U2,12(13( DIA00060
** ASMA044E Undefined symbol - U2
** ASMA029E Incorrect register specification - U2
** ASMA179S Delimiter error, expected right parenthesis - (
** ASMA435I Record 6 in DIAGMSG ASSEMBLE A1 on volume: ADISK
000004 05C0 7 BALR 12,0 DIA00070
R:C 00006 8 USING *,12 DIA00080
000006 0000 0000 00000 9 ST 13,SAVE+4 DIA00090
** ASMA044E Undefined symbol - SAVE
** ASMA435I Record 9 in DIAGMSG ASSEMBLE A1 on volume: ADISK
10 OPEN (CRDIN,(INPUT),CRDOUT,(OUTPUT) DIA00100
** ASMA088E Unbalanced parentheses in macro call operand - OPEN /(CRDIN,(INPUT),CRDOUT,(OUTPUT)
** ASMA435I Record 323 in OSMACRO MACLIB S2(OPEN) on volume: MNT190
00000A 0700 11+ CNOP 0,4 ALIGN LIST TO FULLWORD 01-OPEN
00000C 4110 C00E 00014 12+ LA 1,*+8 LOAD R1 W/LIST ADR @V6PXJRU 01-OPEN
000010 47F0 C00E 00014 13+ B *+4 BRANCH AROUND LIST @V6PXJRU 01-OPEN
** ASMA254I *** MNOTE *** 14+ 12,*** IHB001 DCB OPERAND REQ'D-NOT SPECIFIED 02-IHBER
15 DROP 11 DIA00110
** ASMA045W Register or label not previously used - 11
** ASMA435I Record 11 in DIAGMSG ASSEMBLE A1 on volume: ADISK
16 *********************************************************************** DIA00120
17 * EDITING AND GENERATION ERRORS AND MNOTES FROM A LIBRARY MACRO * DIA00130
18 *********************************************************************** DIA00140
19 LOADR REG1=10,REG2=8,WOOSHA,SUMA DIA00150
000014 58A0 C02E 00034 20+ L 10,WOOSHA 01-LOADR
000018 5880 C032 00038 21+ L 8,SUMA 01-LOADR
22 LOADR REG1=25,REG2=8,WOOSHA,MAINY DIA00160
00001C 0000 0000 00000 23+ L 25,WOOSHA 01-LOADR
** ASMA029E Incorrect register specification - 25
** ASMA435I Record 5 in TEST MACLIB A1(LOADR) on volume: ADISK
000020 0000 0000 00000 24+ L 8,MAINY 01-LOADR
** ASMA044E Undefined symbol - MAINY
** ASMA435I Record 6 in TEST MACLIB A1(LOADR) on volume: ADISK
25 LOADR REG2=10,SUMA,MAINY DIA00170
** ASMA254I *** MNOTE *** 26+ 36,YOU LEFT OUT THE FIRST REGISTER 01-LOADR
27 *********************************************************************** DIA00180
28 * SAMPLE IN-LINE MACRO DEFINITION * DIA00190
29 *********************************************************************** DIA00200
30 MACRO DIA00210
31 &NAME LOADR ®1=,®2=,&OP1,&OP2 DIA00220
32 &R(1) SETA ®1,®2 DIA00230
33 AIF (T'®1 EQ 'O').ERR DIA00240
34 L &R(1),&OP1 DIA00250
35 L &R(2),&OP2 DIA00260
36 MEXIT DIA00270
37 .ERR MNOTE 36,'YOU LEFT OUT THE FIRST REGISTER' DIA00280
38 MEND DIA00290
39 *********************************************************************** DIA00300
40 * SAMPLE MACRO CALLS WITH GENERATION ERRORS AND MNOTES * DIA00310
41 *********************************************************************** DIA00320
Page 4
Active Usings: A+X'6',R12
Loc Object Code Addr1 Addr2 Stmt Source Statement HLASM R6.0 2008/07/11 17.48
42 LOADR REG1=10,REG2=8,WOOSHA,SUMA DIA00330
000024 58A0 C02E 00034 43+ L 10,WOOSHA 01-00034
000028 5880 C032 00038 44+ L 8,SUMA 01-00035
45 LOADR REG1=25,REG2=8,WOOSHA,&MAINY DIA00340
** ASMA003E Undeclared variable symbol; default=0, null, or type=U - OPENC/MAINY
** ASMA435I Record 34 in DIAGMSG ASSEMBLE A1 on volume: ADISK
00002C 0000 0000 00000 46+ L 25,WOOSHA 01-00034
** ASMA029E Incorrect register specification - 25
** ASMA435I Record 25 in DIAGMSG ASSEMBLE A1 on volume: ADISK
000030 0000 0000 00000 47+ L 8, 01-00035
** ASMA074E Illegal syntax in expression -
** ASMA435I Record 26 in DIAGMSG ASSEMBLE A1 on volume: ADISK
48 LOADR REG2=8,SUMA,MAINY DIA00350
** ASMA254I *** MNOTE *** 49+ 36,YOU LEFT OUT THE FIRST REGISTER 01-00037
000034 50 WOOSHA DS F DIA00360
000038 51 SUMA DS F DIA00370
52 END DIA00380