為什么80%的碼農(nóng)都做不了架構(gòu)師？>>> ??

其實，對于庫齡計算，其實并不復(fù)雜，關(guān)于網(wǎng)上的FIFO，還不是很理解，但是，我跟同事理清了一下思路，把庫齡分析的整個流程簡單化：1.確定所要計算的庫齡區(qū)間（一般分成6個區(qū)間）2.計算所在區(qū)間內(nèi)的入庫總量A（一般為正數(shù)）3.計算所在區(qū)間出庫問題B（一般為負(fù)數(shù)）4.計算ABS(B)-A的值C，如果C>=0表示已經(jīng)出庫完(庫中沒有任何物料)，庫齡數(shù)量為0，若c<0表示沒有出庫完，應(yīng)該計算其庫齡數(shù)量ABS(C)。 下面是ABAP的報表程序：*********************************************************************** *?PROGRAM?NAME????????:?ZMMR015 *?PROGRAM?PURPOSE?????:?存貨賬齡分析報表 *?AUTHOR??????????????:?藍志鵬 *?DATA?WRITTEN????????:?2013-03-22 *?NOTE????????????????:?第二版本 *********************************************************************** *???DATE?????|????MOD?????|?INITIAL??|?????????DESCRIPTION *----------+------------+----------+----------------------------------* *?2013-03-22?|?DEVK903258|?藍志鵬???|?INITIAL?PROGRAM?CREATION *********************************************************************** REPORT??ZMMR015. TYPE-POOLS:SLIS. TYPES:?BEGIN?OF?TY_OUTPUT,ZSEL??TYPE?C?LENGTH?1,BUKRS?TYPE?MSEG-BUKRS,"公司代碼WERKS?TYPE?MSEG-WERKS,"工廠LGORT?TYPE?MSEG-LGORT,"庫位（庫存地點）MATNR?TYPE?MSEG-MATNR,"物料號MAKTX?TYPE?MAKT-MAKTX,"物料描述MEINS?TYPE?MSEG-MEINS,"基本計量單位STOCK?TYPE?I,"當(dāng)前庫存STNM1?TYPE?I,????????????????????????????????????????"0-30天庫齡數(shù)量TRMB1?TYPE?P?DECIMALS?2,?????????????????????????????"0-30天金額STNM2?TYPE?I,????????????????????????????????????????"31-60天庫齡數(shù)量TRMB2?TYPE?P?DECIMALS?2,?????????????????????????????"31-60天金額STNM3?TYPE?I,????????????????????????????????????????"61-90天庫齡數(shù)量TRMB3?TYPE?P?DECIMALS?2,?????????????????????????????"61-90天金額STNM4?TYPE?I,"91-180天庫齡數(shù)量TRMB4?TYPE?P?DECIMALS?2,?????????????????????????????"91-180天金額STNM5?TYPE?I,"181-360天庫齡數(shù)量TRMB5?TYPE?P?DECIMALS?2,?????????????????????????????"181-360天金額STNM6?TYPE?I,????????????????????????????????????????"361天以上庫齡數(shù)量TRMB6?TYPE?P?DECIMALS?2,?????????????????????????????"361天以上金額END?OF?TY_OUTPUT. TYPES:?BEGIN?OF?TY_TOTAL,BUKRS?TYPE?MSEG-BUKRS,"公司代碼WERKS?TYPE?MSEG-WERKS,"工廠LGORT?TYPE?MSEG-LGORT,"庫位（庫存地點）MATNR?TYPE?MSEG-MATNR,"物料號MAKTX?TYPE?MAKT-MAKTX,"物料描述MEINS?TYPE?MSEG-MEINS,"基本計量單位MENGE?TYPE?MSEG-MENGE,"數(shù)量BUDAT?TYPE?MKPF-BUDAT,"過賬日期STPRS?TYPE?MBEW-STPRS,"標(biāo)準(zhǔn)價格PEINH?TYPE?MBEW-PEINH,"價格單位LABST?TYPE?MARD-LABST,"非限制使用庫存INSME?TYPE?MARD-INSME,"質(zhì)檢庫存SPEME?TYPE?MARD-SPEME,"凍結(jié)庫存PRLAB?TYPE?MSPR-PRLAB,"項目庫存KALAB?TYPE?MSKA-KALAB,"銷售訂單庫存SLABS?TYPE?MKOL-SLABS,"寄售庫存LBLAB?TYPE?MSLB-LBLAB,"委外供應(yīng)商庫存END?OF?TY_TOTAL. TYPES:?BEGIN?OF?TY_TMP1,BUKRS?TYPE?MSEG-BUKRS,"公司代碼WERKS?TYPE?MSEG-WERKS,"工廠LGORT?TYPE?MSEG-LGORT,"庫位（庫存地點）MATNR?TYPE?MSEG-MATNR,"物料號MENGE?TYPE?MSEG-MENGE,"數(shù)量MBLNR?TYPE?MSEG-MBLNR,"物料憑證號MEINS?TYPE?MSEG-MEINS,"基本計量單位MAKTX?TYPE?MAKT-MAKTX,"物料描述END?OF?TY_TMP1. TYPES:?BEGIN?OF?TY_TMP2,WERKS?TYPE?MARD-WERKS,"工廠LGORT?TYPE?MARD-LGORT,"庫位（庫存地點）MATNR?TYPE?MARD-MATNR,"物料號LABST?TYPE?MARD-LABST,"非限制使用庫存INSME?TYPE?MARD-INSME,"質(zhì)檢庫存SPEME?TYPE?MARD-SPEME,"凍結(jié)庫存END?OF?TY_TMP2. TYPES:?BEGIN?OF?TY_TMP3,WERKS?TYPE?MSKA-WERKS,"工廠LGORT?TYPE?MSKA-LGORT,"庫位（庫存地點）MATNR?TYPE?MSKA-MATNR,"物料號PRLAB?TYPE?MSPR-PRLAB,"項目庫存END?OF?TY_TMP3. TYPES:?BEGIN?OF?TY_TMP4,WERKS?TYPE?MSKA-WERKS,"工廠LGORT?TYPE?MSKA-LGORT,"庫位（庫存地點）MATNR?TYPE?MSKA-MATNR,"物料號KALAB?TYPE?MSKA-KALAB,"銷售訂單庫存END?OF?TY_TMP4. TYPES:?BEGIN?OF?TY_TMP5,WERKS?TYPE?MKOL-WERKS,"工廠LGORT?TYPE?MKOL-LGORT,"庫位（庫存地點）MATNR?TYPE?MKOL-MATNR,"物料號SLABS?TYPE?MKOL-SLABS,"寄售庫存END?OF?TY_TMP5. TYPES:?BEGIN?OF?TY_TMP6,BUKRS?TYPE?MSEG-BUKRS,"公司代碼WERKS?TYPE?MSEG-WERKS,"工廠LGORT?TYPE?MSEG-LGORT,"庫位（庫存地點）MATNR?TYPE?MSEG-MATNR,"物料號MBLNR?TYPE?MSEG-MBLNR,"物料憑證BUDAT?TYPE?MKPF-BUDAT,"過賬日期END?OF?TY_TMP6. TYPES:?BEGIN?OF?TY_TMP7,BUKRS?TYPE?MSEG-BUKRS,"公司代碼WERKS?TYPE?MSEG-WERKS,"工廠LGORT?TYPE?MSEG-LGORT,"庫位（庫存地點）MATNR?TYPE?MSEG-MATNR,"物料號MBLNR?TYPE?MSEG-MBLNR,"物料憑證STPRS?TYPE?MBEW-STPRS,"標(biāo)準(zhǔn)價格PEINH?TYPE?MBEW-PEINH,"價格單位END?OF?TY_TMP7. TYPES:?BEGIN?OF?TY_TMP8,WERKS?TYPE?MSLB-WERKS,"工廠MATNR?TYPE?MSLB-MATNR,"物料號LBLAB?TYPE?MSLB-LBLAB,"委外供應(yīng)商庫存END?OF?TY_TMP8. DATA:GT_OUTPUT?TYPE?TABLE?OF?TY_OUTPUT,GS_OUTPUT?TYPE?TY_OUTPUT,GT_TOTAL?TYPE?TABLE?OF?TY_TOTAL,GS_TOTAL?TYPE?TY_TOTAL,GT_TEMP??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP??TYPE?TY_TOTAL,GT_TEMP1??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP1??TYPE?TY_TOTAL,GT_TEMP2??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP2??TYPE?TY_TOTAL,GT_TEMP3??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP3??TYPE?TY_TOTAL,GT_TEMP4??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP4??TYPE?TY_TOTAL,GT_TEMP5??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP5??TYPE?TY_TOTAL,GT_TEMP6??TYPE?TABLE?OF?TY_TOTAL,GS_TEMP6??TYPE?TY_TOTAL,GT_TMP1??TYPE?TABLE?OF?TY_TMP1,GS_TMP1??TYPE?TY_TMP1,GT_TMP2??TYPE?TABLE?OF?TY_TMP2,GS_TMP2??TYPE?TY_TMP2,GT_TMP3??TYPE?TABLE?OF?TY_TMP3,GS_TMP3??TYPE?TY_TMP3,GT_TMP4??TYPE?TABLE?OF?TY_TMP4,GS_TMP4??TYPE?TY_TMP4,GT_TMP5??TYPE?TABLE?OF?TY_TMP5,GS_TMP5??TYPE?TY_TMP5,GT_TMP6??TYPE?TABLE?OF?TY_TMP6,GS_TMP6??TYPE?TY_TMP6,GT_TMP7??TYPE?TABLE?OF?TY_TMP7,GS_TMP7??TYPE?TY_TMP7,GT_TMP8??TYPE?TABLE?OF?TY_TMP8,GS_TMP8??TYPE?TY_TMP8. DATA:GS_LAYOUT?TYPE?SLIS_LAYOUT_ALV,GT_FIELD?TYPE?SLIS_T_FIELDCAT_ALV,GS_FIELD?LIKE?LINE?OF?GT_FIELD. DATA:?G_FNAME?TYPE?RS38L_FNAM,G_CONTROL?TYPE?SSFCTRLOP. DATA:?DATA_NUM?TYPE?I."統(tǒng)計數(shù)據(jù)總數(shù) DEFINE?M_ALV_FIELDCAT.GS_FIELD-FIELDNAME?=?&1."字段名GS_FIELD-OUTPUTLEN?=?&2."列寬GS_FIELD-REPTEXT_DDIC?=?&3."列名GS_FIELD-EDIT??????=?&4."是否可編輯GS_FIELD-CHECKBOX????=?&5."是否為復(fù)選框GS_FIELD-REF_FIELDNAME?=?&6."參考字段GS_FIELD-REF_TABNAME???=?&7."參考表GS_FIELD-KEY?=?&8."主鍵GS_FIELD-NO_ZERO??=?&9.APPEND?GS_FIELD?TO?GT_FIELD.CLEAR?GS_FIELD. END-OF-DEFINITION. SELECTION-SCREEN?BEGIN?OF?BLOCK?B1?WITH?FRAME?TITLE?TEXT-001. SELECT-OPTIONS:MATNR?FOR?GS_OUTPUT-MATNR?MODIF?ID?S1,WERKS?FOR?GS_OUTPUT-WERKS?MODIF?ID?S2,LGORT?FOR?GS_OUTPUT-LGORT?MODIF?ID?S3,BUKRS?FOR?GS_OUTPUT-BUKRS?MODIF?ID?S4. SELECTION-SCREEN?END?OF?BLOCK?B1. SELECTION-SCREEN?BEGIN?OF?BLOCK?B2?WITH?FRAME?TITLE?TEXT-002. SELECTION-SCREEN?BEGIN?OF?LINE. PARAMETERS?A1?AS?CHECKBOX?MODIF?ID?P1. SELECTION-SCREEN?COMMENT?(10)?TEXT-003?FOR?FIELD?A1. PARAMETERS?A2?AS?CHECKBOX?MODIF?ID?P2. SELECTION-SCREEN?COMMENT?(10)?TEXT-004?FOR?FIELD?A2. PARAMETERS?A3?AS?CHECKBOX?MODIF?ID?P3. SELECTION-SCREEN?COMMENT?(10)?TEXT-005?FOR?FIELD?A3. PARAMETERS?A4?AS?CHECKBOX?MODIF?ID?P1. SELECTION-SCREEN?COMMENT?(10)?TEXT-006?FOR?FIELD?A4. PARAMETERS?A5?AS?CHECKBOX?MODIF?ID?P2. SELECTION-SCREEN?COMMENT?(10)?TEXT-007?FOR?FIELD?A5. PARAMETERS?A6?AS?CHECKBOX?MODIF?ID?P3. SELECTION-SCREEN?COMMENT?(10)?TEXT-008?FOR?FIELD?A6. SELECTION-SCREEN?END?OF?LINE. SELECTION-SCREEN?END?OF?BLOCK?B2.

轉(zhuǎn)載于:https://my.oschina.net/lanzp/blog/188358

總結(jié)

以上是生活随笔為你收集整理的存货账龄分析报表（上）的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。