User Tools

Site Tools


ibm:vm370-lib:copy:ddrrec.copy_src

DDRREC Source

References

Source Listing

DDRREC.COPY.txt
  1. *COPY DDRREC 00000500
  2. PUSH PRINT 00000510
  3. AIF ('&SYSPARM' NE 'SUP').DDR01 00000520
  4. PRINT OFF,NOGEN 00000530
  5. .DDR01 ANOP 00000540
  6. DDRREC DSECT 00001000
  7. * 00002000
  8. *** RECONFIGURATION RECORD 00003000
  9. * 00004000
  10. * +---------+----+----+----+----+---------+ 00005000
  11. * | DDRKEYN | S1 | S2 | S3 | S4 | DDRSPE1 | 00006000
  12. * +---------+----+----+----+----+---------+ 00007000
  13. * | DDRDTEN | DDRTMEN | 00008000
  14. * +-------------------+-------------------+ 00009000
  15. * | DDRJOB | 00010000
  16. * +-------------------+---------+---------+ 00011000
  17. * | DDRVOL1 | DDR- | 00012000
  18. * +-------------------+----+--------------+ 00013000
  19. * | VOL2 | S5 | DDRCUA1 | 00014000
  20. * +-------------------+----+--------------+ 00015000
  21. * | DDRDEV1 | S6 | DDRCUA2 | 00016000
  22. * +-------------------+----+--------------+ 00017000
  23. * | DDRDEV2 | 00018000
  24. * +-------------------+ 00019000
  25. * 00020000
  26. *** DDR RECORD 00021000
  27. * 00022000
  28. * 00023000
  29. DDRKEYN DS 1H TYPE AND OP SYSTEM 00024000
  30. DDRSWS1 DS 1C S1 - SWITCH BYTE 0 00025000
  31. DDRSWS2 DS 1C S2 - NOT USED 00026000
  32. DDRSWS3 DS 1C S3 - NOT USED 00027000
  33. DDRRECNT DS 1C S4 - NOT USED 00028000
  34. DDRSPE1 DS 1H 00029000
  35. DDRDTEN DS 1F DATE 00030000
  36. DDRTMEN DS 1F TIME 00031000
  37. DDRCPID DS 2F CPU ID AND MODEL 00032000
  38. * 00033000
  39. * REST IS DEVICE DEPENDENT 00034000
  40. * 00035000
  41. DDRJOB DS 8X JOB USING 'FROM' DEVICE 00036000
  42. DDRVOL1 DS 6X VOLUME SERIAL 'FROM' DEVICE 00037000
  43. DDRVOL2 DS 6X VOLUME SERIAL 'TO' DEVICE 00038000
  44. DDRDEVP1 DS 1X S5- DEVICE ID OF 'FROM' DASD 00039000
  45. DDRCUA1 DS 3X PRIMARY CUA OF 'FROM' DEVICE 00040000
  46. DDRDEV1 DS 4X DEVICE TYPE 'FROM' DEVICE 00041000
  47. DDRDEVP2 DS 1X S6- DEVICE ID 'TO' DASD 00042000
  48. DDRCUA2 DS 3X PRIMARY CUA OF 'TO' DEVICE 00043000
  49. DDRDEV2 DS 4X DEVICE TYPE OF 'TO' DEVICE 00044000
  50. DDRSIZE EQU (*-DDRREC) DDR RECORD SIZE 00044500
  51. EJECT 00045000
  52. POP PRINT 00046000
  53. SPACE 00047000
ibm/vm370-lib/copy/ddrrec.copy_src.txt ยท Last modified: 2023/08/06 13:36 by Site Administrator