Implemented ReceiveRelease_API.
Added OI Wizard Webview form to launch into OI Wizard from OI and auto-login the user. Added menu items to NDW_MAIN to launch the OI Wizard webview form and navigated to the appropriate page.
This commit is contained in:
@ -99,6 +99,13 @@ API rds.ID.PUT
|
||||
end api
|
||||
|
||||
|
||||
API rds.ID.zpl.HEAD
|
||||
API rds.ID.zpl.GET
|
||||
|
||||
GoSub CreateZPLItem
|
||||
|
||||
end api
|
||||
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
// Internal GoSubs
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
@ -128,3 +135,29 @@ CreateHALItem:
|
||||
end
|
||||
|
||||
return
|
||||
|
||||
|
||||
//----------------------------------------------------------------------------------------------------------------------
|
||||
// CreateZPLItem
|
||||
//
|
||||
// Creates a HAL+JSON object with the ZPL for the given WM_IN row
|
||||
//----------------------------------------------------------------------------------------------------------------------
|
||||
CreateZPLItem:
|
||||
|
||||
RdsKey = ParentSegment
|
||||
ZPL = Rds_Services('GetRdsZpl', RdsKey)
|
||||
If Error_Services('NoError') then
|
||||
StatusCode = 200
|
||||
HTTP_Services('SetResponseHeaderField', 'Content-Location', FullEndpointURL)
|
||||
HTTP_Services('SetResponseBody', ZPL, False$, 'text/plain')
|
||||
If Assigned(Message) then
|
||||
HTTP_Services('SetResponseStatus', StatusCode, Message)
|
||||
end else
|
||||
HTTP_Services('SetResponseStatus', StatusCode)
|
||||
end
|
||||
end else
|
||||
Message = Error_Services('GetMessage')
|
||||
HTTP_Services('SetResponseStatus', 500, 'Error in the ' : CurrentAPI : ' API. Message: ': Message)
|
||||
end
|
||||
|
||||
return
|
||||
|
||||
Reference in New Issue
Block a user