GMRCIAC2 ;SLC/JFR - FILE IFC ACTIVITIES CONT'D ; Jan 27, 2025@06:02:47
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,GMRCMSG) | ;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
|
|
| 206 | ;0;0;0;0;ICN Missing from Incoming Order
|
|
| 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 |
