What is the output of this program

DCL-F MOVIESPF Workstn; EXFMT RECORD1; DOW NOT(*IN03); amount = adults + children; WRITE RECORD1; EXFMT RECORD2; IF NOT(*IN03); adult = 0; children = 0; EXFMT RECORD1; ENDIF; ENDDO;