BJPC1EC1 ; IHS/CMI/LAB - PCC Suite v1.0 patch 1 environment check [ 04/10/2008 9:01 AM ]
Source file <BJPC1EC1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| WRITEMSG | ; | |
| ASTRIGET | ; | |
| GETRECIP | ; | |
| HASFH(P,I,N) | ; | |
| MOVEFH | ;move Family History problem entries to fh | |
| HASASHF(V,I) | ; | |
| ASTRIGPM | ; | |
| OPTIONS | ; | |
| PRE | ; | |
| NEXT | ; | |
| CLINNEW | ;;H. NEW CLINIC CODES (SECTION XIX): CODE^NAME^ABBRV^PRIMARY CARE CLINIC^1A WORKLOAD | |
| IMES | ; | |
| INSTALLD(BJPCSTAL) | ;EP - Determine if patch BJPCSTAL was installed, where ; APCLSTAL is the name of the INSTALL. E.g "AG*6.0*11". | |
| HASASAMP(V,I) | ;is there a v patient ed of ASM-SMP? | |
| DELAST | ; | |
| AS | ;get rid of FEV1, FV1P | |
| POST | ; | |
| ASAMP | ; | |
| HASASME(V,I) | ;is there a v MEASUREMENT I? | |
| ASTRIGDM | ; | |
| ASMEAPEF | ; | |
| SENDER | ||
| ASMEAFEF | ; | |
| SORRY(X) | ; | |
| ASMEAFEV | ; | |
| SUBJECT | 
| Name | Field # of Occurrence | 
|---|---|
| HOME^%ZIS | DELAST+20 | 
| ^APCDALVR | ASAMP+13, ASTRIGET+12, ASTRIGPM+12, ASTRIGDM+12, ASMEAPEF+13, ASMEAFEF+13, ASMEAFEV+14 | 
| ^BJPC1ECA | DELAST+16 | 
| ^BJPCTX | DELAST+15 | 
| ^DIC | INSTALLD+9, INSTALLD+12 | 
| IX^DIC | INSTALLD+6 | 
| FILE^DICN | POST+6, MOVEFH+17 | 
| DT^DICRW | DELAST+20 | 
| ^DIE | AS+11, POST+12, DELAST+7, DELAST+9, DELAST+11, DELAST+13, DELAST+18 | 
| ^DIK | PRE+1, PRE+2, PRE+3, AS+2, AS+3, AS+4, DELAST+2, DELAST+3 | 
| $$CJ^XLFSTR | BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, IMES+1, SORRY+4 | 
| ^XMD | SENDER+3 | 
| $$ADD^XPDMENU | OPTIONS+1, OPTIONS+3 | 
| MES^XPDUTL | BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, MOVEFH+18, IMES+1 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls | 
| ^DIC(9.4 - [#9.4] | Classic Fileman Calls | 
| ^AUPNVMSR - [#9000010.01] | Classic Fileman Calls | 
| ^AUPNFH - [#9000014] | Classic Fileman Calls | 
| ^APCDTKW - [#9001001] | Classic Fileman Calls | 
| ^APCDSTGC - [#9001002.8] | Classic Fileman Calls | 
| ^APCLCNTL - [#9001003] | Classic Fileman Calls | 
| ^APCLVSTS - [#9001003.7] | Classic Fileman Calls | 
| ^APCLDMTX - [#9001004.2] | Classic Fileman Calls | 
| ^APCHSURV - [#9001018] | Classic Fileman Calls | 
| ^AUTTMSR - [#9999999.07] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^APCDSTGC("B" | DELAST+17 | 
| ^APCDTKW("B" | AS+4, DELAST+2, DELAST+3 | 
| ^APCHSURV - [#9001018] | AS+6, AS+7, AS+8, AS+9* | 
| ^APCHSURV("B" | AS+10, DELAST+6, DELAST+8, DELAST+10, DELAST+12 | 
| ^APCLCNTL - [#9001003] | PRE+1 | 
| ^APCLDMTX - [#9001004.2] | PRE+3 | 
| ^APCLPDES - [#9001004.5] | WRITEMSG+3 | 
| ^APCLPDES("B" | WRITEMSG+1 | 
| ^AUPNFH - [#9000014] | NEXT+2*, HASFH+3, HASFH+4 | 
| ^AUPNFH("AC" | HASFH+2 | 
| ^AUPNPROB - [#9000011] | MOVEFH+2, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14 | 
| ^AUPNPROB(1 | MOVEFH+14 | 
| ^AUPNVAST - [#9000010.41] | ASAMP+4, ASAMP+5, ASAMP+6, ASAMP+7, ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+4, ASTRIGET+5, ASTRIGET+6 , ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+4, ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+4 , ASTRIGDM+5, ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11, ASTRIGDM+13, ASMEAPEF+4, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11 , ASMEAPEF+12, ASMEAPEF+14, ASMEAFEF+4, ASMEAFEF+5, ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+5 , ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12, ASMEAFEV+13, ASMEAFEV+15 | 
| ^AUPNVHF - [#9000010.23] | HASASHF+3 | 
| ^AUPNVHF("AD" | HASASHF+2 | 
| ^AUPNVMSR - [#9000010.01] | HASASME+3 | 
| ^AUPNVMSR("AD" | HASASME+2 | 
| ^AUPNVMSR("B" | AS+2 | 
| ^AUPNVPED - [#9000010.16] | HASASAMP+3 | 
| ^AUPNVPED("AD" | HASASAMP+2 | 
| ^AUTTEDT("C" | ASAMP+2 | 
| ^AUTTHF("B" | ASTRIGET+2, ASTRIGPM+2, ASTRIGDM+2 | 
| ^AUTTMSR("B" | AS+1, ASMEAPEF+2, ASMEAFEF+2, ASMEAFEV+3 | 
| ^DIC(40.7 - [#40.7] | POST+3 | 
| ^DIC(9.4 - [#9.4] | BJPC1EC1+15 | 
| ^TMP($J | DELAST+23!, SENDER+4!, WRITEMSG+3* | 
| ^XUSEC( | GETRECIP+4 | 
| Name | Line Occurrences | 
|---|---|
| $$HASASAMP | ASAMP+7 | 
| $$HASASHF | ASTRIGET+6, ASTRIGPM+6, ASTRIGDM+6 | 
| $$HASASME | ASMEAPEF+6, ASMEAFEF+6, ASMEAFEV+7 | 
| $$HASFH | MOVEFH+10 | 
| $$INSTALLD | BJPC1EC1+8, BJPC1EC1+9, BJPC1EC1+10, BJPC1EC1+11, BJPC1EC1+12, BJPC1EC1+13, BJPC1EC1+14 | 
| ASMEAFEF | ASMEAPEF+3 | 
| ASMEAFEV | ASMEAFEF+3 | 
| ASMEAPEF | ASTRIGDM+3 | 
| ASTRIGDM | ASTRIGPM+3 | 
| ASTRIGET | ASAMP+3 | 
| ASTRIGPM | ASTRIGET+3 | 
| GETRECIP | DELAST+24 | 
| IMES | INSTALLD+7, INSTALLD+10, INSTALLD+14 | 
| NEXT | ASMEAFEV+1, ASMEAFEV+4 | 
| SORRY | BJPC1EC1+8, BJPC1EC1+9, BJPC1EC1+10, BJPC1EC1+11, BJPC1EC1+12, BJPC1EC1+13, BJPC1EC1+14, BJPC1EC1+15 | 
| WRITEMSG | DELAST+24 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| APCDALVR | ASAMP+8!, ASAMP+15!, ASTRIGET+7!, ASTRIGET+14!, ASTRIGPM+7!, ASTRIGPM+14!, ASTRIGDM+7!, ASTRIGDM+14!, ASMEAPEF+7!, ASMEAPEF+15! , ASMEAFEF+7!, ASMEAFEF+15!, ASMEAFEV+8!, ASMEAFEV+16! | 
| APCDALVR("APCDAFLG" | ASAMP+14, ASTRIGET+13, ASTRIGPM+13, ASTRIGDM+13, ASMEAPEF+14, ASMEAFEF+14, ASMEAFEV+15 | 
| APCDALVR("APCDATMP" | ASAMP+10*, ASTRIGET+8*, ASTRIGPM+8*, ASTRIGDM+8*, ASMEAPEF+8*, ASMEAFEF+8*, ASMEAFEV+9* | 
| APCDALVR("APCDPAT" | ASAMP+12*, ASTRIGET+11*, ASTRIGPM+11*, ASTRIGDM+11*, ASMEAPEF+12*, ASMEAFEF+12*, ASMEAFEV+13* | 
| APCDALVR("APCDTHF" | ASTRIGET+9*, ASTRIGPM+9*, ASTRIGDM+9* | 
| APCDALVR("APCDTTOP" | ASAMP+11* | 
| APCDALVR("APCDTTYP" | ASMEAPEF+9*, ASMEAFEF+9*, ASMEAFEV+10* | 
| APCDALVR("APCDTVAL" | ASMEAPEF+10*, ASMEAFEF+10*, ASMEAFEV+11* | 
| APCDALVR("APCDVSIT" | ASAMP+9*, ASTRIGET+10*, ASTRIGPM+10*, ASTRIGDM+10*, ASMEAPEF+11*, ASMEAFEF+11*, ASMEAFEV+12* | 
| >> BJPCDA | AS+2* | 
| >> BJPCIEN | ASAMP+2*, ASAMP+3, ASAMP+7, ASAMP+11, ASTRIGET+2*, ASTRIGET+3, ASTRIGET+6, ASTRIGET+9, ASTRIGPM+2*, ASTRIGPM+3 , ASTRIGPM+6, ASTRIGPM+9, ASTRIGDM+2*, ASTRIGDM+3, ASTRIGDM+6, ASTRIGDM+9, ASMEAPEF+2*, ASMEAPEF+3, ASMEAPEF+6, ASMEAPEF+9 , ASMEAFEF+2*, ASMEAFEF+3, ASMEAFEF+6, ASMEAFEF+9, ASMEAFEV+3*, ASMEAFEV+4, ASMEAFEV+7, ASMEAFEV+10 | 
| BJPCKEY | SENDER+4!, GETRECIP+3*, GETRECIP+4 | 
| >> BJPCM | AS+1*, AS+2, AS+3, AS+4* | 
| >> BJPCMR | AS+1*, AS+4* | 
| BJPCSTAL | INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1 | 
| >> BJPCX | PRE+1*, PRE+3*, AS+6*, AS+7, AS+8, AS+9, ASAMP+4*, ASAMP+5, ASAMP+6, ASAMP+7 , ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+4*, ASTRIGET+5, ASTRIGET+6, ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+4* , ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+4*, ASTRIGDM+5, ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11 , ASTRIGDM+13, ASMEAPEF+4*, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11, ASMEAPEF+12, ASMEAPEF+14, ASMEAFEF+4*, ASMEAFEF+5 , ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+5*, ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12 , ASMEAFEV+13, ASMEAFEV+15, NEXT+2*, MOVEFH+2*, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14, MOVEFH+18 | 
| BJPCY | INSTALLD+3~, INSTALLD+13*, INSTALLD+15 | 
| >> CTR | GETRECIP+2*, GETRECIP+4* | 
| >> D | INSTALLD+5* | 
| D0 | POST+5!, MOVEFH+16! | 
| DA | PRE+1*, PRE+2*, PRE+3*, AS+2*, AS+3*, AS+4*, AS+10*, AS+11!, POST+2~, POST+3* , POST+8*, POST+10, POST+14!, DELAST+2*, DELAST+3*, DELAST+6*, DELAST+7!, DELAST+8*, DELAST+9!, DELAST+10* , DELAST+11!, DELAST+12*, DELAST+13!, DELAST+17*, DELAST+18! | 
| DD | POST+5!, MOVEFH+16! | 
| DIADD | MOVEFH+13*, MOVEFH+18!, MOVEFH+19! | 
| DIC | POST+2~, POST+4*, POST+9!, MOVEFH+11*, MOVEFH+18!, MOVEFH+19!, INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11* | 
| DIC("DR" | MOVEFH+14* | 
| DIC(0 | POST+4*, MOVEFH+15*, INSTALLD+5* | 
| DIE | AS+11*!, POST+2~, POST+11*, POST+14!, DELAST+7*!, DELAST+9*!, DELAST+11*!, DELAST+13*!, DELAST+18*! | 
| DIFQ | SORRY+1! | 
| DIFROM | DELAST+22~ | 
| >> DIK | PRE+1*, PRE+2*, PRE+3*, AS+2*, AS+3*, AS+4*, DELAST+2*, DELAST+3* | 
| DLAYGO | POST+4*, POST+9!, MOVEFH+12*, MOVEFH+18!, MOVEFH+19! | 
| DO | POST+5!, MOVEFH+16! | 
| DR | AS+11*, POST+2~, POST+11*, POST+14!, DELAST+7*!, DELAST+9*!, DELAST+11*!, DELAST+13*!, DELAST+18* | 
| DUZ | SENDER+1 | 
| I | HASASAMP~, HASASAMP+3, HASASHF~, HASASHF+3, HASASME~, HASASME+3, HASFH~, HASFH+4 | 
| IOM | BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, IMES+1, SORRY+4 | 
| IOST | SENDER+2 | 
| N | MOVEFH+9*, MOVEFH+10, MOVEFH+14, HASFH~, HASFH+4 | 
| P | MOVEFH+5*, MOVEFH+6, MOVEFH+10, MOVEFH+14, HASFH~, HASFH+2 | 
| U | AS+7, AS+8, AS+9, ASAMP+5, ASAMP+6, ASAMP+7, ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+5 , ASTRIGET+6, ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+5 , ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11, ASTRIGDM+13, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11, ASMEAPEF+12, ASMEAPEF+14 , ASMEAFEF+5, ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12 , ASMEAFEV+13, ASMEAFEV+15, NEXT+2, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14, HASASAMP+3, HASASHF+3 , HASASME+3, HASFH+4 | 
| V | HASASAMP~, HASASAMP+2, HASASHF~, HASASHF+2, HASASME~, HASASME+2 | 
| X | BJPC1EC1+7*, POST+4*, OPTIONS+1*, OPTIONS+2, OPTIONS+3*, OPTIONS+4, MOVEFH+7*, MOVEFH+8, MOVEFH+10, WRITEMSG+1* , WRITEMSG+2, WRITEMSG+3, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3, HASASAMP+1~ , HASASAMP+2*, HASASAMP+3, HASASHF+1~, HASASHF+2*, HASASHF+3, HASASME+1~, HASASME+2*, HASASME+3, HASFH+1~, HASFH+2* , HASFH+3, HASFH+4 | 
| XMDUZ | DELAST+22~, SENDER* | 
| XMSUB | DELAST+22~, SUBJECT* | 
| XMTEXT | DELAST+22~, SENDER+1* | 
| XMY | DELAST+22~ | 
| XMY( | SENDER+1*, GETRECIP+4* | 
| XMY(1 | SENDER+1* | 
| >> XPDDIQ( | BJPC1EC1+7* | 
| >> XPDDIQ("XPZ1" | BJPC1EC1+6* | 
| >> XPDDIQ("XPZ2" | BJPC1EC1+6* | 
| >> XPDENV | BJPC1EC1+6 | 
| >> XPDQUIT | SORRY+2*, SORRY+3* | 
| Y | POST+7, POST+8, POST+9!, POST+13, MOVEFH+18, WRITEMSG+3*, GETRECIP+4*, INSTALLD+3~, INSTALLD+7, INSTALLD+8 , INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, HASASAMP+1~, HASASHF+1~, HASASME+1~, HASFH+1~ | 
| Z | HASASAMP+1~, HASASAMP+2*, HASASAMP+3*, HASASAMP+5, HASASHF+1~, HASASHF+2*, HASASHF+3*, HASASHF+5, HASASME+1~, HASASME+2* , HASASME+3*, HASASME+5, HASFH+1~, HASFH+2*, HASFH+4*, HASFH+6 |