[分享]ACL Script-Delinquency Netflow

分享至

榮譽勳章：

小蔡

大師

點數：2860

2012-01-30 10:56:30

我想創建一個表將顯示投資組合即月之間。我設法在所附的格式，在"資料"工作表中的資料提取檔案，列年月，請參閱 monthend 檔。BOOKMTH 是指的月中設施被預訂一空。最終結果表如何顯示，我想要查看的資料。在 excel 工作表有兩張。請一些可以説明獲得所需的格式的結果。謝謝
附檔下載

回覆會員暱稱：tina
點數：1880
等級：研究生

榮譽勳章：研究生
發文篇數：83
回文時間：2012-01-30 11:06:28

你是對的在script中有這麼多的表和加入的命令。我寫過資料表格格式代碼有：- MTH, MTHSR, BOOKMTH MT - character TYPE- OUTSTAND_BUCK, Count_BUCK, OUTSTAND_BUCK_..., Count_BUCK_... - numeric TYPE。如果您有其他類型，所以更需要改script中的東西。主script：OPEN DATAv_ctr = 0DO SCRIPT DEF_EXTRACT_BODY WHILE v_ctr <= 11GROUP IF MT = "00"EXTRACT FIELDS %DEF_BODY_0% TO TMPELSE IF MT = "01"EXTRACT FIELDS %DEF_BODY_1% TO TMPELSE IF MT = "02"EXTRACT FIELDS %DEF_BODY_2% TO TMPELSE IF MT = "03"EXTRACT FIELDS %DEF_BODY_3% TO TMPELSE IF MT = "04"EXTRACT FIELDS %DEF_BODY_4% TO TMPELSE IF MT = "05"EXTRACT FIELDS %DEF_BODY_5% TO TMPELSE IF MT = "06"EXTRACT FIELDS %DEF_BODY_6% TO TMPELSE IF MT = "07"EXTRACT FIELDS %DEF_BODY_7% TO TMPELSE IF MT = "08"EXTRACT FIELDS %DEF_BODY_8% TO TMPELSE IF MT = "09"EXTRACT FIELDS %DEF_BODY_9% TO TMPELSE IF MT = "10"EXTRACT FIELDS %DEF_BODY_10% TO TMPELSE IF MT = "11"EXTRACT FIELDS %DEF_BODY_11% TO TMPENDOPEN TMPSUMMARIZE ON MTH OTHER MTH MTHSR BOOKMTH SUBTOTAL OUTSTAND_BUCK Count_BUCK OUTSTAND_BUCK_01 Count_BUCK_01 OUTSTAND_BUCK_02 Count_BUCK_02 OUTSTAND_BUCK_03 Count_BUCK_03 OUTSTAND_BUCK_04 Count_BUCK_04 OUTSTAND_BUCK_05 Count_BUCK_05 OUTSTAND_BUCK_06 Count_BUCK_06 OUTSTAND_BUCK_07 Count_BUCK_07 OUTSTAND_BUCK_08 Count_BUCK_08 OUTSTAND_BUCK_09 Count_BUCK_09 OUTSTAND_BUCK_10 Count_BUCK_10 OUTSTAND_BUCK_11 Count_BUCK_11 OUTSTAND_BUCK_12 Count_BUCK_12 OUTSTAND_BUCK_13 Count_BUCK_13 TO "RESULT.FIL" OPEN PRESORT********************SUBSCRIPT DEF_EXTRACT_BODY:OPEN DATADEF_BODY_%v_ctr% = "0*DEC(0 3) AS 'OUTSTAND_BUCK' 0 AS 'Count_BUCK' 0*DEC(0 3) AS 'OUTSTAND_BUCK_01' 0 AS 'Count_BUCK_01'" + BLANKS(1000)IF v_ctr = 0 DEF_BODY_0 = "OUTSTAND_BUCK*DEC(1 3) AS 'OUTSTAND_BUCK' Count_BUCK*1 AS 'Count_BUCK' OUTSTAND_BUCK_01*DEC(1 3) AS 'OUTSTAND_BUCK_01' Count_BUCK_01*1 AS 'Count_BUCK_01'" + BLANKS(1000)v_ctrl = 2GROUP IF RECNO() = 1LOOP WHILE v_ctrl <= 13GROUP IF v_ctr + 1 = v_ctrlDEF_BODY_%v_ctr% = TRIM(DEF_BODY_%v_ctr%) + " " + "OUTSTAND_BUCK_" + ZONED(v_ctrl 2) + "*DEC(1 3) AS 'OUTSTAND_BUCK_" + ZONED(v_ctrl 2) +"' Count_BUCK_" + ZONED(v_ctrl 2) + "*DEC(1 3) AS 'Count_BUCK_" + ZONED(v_ctrl 2) + "'"+ BLANKS(1000)ELSE DEF_BODY_%v_ctr% = TRIM(DEF_BODY_%v_ctr%) + " " + "0*DEC(0 3) AS 'OUTSTAND_BUCK_" + ZONED(v_ctrl 2) + "' 0 AS 'Count_BUCK_" + ZONED(v_ctrl 2)+ "'" + BLANKS(1000)ENDv_ctrl = v_ctrl + 1ENDENDDEF_BODY_%v_ctr% = "MTH MTHSR BOOKMTH " + ALL(DEF_BODY_%v_ctr%)v_ctr = v_ctr + 1

回覆會員暱稱：小蔡
點數：2860
等級：大師

榮譽勳章：
發文篇數：126
回文時間：2012-01-30 11:05:30

我已重新連接檔案。此外附上我獲得所需的結果寫的腳本。但這似乎效率低，因為我要建立這麼多的表，然後重新加入。希望會有更好的方法。
附檔下載

回覆會員暱稱：辣味的
點數：3050
等級：知識長

榮譽勳章：知識長
發文篇數：135
回文時間：2012-01-30 11:04:51

您可以開啟. zip 檔嗎？
附檔下載

回覆會員暱稱：狗狗兒
點數：2300
等級：專家

榮譽勳章：
發文篇數：103
回文時間：2012-01-30 10:59:43

對不起-無法打開.rar 檔。