DFH Comm Area

• System defined global variable which must be declared in linkage section with 01 level no

• Which can be used to pass the data from on program to another program, on transaction to another transaction.

• Max size area for DFH Comm Area is 65Kbytes

PROCEDURE DIVISION :-

            Move Spaces to DFH Comm Area

            I nitialise DFH Comm Area ----- Aliphanumaric, Numaeric

• To transfer the control from one program to another

We use XCIL

      Exec CICS

                  XCTL

                  Program (“CICSOOL”)

                  CommArea(DFHcommArea)

                  Length (Comm-Length)

      End- Exec

• We can use link to transfer the control

• The diff between XCTL &LINK is when we use XCTL the control is not Expected to back to the screen but when we use link it will expect that the control will back

Exec CICS

            LINK

                        Program(“CICS001”)

                        CommAre(DFHCommArea)

                        Length(Comm – length)

End Exec

• If we use F8 Key Page up & F9 for Page down, data is to be transferred from database to screen.But we use temp area for storing this info.this is call queene

01 Ws-Comm-Area

            02 Transfer  - data

02   CustNo.   PIC  9(5)

02 Save – data

            03 CustNo.   PIC 9(5)

            03 CustName  PIC X(20)

02 Multiple – rows

            03 Ws-data PIC X(5) access 1,00,000times