01.sql = ""
02. sql = sql & " SELECT A.BOX_OWNER_ID , A.SENDDOC_NO , A.TO_DATE , A.TO_TIME , A.FROM_ACT_ID , "
03. sql = sql & " A.DOC_SUBJECT , A.DOC_DESC , A.OBJECT_ID , B.CATE_ID , B.DOC_OWNER_ID , B.IMPT_ID , B.EXP_ID , A.FLG_REC , "
04. sql = sql & " NVL(C.CNT_FILE,0) AS FILE_SEQ , NVL(D.CNT_OWN, 0) AS FW_SEQ "
05. sql = sql & " FROM DOCT_INBOX A , DOCT_DRAFTS B , "
06. sql = sql & " ( SELECT SENDDOC_NO ,COUNT(*) AS CNT_FILE "
07. sql = sql & " FROM DOCT_FILE_ATTACH "
08. sql = sql & " GROUP BY SENDDOC_NO ) C , "
09. sql = sql & " (SELECT BOX_OWNER_ID, SENDDOC_NO, TO_DATE, TO_TIME, COUNT(*) AS CNT_OWN "
10. sql = sql & " FROM DOCT_FORWARD "
11. sql = sql & " GROUP BY BOX_OWNER_ID, SENDDOC_NO, TO_DATE, TO_TIME) D "
12. sql = sql & " WHERE A.SENDDOC_NO = B.SENDDOC_NO "
13. sql = sql & " AND B.SENDDOC_NO = C.SENDDOC_NO(+) "
14. sql = sql & " AND A.BOX_OWNER_ID = D.BOX_OWNER_ID(+) "
15. sql = sql & " AND A.SENDDOC_NO = D. SENDDOC_NO(+) "
16. sql = sql & " AND A.TO_DATE = D.TO_DATE(+) "
17. sql = sql & " AND A.TO_TIME = D.TO_TIME(+) "
18. sql = sql & " AND A.BOX_OWNER_ID = '" & Session("ACT_ID") & "' "
19. sql = sql & " AND A.FLG_DEL IS NULL "
20.
21.
22. Set Rs_scdoc = Server.CreateObject("ADODB.RecordSet")
23. Rs_scdoc.Open sql ,objConn, 1,3
24.
