SAMMSG

The SAMMSG routine returns an informational or error message to user storage. This message describes the result of the previously-invoked SAM routine. If the previously- invoked SAM routine had a successful return code, the message returned is blanks.
view
The SAMMSG routine returns an informational or error message to user storage. This message describes the result of the previously-invoked SAM routine. If the previously- invoked SAM routine had a successful return code, the message returned is blanks.
Calling Parameters
  • Address of a message area
  • Address of two-byte (halfword) message area length
Return Codes
Output Return Codes (general register 15):
  • 0
    Successful completion
Calling Example: Assembler
The following is an example using assembler:
. . . DBERR CALL SAMMSG,(MSG,MSGL),VL GET ERROR MESSAGE . . . MSG DC CL100' ' MESSAGE AREA MSGL DC Y(100) MESSAGE LENGTH
Calling Example: COBOL
The following is an example using COBOL:
. . . 77 ERR-MSG PIC X(100) VALUE SPACES. 77 ERR-LEN PIC S9(4) COMP VALUE +100. . . . DBERR. CALL 'SAMMSG' USING ERR-MSG, ERR-LEN.