Routine: ALPBCBU

Information

ALPBCBU ;OIFO-DALLAS/SED/KC/MW BCMA-BCBU INPT TO HL7 ;Jan 10, 2024@11:10

Source file <ALPBCBU.m>

Name	Comments	DBIA/ICR reference
IPH(ALPMSG)	;CAPTURE MESSAGE ARRAY FROM PHARMACY
MEDL(ALPML)	;Use this entry to send MedLog messages
NURV(ALDFN,ALPORD)	;Use this entry to send verifying nursing.
PMOV	;Entry Point to send patient movement
ERRLG	;Error Log Message ; Retrieving the Patient's division name to include on the alert
PERR	;Process the error
DECEASED(DFN)	; Patient Deceased? ; Return: 1 (YES) or 0 (NO)

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"PSB BCBU Contingency Error",! Line Location: PERR+1
Function Call: WRITE	Prompt: ?10,$P(XQADATA,U,2)_" / "_$P(XQADATA,U,3) Line Location: PERR+2