vsam rrsd

RRDS được gọi là Tập dữ liệu bản ghi tương đối. Cụm RRDS tương tự như cụm ESDS. Điểm khác biệt duy nhất là các bản ghi RRDS được truy cập bằng Số bản ghi tương đối (RRN) , chúng ta phải mã NUMBERED bên trong lệnh DEFINE CLUSTER. Sau đây là các tính năng chính của RRDS −

  • Tập dữ liệu bản ghi tương đối có các bản ghi được xác định bởi Số bản ghi tương đối (RRN) , là số thứ tự liên quan đến bản ghi đầu tiên.
  • RRDS cho phép truy cập các bản ghi theo số như bản ghi 1, bản ghi 2, v.v. Điều này cung cấp khả năng truy cập ngẫu nhiên và giả định rằng chương trình ứng dụng có cách lấy số bản ghi mong muốn.
  • Các bản ghi trong tập dữ liệu RRDS có thể được truy cập tuần tự, theo thứ tự số bản ghi tương đối hoặc trực tiếp bằng cách cung cấp số bản ghi tương đối của bản ghi mong muốn.
  • Các bản ghi trong tập dữ liệu RRDS được lưu trữ trong các khe có độ dài cố định. Mỗi bản ghi được tham chiếu theo số vị trí của nó, số này có thể thay đổi từ 1 đến số lượng bản ghi tối đa trong tập dữ liệu.
  • Các bản ghi trong RRDS có thể được ghi bằng cách chèn bản ghi mới vào một khe trống.
  • Các bản ghi có thể bị xóa khỏi cụm RRDS, do đó để lại một vị trí trống.
  • Các ứng dụng sử dụng bản ghi có độ dài cố định hoặc số bản ghi có ý nghĩa theo ngữ cảnh có thể sử dụng bộ dữ liệu RRDS.
  • RRDS có thể được sử dụng trong các chương trình COBOL giống như bất kỳ tệp nào khác. Chúng tôi sẽ chỉ định tên tệp trong JCL và chúng tôi có thể sử dụng tệp KSDS để xử lý bên trong chương trình. Trong chương trình COBOL, chỉ định tổ chức tệp là TƯƠNG ĐỐI và bạn có thể sử dụng bất kỳ chế độ truy cập nào (Tuần tự, Ngẫu nhiên hoặc Động) với bộ dữ liệu RRDS.

Cu trúc tp RRDS

Không gian được chia thành các khe có độ dài cố định trong cấu trúc tệp RRDS. Một vị trí có thể hoàn toàn trống hoặc hoàn toàn đầy. Do đó, các bản ghi mới có thể được thêm vào các vị trí trống và các bản ghi hiện có có thể bị xóa khỏi các vị trí đã được lấp đầy. Chúng tôi có thể truy cập trực tiếp bất kỳ bản ghi nào bằng cách cung cấp Số bản ghi tương đối. Ví dụ sau cho thấy cấu trúc cơ bản của tệp dữ liệu

Thành phn d liu

Số bản ghi tương đốiTrường ghi 1Bản ghi trường 2
1hướng dẫnĐiểm
2Mohtahimm.
3NishantMalik

Xác định cm RRDS

Cú pháp sau đây cho biết những tham số nào chúng ta có thể sử dụng khi tạo cụm RRDS. Mô tả tham số vẫn giữ nguyên như đã đề cập trong mô-đun VSAM – Cluster.

DEFINE CLUSTER (NAME(rrds-file-name)     -
BLOCKS(number)                           -
VOLUMES(volume-serial)                   -
NUMBERED                                 -
RECSZ(average maximum)                   -
[FREESPACE(CI-Percentage,CA-Percentage)] -
CISZ(number)                             -
[READPW(password)]                       -
[FOR(days)|TO(date)]                     -
[UPDATEPW(password)]                     -
[REUSE / NOREUSE])                       -
DATA                                     -
   (NAME(rrds-file-name.data))           

Ví d

Ví dụ sau cho thấy cách tạo cụm RRDS trong JCL bằng tiện ích IDCAMS

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEP1  EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN    DD  *
   DEFINE CLUSTER (NAME(MY.VSAM.RRDSFILE)  -
   NUMBERED                                -
   RECSZ(80 80)                            -
   TRACKS(1,1)                             -
   REUSE                                   - 
   FREESPACE(3 3) )                        -
   DATA (NAME(MY.VSAM.RRDSFILE.DATA))      
/*

Nếu bạn sẽ thực thi JCL trên trên máy chủ Mainframes. Nó sẽ thực thi với MAXCC = 0 và nó sẽ tạo tệp MY.VSAM.RRDSFILE VSAM.

Xóa cm RRDS

Cụm RRDS bị xóa bằng tiện ích IDCAMS. Lệnh DELETE xóa mục nhập của cụm VSAM khỏi danh mục và tùy chọn xóa tệp, do đó giải phóng không gian bị chiếm bởi đối tượng.

DELETE data-set-name CLUSTER  
[ERASE / NOERASE] 
[FORCE / NOFORCE] 
[PURGE / NOPURGE] 
[SCRATCH / NOSCRATCH]

Cú pháp trên cho thấy những tham số nào chúng ta có thể sử dụng trong khi xóa cụm RRDS. Mô tả tham số vẫn giữ nguyên như đã đề cập trong mô-đun VSAM – Cluster.

Ví d

Ví dụ sau cho thấy cách xóa cụm RRDS trong JCL bằng tiện ích IDCAMS

//SAMPLE JOB(TESTJCL,XXXXXX),CLASS = A,MSGCLASS = C
//STEPNAME EXEC PGM = IDCAMS
//SYSPRINT DD  SYSOUT = *
//SYSIN    DD  *
   DELETE MY.VSAM.RRDSFILE CLUSTER
/*

Nếu bạn sẽ thực thi JCL trên trên máy chủ Mainframes. Nó sẽ thực thi với MAXCC = 0 và nó sẽ xóa Cụm VSAM MY.VSAM.RRDSFILE.

VSAM – LDS (xem thêm)

Trả lời