Hi Gurus,
I am have problem with Fox Function,
This is sample Data of Adjustments:
GBUS_AR Plant GMAT1 GMAT2 GMAT3 GMAT_GRP Version ADJCD 0CAL CURR USD DAD_LC
3000 1212 15 1530 601 1 200910 USD 0 3,000.00
I want to generate the 602 Version but i was not able to generate 602.
I could not read the records LV_IA = {GSPDAD_LC,#,FIIFC01R,601,#,#,#,#,LV_COD,#,#,#,#,#,#,#,LV_RC,#}.
Below is the Code:
{DATA LV_UOM TYPE 0BASE_UOM.
DATA LV_IN TYPE 0INFOPROV.
DATA LV_VER TYPE 0VERSION.
DATA LV_AGP TYPE GANLYSGRP.
DATA LV_COM TYPE GCOMP_CD.
DATA LV_BOM TYPE GCONQTBUM.
DATA LV_GMAT TYPE GMATERIAL.
DATA LV_COD TYPE GMATGRPL1.
*DATA LV_PRO TYPE GMATGRPL2.
DATA LV_TYP TYPE GMATGRPL3.
DATA LV_MGP TYPE GMAT_GRP.
DATA LV_PLN TYPE GMAT_PLNT.
DATA LV_OHK TYPE GPLANTOHK.
DATA LV_PFL TYPE GPRODFLAG.
DATA LV_PC TYPE GPROF_CTR.
DATA LV_SR TYPE GSRCSYS.
DATA LV_RC TYPE GUCADJCD.
DATA LV_RF TYPE LMATXREF.
DATA LV_IA TYPE F.
DATA LV_TIA TYPE F.
DATA LV_ACTIA TYPE F.
DATA LV_SP TYPE F.
DATA LV_SPU TYPE F.
DATA LV_ASPU TYPE F.
FOREACH LV_RC.
LV_IA = 0.
LV_TIA = 0.
LV_ACTIA = 0.
LV_SP = 0.
LV_SPU = 0.
LV_ASPU = 0.
LV_IA = {GSPDAD_LC,#,FIIFC01R,601,#,#,#,#,LV_COD,#,#,#,#,#,#,#,LV_RC,#}.
LV_SP = {GSPDADUSD,#,FIIFC01R,601,#,#,#,#,LV_COD,#,#,#,#,#,#,#,LV_RC,#}.
MESSAGE W001 (/0MSG) WITH LV_IA.
IF LV_IA <> 0 OR LV_SP <> 0.
FOREACH LV_UOM,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,LV_RF.
LV_ACTIA = {GSPEND_LC,LV_UOM,FIIF_C01,600,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF}.
LV_TIA = LV_ACTIA+ LV_TIA.
LV_ASPU = {GSPND_USD,LV_UOM,FIIF_C01,600,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF}.
LV_SPU = LV_ASPU + LV_SPU.
ENDFOR.
FOREACH LV_UOM,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,LV_RF.
MESSAGE W002 (/0MSG) WITH LV_GMAT.
IF LV_GMAT <> #.
LV_ACTIA = {GSPEND_LC,LV_UOM,FIIF_C01,600,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF}.
{GSPDAD_LC,LV_UOM,FIIFC01R,602,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF} = (LV_IA/LV_TIA)*LV_ACTIA.
LV_ASPU = {GSPND_USD,LV_UOM,FIIF_C01,600,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF}.
{GSPDADUSD,LV_UOM,FIIFC01R,602,LV_AGP,LV_COM,LV_BOM,LV_GMAT,LV_COD,LV_TYP,LV_MGP,LV_PLN,LV_OHK,LV_PFL,LV_PC,LV_SR,#,LV_RF} = (LV_SP/LV_SPU)*LV_ASPU.
ENDIF.
ENDFOR.
ENDIF.
ENDFOR.}
My Actuals are stored in 600 version. Adjustments in 601, but it not ready the records when we have the Values GMAT1.
Please let me know what might be the reason
Thanks
Perala
Edited by: Peralas on May 18, 2010 4:06 AM