GMRCIAC2 ;SLC/JFR - FILE IFC ACTIVITIES CONT'D ; Feb 6, 2023@11:28:17
Source file <GMRCIAC2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FILRES(GMRCO,GMRCOBX) | ;file or delete results
|
|
UPDORD(GMRCDA,GMRC40) | ; update CPRS order if action on placer order.
; Input: ; GMRCDA = ien from file 123 ; GMRC40 = ien of activity in 40 multiple |
|
FILEACT(GMRCO,GMRCLAST,GMRCFR,GMRCAR,GMRCCRNR,GMRCROUT) | ;file REQUEST PROCESSING ACTIVITY - P184
; Input: ; GMRCO = ien from file 123 ; GMRCLAST = last action taken on request ; GMRCFR = service that consult was forwarded from ; GMRCAR = name of the array containing the message ; GMRCCRNR = 1 if from Cerner [OPTIONAL] ; GMRCROUT = Routine station [OPTIONAL] |
|
TST(ARRAY) | ;process test message and check item ordered
|
|
GETDA(GMRCORC) | ; determine what local Consult ien to work on
; Input: ; GMRCORC = ORC seg from incoming message ; Output: ; ien from file 123 |
|
DUPACT(GMRCO,ACTVT,ORC,OBX,CRNR,MSGI) | ;check to see if activity is a dup transmission ;MKN added CRNR and MSGI
|
|
APPACK(GMRCO,ACK,ERR,CRNR,MSGID) | ;send application acknowledgement for all cases ;MKN GMRC*3*154 added CRNR and MSGID
|
|
MGMSG(ERR,MSGID) | ;Send message to required mail groups
|
|
SENDMSG(GRP,ERR,ERRTEXT,MSGID) | ; Send a MailMan Message with the errors
|
|
CRNR | ;GMRC CRNR IFC ERRORS;GMRC CRNR IFC TECH ERRORS;GMRC CRNR IFC CLIN ERRORS;GMRC TIER II CRNR IFC ERRORS
|
|
101 | ;1;1;0;1;Unknown Consult/Procedure request
|
|
202 | ;1;0;1;1;Local or Unknown MPI Identifiers
|
|
301 | ;1;0;1;1;Service not Matched to Receiving Facility
|
|
401 | ;1;0;1;1;Procedure not Matched to Receiving Facility
|
|
501 | ;1;0;1;1;Error in Procedure Name
|
|
601 | ;1;0;1;1;Multiple Services Matched to Procedure
|
|
701 | ;1;0;1;1;Error in Service Name
|
|
702 | ;1;0;1;1;Service is Disabled
|
|
703 | ;1;0;1;1;Procedure is Inactive
|
|
801 | ;1;1;0;1;Inappropriate Action for Specified Request
|
|
802 | ;1;0;0;1;Duplicate, activity not filed
|
|
901 | ;1;0;0;1;Unable to Update Record Successfully
|
|
902 | ;1;0;0;1;Earlier Pending Transactions
|
|
903 | ;0;0;0;0;HL Logical Link not Found - will not hit the APPACK API
|
|
904 | ;0;0;0;0;VistA HL7 Unable to Send Transaction - will not hit the APPACK API
|
|
201 | ;0;0;0;0;Unknown Patient - will not hit the APPACK API
|
FileNo | Call Tags |
---|---|
123.02 | WP^DIE |
^XMB(3.8 - [#3.8] | GET1^DIQ |