Hello Experts,
I am facing an issue in capturing successful import in FDMEE.
I have the requirement to send email notification on successful import and unsuccessful import mentioning the status.
I have tried using the variables:
1. Set objProcessStatus = objFDMAPI.API.MaintenanceMgr.fProcessStatus(strLoc,strCat,strPer,strRulID)
objProcessStatus.blnImp
The value of objProcessStatus.blnImp is always returned as "False" no matter what is the status of the import ( Successful & Unsuccessful both cases)
2. I have tried with objProcessStatus.lngStatus,
Here also the value returned is always '0' irrespective of the status of the import.
3. I have tried capturing the "PROCESSIMP" from TLOGPROCESS and the value of PROCESSIMP always remains 0 even on successful import.
While the Fish turns Orange on Import indicating a successfull import.
Need help in an effective way to capture the status flag of successful import.
Code Sample I am using to capture the Status:
Dim lngStateCheck
Dim objProcessStatus
Dim stat
strLoc = objFDMAPI.API.State.LocName
strLocKey = objFDMAPI.API.State.LocKey
strCat = objFDMAPI.API.State.CatName
strCatKey = objFDMAPI.API.State.CatKey
strPer = objFDMAPI.API.State.PeriodKey
strRulID= objFDMAPI.API.State.RuleID
WScript.Echo "Location Key " & strLocKey
WScript.Echo "Rule ID " & strRulID
WScript.Echo "Partition Key " & strLocKey
WScript.Echo "Period " & strPeriodKey
' Set Object Process Status Flag
Set objProcessStatus = objFDMAPI.API.MaintenanceMgr.fProcessStatus(strLoc,strCat,strPer,strRulID)
Set FSO = CreateObject("Scripting.FileSystemObject")
Set writefile = FSO.OpenTextFile("E:\FDMEE\data\scripts\debug.txt",8)
writefile.writeline "I am Here and my value is"
writefile.writeline objProcessStatus.blnImp
writefile.writeline objProcessStatus.lngStatus
writefile.close
'Destroy Objects
objFDMAPI.Dispose
Set objFDMAPI = Nothing
********************************
Log File Entry of PROCESSIMP: ( The following Query is from the log file stating that PROCESSIMP is updated as 0)
2015-09-01 11:15:08,008 DEBUG [AIF]:
UPDATE TLOGPROCESS
SET PROCESSENDTIME = CURRENT_TIMESTAMP
,PROCESSSTATUS = 0
,PROCESSIMP = 0
,PROCESSVAL = 0
,PROCESSEXP = 0
,PROCESSENTLOAD = 0
,PROCESSENTVAL = 0
,BLNWCDIRTY = 0
,BLNLOGICDIRTY = 0
,BLNVALDIRTY = 0
,PROCESSIMPNOTE = NULL
,PROCESSVALNOTE = NULL
,PROCESSEXPNOTE = NULL
,PROCESSENTLOADNOTE = NULL
,PROCESSENTVALNOTE = NULL
WHERE PARTITIONKEY = 37 AND CATKEY = 1 AND PERIODKEY = '2017-01-31' AND RULE_ID = 56