User Tools

Site Tools


ibm:vm370-lib:copy:mdrrec.copy_src

MDRREC Source

References

Source Listing

MDRREC.COPY.txt
  1. *COPY MDRREC 00000500
  2. PUSH PRINT 00000510
  3. AIF ('&SYSPARM' NE 'SUP').MDR01 00000520
  4. PRINT OFF,NOGEN 00000530
  5. .MDR01 ANOP 00000540
  6. MDRREC DSECT 00001000
  7. * 00002000
  8. *** MISCELLANEOUS DATA RECORDING RECORD 00003000
  9. * 00004000
  10. * +---------+----+----+----+----+---------+ 00005000
  11. * | MDRKEYN | S1 | S2 | S3 | S4 | MDRSPE1 | 00006000
  12. * +---------+----+----+----+----+---------+ 00007000
  13. * | MDRDTEN | MDRTMEN | 00008000
  14. * +-------------------+-------------------+ 00009000
  15. * | MDRCPID | 00010000
  16. * +---------+---------+-------------------+ 00011000
  17. * | MDRCUA1 | MDRVOL | 00012000
  18. * +---------+-----------------------------+ 00013000
  19. * | | 00014000
  20. * | SENSE DATA | 00015000
  21. * | | 00016000
  22. * +---------------------------------------+ 00017000
  23. * 00018000
  24. *** MDR RECORD 00019000
  25. * 00020000
  26. * 00021000
  27. * 24 BYTE HEADER 00022000
  28. * 00023000
  29. MDRKEYN DS 1H TYPE AND OP SYSTEM 00024000
  30. MDRSWS1 DS 1C S1 -SWITCH BYTE 0 00025000
  31. MDRSWS2 DS 1C S2 - NOT USED 00026000
  32. MDRSWS3 DS 1C S3 - NOT USED 00027000
  33. MDRRECNT DS 1C S4 - 0-3=SEQ. #, 4-7=REC. TOT. 00028000
  34. MDRSPE1 DS 1H 00029000
  35. MDRDTEN DS 1F DATE 00030000
  36. MDRTMEN DS 1F TIME 00031000
  37. MDRCPID DS 2F CPU ID AND MODEL 00032000
  38. * 00033000
  39. * REST IS DEVICE DEPENDENT 00034000
  40. * 00035000
  41. MDRCUA1 DS 2X PRIMARY CUA OF DEVICE 00036000
  42. MDRVOL DS 6X VOLUME SERIAL OF DEVICE 00037000
  43. MDRSENS DS 24X SENSE DATA 00038000
  44. MRDSIZE EQU (*-MDRREC) MDR RECORD SIZE 00038500
  45. EJECT 00039000
  46. POP PRINT 00040000
  47. SPACE 00041000
ibm/vm370-lib/copy/mdrrec.copy_src.txt ยท Last modified: 2023/08/06 13:36 by Site Administrator