@victor-ligenza
Forum Replies Created
-
AuthorReplies
-
Not sure if I can add a specific solution, but I had experienced a similar experience a nuber of years ago, but my issue occurred every day……
The flood of A08 messages were triggered from Series billing runs. We had modified the update portion of the billing run job stream to send an A08 message when a patient representative code was assigned to an account. These patient representative codes were used by McKesson’s Horizon Business Folder to place accounts in Billing Work Queues. Since the A08’s went out of the same Series pipe that all ADT and Order messages were sent this caused significan delays. We had two work arounds. 1.) change the billing run schedules to run at a time that presented the least impact. 2.) The cloverleaf server was upgraded as part of normal life cycle so the additional horse power helped messages flow faster.
If your Series analyst can identify the job that is generating the A08 messages, there may be the option to turn off the trigger producing them if they are not needed or have it run during an off hours time slot.
This is What I have for our Series to and From Horizon Medical Imaging. It is similar to the prior post. Let me know if you need any additional information.
SI 4 Set ID
CM 75 Alternate Placer Group Number
ST 6 External Lab Location
ST 10 External Lab Chart Number
ST 15 Lab Order Accession Number
ID 2 Lab Administration Site
ID 2 Lab Clinical Processing Site
CM 75 Reflexor Orders Placer ID
CE 200 Panel Order Set Universal Service Identifier
ST 10 Panel Order Set Unique Sequence
We have HOM feeding: McKesson Series
Sunquest Lab
GE Muse
DVI – Dictation Sytem
Will be sending to McKesson Horizon Cardiolgy in the near future as well.
Let me know if you would like further details.
Chrlie,
Here is an example where I had to insert a Patient Name and Account number into a report every 60 lines. This was done to assist in allowing our HPF (Electronic Medical Record) to page break results received from Medcon (Cardiology System).
{ { OP BULKCOPY }
{ ERR 0 }
}
{ { OP COPY }
{ ERR 0 }
{ IN =ORU^R01 }
{ OUT {{0(0).MSH.00009.[0]}} }
}
{ { OP COPY }
{ ERR 0 }
{ IN =R01 }
{ OUT {{0(0).EVN.00099.[0]}} }
}
{ { OP ITERATE }
{ BASIS 0(0).OBX }
{ VAR %s1 }
{ TYPE segment }
{ BODY {
{ { OP COMMENT }
{ COMMENT {TODO: Insert new actions here} }
}
{ { OP ADD }
{ ERR 0 }
{ IN {{$%s2} =1} }
{ OUT {{$%s2}} }
{ FUNCTION ADD }
}
{ { OP COPY }
{ ERR 0 }
{ IN {{$%s2}} }
{ OUT 0(0).OBX(%s2).00569 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00570 }
{ OUT 0(0).OBX(%s2).00570 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00571 }
{ OUT 0(0).OBX(%s2).00571 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00572 }
{ OUT 0(0).OBX(%s2).00572 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00573(0) }
{ OUT 0(0).OBX(%s2).00573(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00574 }
{ OUT 0(0).OBX(%s2).00574 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00575 }
{ OUT 0(0).OBX(%s2).00575 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00576(0) }
{ OUT 0(0).OBX(%s2).00576(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00577 }
{ OUT 0(0).OBX(%s2).00577 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00578(0) }
{ OUT 0(0).OBX(%s2).00578(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00579 }
{ OUT 0(0).OBX(%s2).00579 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00580 }
{ OUT 0(0).OBX(%s2).00580 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00581 }
{ OUT 0(0).OBX(%s2).00581 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00582 }
{ OUT 0(0).OBX(%s2).00582 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00583 }
{ OUT 0(0).OBX(%s2).00583 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00584 }
{ OUT 0(0).OBX(%s2).00584 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00936(0) }
{ OUT 0(0).OBX(%s2).00936(0) }
}
{ { OP IF }
{ ERR 0 }
{ COND {$%s1 == =60 || $%s1 == =120 || $%s1 == =180 || $%s1 == =240} }
{ THENBODY {
{ { OP ADD }
{ ERR 0 }
{ IN {{$%s2} =1} }
{ OUT {{$%s2}} }
{ FUNCTION ADD }
}
{ { OP COMMENT }
{ COMMENT {TODO: Insert new actions here} }
}
{ { OP COPY }
{ ERR 0 }
{ IN {{$%s2}} }
{ OUT 0(0).OBX(%s2).00569 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00570 }
{ OUT 0(0).OBX(%s2).00570 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00571 }
{ OUT 0(0).OBX(%s2).00571 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00572 }
{ OUT 0(0).OBX(%s2).00572 }
}
{ { OP COPY }
{ ERR 0 }
{ IN =%%PAGE }
{ OUT 0(0).OBX(%s2).00573(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00574 }
{ OUT 0(0).OBX(%s2).00574 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00575 }
{ OUT 0(0).OBX(%s2).00575 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00576(0) }
{ OUT 0(0).OBX(%s2).00576(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00577 }
{ OUT 0(0).OBX(%s2).00577 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00578(0) }
{ OUT 0(0).OBX(%s2).00578(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00579 }
{ OUT 0(0).OBX(%s2).00579 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00580 }
{ OUT 0(0).OBX(%s2).00580 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00581 }
{ OUT 0(0).OBX(%s2).00581 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00582 }
{ OUT 0(0).OBX(%s2).00582 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00583 }
{ OUT 0(0).OBX(%s2).00583 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00584 }
{ OUT 0(0).OBX(%s2).00584 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00936(0) }
{ OUT 0(0).OBX(%s2).00936(0) }
}
{ { OP ADD }
{ ERR 0 }
{ IN {{$%s2} =1} }
{ OUT {{$%s2}} }
{ FUNCTION ADD }
}
{ { OP COPY }
{ ERR 0 }
{ IN {{$%s2}} }
{ OUT 0(0).OBX(%s2).00569 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00570 }
{ OUT 0(0).OBX(%s2).00570 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00571 }
{ OUT 0(0).OBX(%s2).00571 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00572 }
{ OUT 0(0).OBX(%s2).00572 }
}
{ { OP COPY }
{ ERR 0 }
{ IN {{=Patient Name:} 0(0).PID.00108(0) @null @null @null @null @null {=Account Number:} 0(0).PID.00121} }
{ OUT 0(0).OBX(%s2).00573(0) }
{ COPYSEP { } }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00574 }
{ OUT 0(0).OBX(%s2).00574 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00575 }
{ OUT 0(0).OBX(%s2).00575 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00576(0) }
{ OUT 0(0).OBX(%s2).00576(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00577 }
{ OUT 0(0).OBX(%s2).00577 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00578(0) }
{ OUT 0(0).OBX(%s2).00578(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00579 }
{ OUT 0(0).OBX(%s2).00579 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00580 }
{ OUT 0(0).OBX(%s2).00580 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00581 }
{ OUT 0(0).OBX(%s2).00581 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00582 }
{ OUT 0(0).OBX(%s2).00582 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00583 }
{ OUT 0(0).OBX(%s2).00583 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00584 }
{ OUT 0(0).OBX(%s2).00584 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00936(0) }
{ OUT 0(0).OBX(%s2).00936(0) }
}
{ { OP ADD }
{ ERR 0 }
{ IN {{$%s2} =1} }
{ OUT {{$%s2}} }
{ FUNCTION ADD }
}
{ { OP COPY }
{ ERR 0 }
{ IN {{$%s2}} }
{ OUT 0(0).OBX(%s2).00569 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00570 }
{ OUT 0(0).OBX(%s2).00570 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00571 }
{ OUT 0(0).OBX(%s2).00571 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00572 }
{ OUT 0(0).OBX(%s2).00572 }
}
{ { OP COPY }
{ ERR 0 }
{ IN @null }
{ OUT 0(0).OBX(%s2).00573(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00574 }
{ OUT 0(0).OBX(%s2).00574 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00575 }
{ OUT 0(0).OBX(%s2).00575 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00576(0) }
{ OUT 0(0).OBX(%s2).00576(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00577 }
{ OUT 0(0).OBX(%s2).00577 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00578(0) }
{ OUT 0(0).OBX(%s2).00578(0) }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00579 }
{ OUT 0(0).OBX(%s2).00579 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00580 }
{ OUT 0(0).OBX(%s2).00580 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00581 }
{ OUT 0(0).OBX(%s2).00581 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00582 }
{ OUT 0(0).OBX(%s2).00582 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00583 }
{ OUT 0(0).OBX(%s2).00583 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00584 }
{ OUT 0(0).OBX(%s2).00584 }
}
{ { OP COPY }
{ ERR 0 }
{ IN 0(0).OBX(%s1).00936(0) }
{ OUT 0(0).OBX(%s2).00936(0) }
}
}}
{ ELSEBODY {
}}
}
}}
}
We use Series and a BAR^P01 is generated whenever a patient abstract is maintained. I know you are on Star, but maybe there is a similar function. Thank you both for the great information. We have successfully implemented using a second NIC with the new IP scheme and are using it for one application. Now we can continue on with our re-IP project in a more modular fashion.
One issue we had to resolve in the engine was to concat the nursing station with the room. You will need to do this if you have the same bed number defined in more than one nursing station. Examples are swing beds or a bed/cart that is defined in multipe units (ER cart 1 NU bed 1). So instead of sending a location of W2^225^1 we send it as ^W2225^1. Extracting the Series pharmacy drug master was a fun little task as well. Then pharmacy had to spend weeks modifing the data for import into HMM.
If I remember anything else, I will post again.
We run Series 2000, PYXIS and HMM.
Thank you Charlie!!!!! I see in your author description you are a clovertech teacher. Can you recommend an education path to bring someone up to speed on tcl.
-
AuthorReplies
