V
Varun Sulabha
Guest
I am facing an issue with the below FUNCTION. I am exporting this to a .xml file and in the log file I am receiving the error "** Invalid character in numeric input /. (76)". Please help me in resolving this issue.
CLASS JITS.BE.ANDON.DataItems :
CONSTRUCTOR PUBLIC DataItems():
END.
DEFINE PUBLIC VARIABLE cValue AS LONGCHAR NO-UNDO.
DEFINE TEMP-TABLE AlertList NO-UNDO
FIELD Item AS CLASS Progress.Lang.Object.
/* Method for storing alerts against an item instance */
METHOD PUBLIC VOID AddAlerts(INPUT alert AS CLASS JITS.BE.ANDON.Alerts):
CREATE AlertList.
AlertList.Item = alert.
END.
/* Method to retrieve alerts against an instance */
METHOD PUBLIC VOID GetAlerts(OUTPUT TABLE AlertList):
END.
END CLASS.
FUNCTION GETLASTSEQDATETIME RETURNS CHARACTER (INPUT mYObj AS CLASS JITS.BE.ANDON.DataItems):
ASSIGN mYObj:cValue = '99/99/9999 00:00:00'.
FIND FIRST sfcf_au where sfcf_au.assu_id = ENTRY(2,mYObj:CPARAMETER,"|") NO-LOCK NO-ERROR.
FIND FIRST sfcf_au_ship OF sfcf_au NO-LOCK NO-ERROR.
FOR LAST comh_corder_version_head NO-LOCK:
ASSIGN
mYObj:cValue = STRING(comh_corder_version_head.covh_received_date) + " " + STRING(comh_corder_version_head.covh_received_time,"HH:MM:SS").
LEAVE.
END.
RETURN ''.
END FUNCTION.
Continue reading...
CLASS JITS.BE.ANDON.DataItems :
CONSTRUCTOR PUBLIC DataItems():
END.
DEFINE PUBLIC VARIABLE cValue AS LONGCHAR NO-UNDO.
DEFINE TEMP-TABLE AlertList NO-UNDO
FIELD Item AS CLASS Progress.Lang.Object.
/* Method for storing alerts against an item instance */
METHOD PUBLIC VOID AddAlerts(INPUT alert AS CLASS JITS.BE.ANDON.Alerts):
CREATE AlertList.
AlertList.Item = alert.
END.
/* Method to retrieve alerts against an instance */
METHOD PUBLIC VOID GetAlerts(OUTPUT TABLE AlertList):
END.
END CLASS.
FUNCTION GETLASTSEQDATETIME RETURNS CHARACTER (INPUT mYObj AS CLASS JITS.BE.ANDON.DataItems):
ASSIGN mYObj:cValue = '99/99/9999 00:00:00'.
FIND FIRST sfcf_au where sfcf_au.assu_id = ENTRY(2,mYObj:CPARAMETER,"|") NO-LOCK NO-ERROR.
FIND FIRST sfcf_au_ship OF sfcf_au NO-LOCK NO-ERROR.
FOR LAST comh_corder_version_head NO-LOCK:
ASSIGN
mYObj:cValue = STRING(comh_corder_version_head.covh_received_date) + " " + STRING(comh_corder_version_head.covh_received_time,"HH:MM:SS").
LEAVE.
END.
RETURN ''.
END FUNCTION.
Continue reading...