Query Error - Text Too Long

Friends, I have drafted a code

DATE:IIF(IsNull([REV 03 SUBMISSION] Or [REV 02 SUBMISSION] Or [REV 01 SUBMISSION] Or [REV 00 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL] Or [REV 01 APPROVAL] Or [REV 00 APPROVAL]),[Sch Date Of Submission],IIf(IsNull([REV 03 SUBMISSION] Or [REV 02 SUBMISSION] Or [REV 01 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL] Or [REV 01 APPROVAL] Or [REV 00 APPROVAL]), [REV 00 SUBMISSION],IIf(IsNull([REV 03 SUBMISSION] Or [REV 02 SUBMISSION] Or [REV 01 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL] Or [REV 01 APPROVAL] Or [REV 00 SUBMISSION]), [REV 00 APPROVAL],IIf(IsNull([REV 03 SUBMISSION] Or [REV 02 SUBMISSION] Or [REV 01 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL]),[REV 01 APPROVAL],IIf(IsNull([REV 03 SUBMISSION] Or [REV 02 SUBMISSION] Or [REV 01 APPROVAL] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL]),[REV 01 SUBMISSION],IIf(IsNull([REV 03 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 SUBMISSION]), [REV 02 APPROVAL],IIf(IsNull([REV 03 SUBMISSION] Or [REV 03 APPROVAL] Or [REV 02 APPROVAL]), [REV 02 SUBMISSION],IIf([REV 03 SUBMISSION], [REV 03 SUBMISSION],IIf([REV 03 APPROVAL], [REV 03 APPROVAL])))))))))

Please check this code and help as this gives error of Text Too Long. I can not run this