We can optimize our search of the VTOC for a specific Format 1 DSCB using a Search KEY Equal CCW command instead of reading each record and checking to see if it matches our data set name.<\/p>\n
In our CCW program we replace our Search ID to a Search KEY Equal command. \u00a0We need to change our read from a Read Key\/Data to only read the Data. \u00a0Here is our CCW program to search a track for a specific DSCB.<\/p>\n
DC X'07',AL3(MBBCCHHR+1),X'@CCW#CC',X'00',AL2(6) SEEK Cyl\/Trk\r\n DC X'29',AL3(DSNAME),X'@CCW#CC',X'00',AL2(44) Search Key Equal\r\n DC X'08',AL3(*-8),X'@CSW#CC',X'00',AL2(0) TIC\r\n DC X'06',AL3(BUFFER),X'00',X'00',AL2(96) Read Data<\/pre>\nIf our channel program completes with normal status (Channel End+Device End) then we located and read the DSCB. \u00a0If the DSCB was not \u00a0located on the track we will receive Channel End + Device End + Unit Check and byte two of the Sense data will have the bit x’08’ set indicating record not found.<\/p>\n
If the record is not found we can increment the track address (TT) and search again. \u00a0We can continue to search track by track until we reach the end of the VTOC extent.<\/p>\n
Actually, we can use the high-water mark in the Format 4 DSCB so we don’t need to search unused tracks. \u00a0The field DS4HPCHR contains the highest address of a Format 1 DSCB in the VTOC (the high-water mark). \u00a0Once we have searched the track indicated DS4HPCHR we can stop searching.<\/p>\n
[Next – Partitioned Data Set Access]<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"
We can optimize our search of the VTOC for a specific Format 1 DSCB using a Search KEY Equal CCW command instead of reading each record and checking to see if it matches our data set name. In our CCW … Continue reading