EnsHL7 Ens.InboundAdapter 65157,44165.851705 61592,31859.341221 Name of the Receiving Facility to filter HL7 messages. %String Maximum number of messages to retrieve/send per poll/task. %Integer Time to hang before processing another message, used to manage the throughput. %Integer The number of messages retrieved. %Integer Information to send an alert from the business service if populated. %String Site ID. This is the STATION NUMBER %String %String ReceivingFacilityName, MaxNmbrMsgs, Throttle, SiteID %Status tCurrentTime { set tProcessingTime = tCurrentTime + 86400 - tStartTime } else { set tProcessingTime = tCurrentTime - tStartTime } // If the processing time is greater than the Call Interval // return control to the Service that called the adapter. if (tProcessingTime > ..CallInterval) { set tQuitAll=1 quit } HANG (..Throttle/1000) if (tQuitAll) {quit} } // Close the IEN loop if tQuitAll {quit} } // Close the tQueue loop }While '(tQuitAll) // Close the tLink loop quit $$$OK Trap // We erred out, set the error information and roll back the last transaction. set $ZT="" set tSC=$$$EnsSystemError do ..BusinessHost.SendAlert(##Class(Ens.AlertRequest).%New($LB(..BusinessHost.%ConfigName,"There was an error in the HLOGlobalInbound Adapter: ", tSC))) quit $$$OK ]]> Returns the date/time in FileManFormat 1 pDays:%Integer=0 %String