CD/DVD Burning on Itanium OpenVMS 8.3This was developed on an Itanium RX2620 with a NEC DVD+/-RW ND-6650A burner (from $show device/full dqa0:)The SYS$MANAGER:CDRECORD.COM supplied with OpenVMS works find for CD's but fails with DVD's. The critical command to burn a DVD is : $ MCR CDDVD$CP -i dvd.dsk -o dqa0: -b -s 16 -vThe file SYS$SYSTEM:CDDVD$CP is what is run when the undocumented command COPY/RECORDABLE_MEDIA is entered. If you enter MCR CDDVD$CP -h you will get a listing of the options. To make the process easier I created a directory for the container files and put the following command procedures in it. The first four just call CDRECORD.COM SETUP_CD.COM - Run once to create the cd container and load it to LDA1: $ @SYS$MANAGER:CDRECORD SETUP CD640.DSK LDA1: CD 1250026 SETUP_DVD.COM - Run once to create the dvd container and load it to LDA1: $ @SYS$MANAGER:CDRECORD SETUP DVD.DSK LDA1: DVD 9180416 REUSE_CD.COM - Run this to reuse the cd container after it has been burned or unloaded $ @SYS$MANAGER:CDRECORD REUSE CD640.DSK LDA1: DVD REUSE_DVD.COM - Run this to reuse the dvd container after it has been burned or reloaded $ @SYS$MANAGER:CDRECORD REUSE DVD.DSK LDA1: DVD UNLOAD_LDA1.COM - The just unloads the current container if you want to switch with burning. (Taken from CRRECORD.COM) $ LOG_DEVICE = "LDA1: $ IF F$GETDVI("''LOG_DEVICE'", "MOUNTCNT") .NES. "0" $ THEN $ DISMOUNT 'LOG_DEVICE $ ENDIF $ LD DISCONNECT 'LOG_DEVICE BURN_CD.COM;1 - This burns the cd and unloads the container $ @SYS$MANAGER:CDRECORD WRITE CD640.DSK LDA1: DQA0: 0 0 0 Y This is the special one: BURN_DVD.COM;1 $ LOG_DEVICE = "LDA1: $ IF F$GETDVI("''LOG_DEVICE'", "MOUNTCNT") .NES. "0" $ THEN $ DISMOUNT 'LOG_DEVICE $ ENDIF $ LD DISCONNECT 'LOG_DEVICE $ MCR CDDVD$CP -i dvd.dsk -o dqa0: -b -s 16 -v Notes: Obviously logicals could be used to point to things. I assume these files are in the default directory. If you change the size of the CD container, it must be a multiple of 4. If you change the size of the DVD container, it must be a multiple of 16. If it is larger than the media, it will be truncated and you will get a warning message when the media is mounted. |