| FILE |
55 |
| NAME |
CIMOCLI |
| DESCRIPTION |
This cross reference will be defined during order entry if the clinic is
IMO^PSJIMO1(.CLINICS) API will be called passing by references the array
of clinics added/edited. This API will add/update the CIMOI and CIMOCLI
cross references with any newly added IMO clinic(s).
Additionally, CIMOCLI will be used during order entry to verify whether
the clinic is an IMO clinic.
defined with YES answered for the ADMINISTER INPATIENT MEDS parameter
under the SET UP A CLINIC [SDBUILD] option. These parameters identify the
clinic as an IMO clinic. If at the time of order entry the clinic was not
defined as an IMO clinic, it is not stored in the either the CIMOI or
CIMOCLI cross reference.
When a new IMO clinic is added or an existing clinic is edited using the
CLINIC DEFINTION [PSJ CD] option and it is marked as an IMO clinic, the
|
| SHORT DESCRIPTION |
CIMOCLI - PS(55,CLINIC,PATIENT) |
| TYPE |
REGULAR |
| EXECUTION |
FIELD |
| ACTIVITY |
IR |
| USE |
LOOKUP & SORTING |
| ROOT TYPE |
WHOLE FILE |
| ROOT FILE |
55.01 |
| SET LOGIC |
S ^PS(55,"CIMOCLI",X,DA(1),DA)="" |
| SET CONDITION CODE |
S X=$$CHECK2^PSJIMO1() I X |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 55.01
- FIELD: 136
- COLLATION: forwards
|
| KILL LOGIC |
K ^PS(55,"CIMOCLI",X,DA(1),DA) |
| KILL ENTIRE INDEX CODE |
K ^PS(55,"CIMOCLI") |
