©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PXRMOCG ;SLC/PKR - Routines for editing order check groups ;02/17/2012
Source file <PXRMOCG.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| OICAP(IEN) | ;Executable caption for the orderable item selection.
|
|
| KPID(DA,X) | ;Kill logic for Pharmacy Item PID cross-reference.
|
|
| VRULESCR(RULEIEN,DA) | ;Screen for the .01 of the Rule List multiple.
|
|
| GETPINM(VP) | ;Given the variable pointer VP get the pharmacy item name.
|
|
| PIOT(DA,PI) | ;Output transform for pharmacy items.
|
|
| SMANEDIT(IEN,NEW) | ;Invoke the ScreeMan editor for entry IEN.
|
|
| SPID(DA,X) | ;Set logic for Pharmacy Item PID cross-reference.
|
|
| VRULE(RULEIEN,DA) | ;If the rules in a national orderable item group are being
|
|
| OCRCAP(IEN) | ;Executable caption for the reminder order checks rules list
|
|
| VRULEA(RULEIEN,DA) | ;This check is made from the LAYGO node of the Rule
|
|
| PICAP(IEN) | ;Executable caption for the pharmacy item selection.
|
|
| VRULED(DA) | ;This check is made from the DEL node of the Rule List
|
| Name | Field # of Occurrence |
|---|---|
| EN^DDIOL | VRULEA+4, VRULED+5 |
| ^DDS | SMANEDIT+7, SMANEDIT+23 |
| UPDATE^DIE | SMANEDIT+18 |
| $$GET1^DIQ | GETPINM+5 |
| DELETE^PXRMEXFI | SMANEDIT+9 |
| $$GETPINM^PXRMOCG | PIOT+1, PIOT+2, SPID+2 |
| $$PIOT^PXRMOCG | KPID+2 |
| $$VRULE^PXRMOCG | VRULEA+3, VRULED+4, VRULESCR+2 |
| $$FNFR^PXRMUTIL | GETPINM+4 |
| BLDNLIST^PXRMVPTR | GETPINM+6 |
| $$NOW^XLFDT | SMANEDIT+16 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXD(801 - [#801] | KPID+3!, KPID+4!, OICAP+2, OCRCAP+3, PICAP+2, PIOT+3, SPID+3*, SPID+4*, SMANEDIT+3, SMANEDIT+13 , VRULE+11, VRULED+3 |
| ^PXD(801.1 - [#801.1] | VRULE+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADD | VRULEA+2~, VRULEA+3*, VRULEA+4, VRULEA+5 |
| DA | KPID~, KPID+2, KPID+3, KPID+4, PIOT~, PIOT+2, PIOT+3, SPID~, SPID+3, SPID+4 , SMANEDIT+1~, SMANEDIT+6*, SMANEDIT+19!, SMANEDIT+20*, VRULE~, VRULEA~, VRULEA+3, VRULED~, VRULED+3, VRULED+4 , VRULESCR~, VRULESCR+2 |
| DA(1 | KPID+3, KPID+4, PIOT+3, SPID+3, SPID+4, SMANEDIT+20*, VRULE+11, VRULED+3 |
| >> DDS | PIOT+1, VRULE+13, VRULE+14, VRULE+16 |
| DDSCHANG | SMANEDIT+1~, SMANEDIT+11 |
| DDSFILE | SMANEDIT+1~, SMANEDIT+2*, SMANEDIT+19!, SMANEDIT+21* |
| DDSFILE(1 | SMANEDIT+21* |
| DDSPARM | SMANEDIT+1~, SMANEDIT+2* |
| DDSSAVE | SMANEDIT+1~, SMANEDIT+9 |
| >> DIUTIL | VRULE+7 |
| DR | SMANEDIT+1~, SMANEDIT+5*, SMANEDIT+22* |
| DUZ | SMANEDIT+17 |
| FDA | SMANEDIT+14~ |
| FDA( | SMANEDIT+16*, SMANEDIT+17* |
| FDAIEN | SMANEDIT+14~ |
| FDAIEN(1 | SMANEDIT+20 |
| FNUM | GETPINM+1~, GETPINM+4*, GETPINM+5, GETPINM+7, SPID+1~ |
| FORMNAME | VRULE+10~, VRULE+16*, VRULE+17 |
| IEN | GETPINM+1~, GETPINM+2*, GETPINM+5, OICAP~, OICAP+2, OCRCAP~, OCRCAP+3, PICAP~, PICAP+2, SPID+1~ , SMANEDIT~, SMANEDIT+3, SMANEDIT+6, SMANEDIT+9, SMANEDIT+13, SMANEDIT+15, SMANEDIT+20 |
| IENS | SMANEDIT+14~, SMANEDIT+15*, SMANEDIT+16, SMANEDIT+17 |
| MSG | SMANEDIT+14~ |
| NAME | GETPINM+1~, GETPINM+5*, GETPINM+8, KPID+1~, KPID+2*, KPID+3, SPID+1~, SPID+2*, SPID+3, SPID+4 |
| NEW | SMANEDIT~, SMANEDIT+9 |
| NODEL | VRULED+2~, VRULED+4*, VRULED+5, VRULED+6 |
| NUM | OICAP+1~, OICAP+2*, OICAP+3, OCRCAP+2~, OCRCAP+3*, OCRCAP+4, PICAP+1~, PICAP+2*, PICAP+3 |
| OIGCLASS | SMANEDIT+1~, SMANEDIT+3*, SMANEDIT+4, VRULE+10~, VRULE+11*, VRULE+12 |
| PI | PIOT~, PIOT+1, PIOT+2 |
| PREFIX | GETPINM+1~, GETPINM+7*, GETPINM+8, SPID+1~ |
| >> PXRMEXCH | VRULE+9 |
| >> PXRMINST | SMANEDIT+4, VRULE+5 |
| RESTRICT | SMANEDIT+1~, SMANEDIT+4*, SMANEDIT+5, VRULE+10~, VRULE+13*, VRULE+17*, VRULE+18, VRULE+20 |
| ROOT | GETPINM+1~, GETPINM+3*, GETPINM+4, SPID+1~ |
| RULECLASS | VRULE+10~, VRULE+19*, VRULE+20 |
| RULEIEN | VRULE~, VRULE+19, VRULEA~, VRULEA+3, VRULED+2~, VRULED+3*, VRULED+4, VRULESCR~, VRULESCR+2 |
| U | GETPINM+3, GETPINM+7, OICAP+2, OCRCAP+3, PICAP+2, SMANEDIT+3, VRULE+11, VRULE+16, VRULE+19, VRULED+3 |
| VALID | VRULESCR+1~, VRULESCR+2*, VRULESCR+3 |
| VP | GETPINM~, GETPINM+2, GETPINM+3 |
| VPL | GETPINM+1~, GETPINM+6, SPID+1~ |
| VPL( | GETPINM+7 |
| X | KPID~, KPID+2, SPID~, SPID+2 |