AUM41031 ;IHS/ITSC/DMJ - SCB UPDATE 2/18/2004 [ 04/01/2004 11:05 AM ]
Source file <AUM41031.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SUNEW | ;--- ADD NEW SU | |
| E(L) | ;----- | |
| DIK | ;--- KILL ENTRY | |
| LOCMOD | ;--- MOD LOCATION | |
| DIE | ;----- DIE EDIT | |
| GREET | ;----- GREETING/INTRO TEXT | |
| CLINMOD | ; | |
| ADDLOC | ; | |
| FILE | ;--- FILE NEW ENTRY | |
| LOCNEW | ;--- ADD NEW LOCATION | |
| LOCINACT | ;--- INACTIVATE LOCATION | |
| CLINNEW | ;--- ADD NEW CLINIC | |
| SVARS | ;;A,C,E,F,L,M,N,O,P,R,S,T,V,W;Single-character work variables | |
| ADDOK | ;----- "ADDED" MESSAGE | |
| MODOK | ;--- IF MOD OK | |
| AREANEW | ; | |
| RSLT(%) | ; EP- INCREMENTS/UPDATES ^TMP("AUM4103,$J) called here and AUM4103 ; global used to generate the email message sent by ; post-install routine | |
| IXDIC(DIC,DIC0,D,X,DLAYGO) | ||
| ADDCOMM | ; | |
| DASH | ;----- PRT DASH LINE | |
| START | ;EP -- MAIN EP | |
| IEN(X,%,Y) | ; | |
| ADDAREA | ;--- NEW AREA ; PROGRAMMER NOTE: This s/r is required for every patch. | |
| ADDCLIN | ; | |
| COMMMOD | ;--- MOD COMMUNITY | |
| COMMNEW | ;--- ADD COMMUNITY | |
| MES(%) | ;--- ISSUE MESSAGES DURING INSTALL | |
| ADDSU | ; ; PROGRAMMER NOTE: This s/r is required for every patch. | |
| ADDFAIL | ;----- "FAILED" MESSAGE | |
| ADDCNTY | ;--- NEW COUNTY ; PROGRAMMER NOTE: This s/r is required for every patch. | |
| M(%) | ;--- ERROR MESSAGE | |
| SUMOD | ;--- MOD SU | 
| Name | Field # of Occurrence | 
|---|---|
| ^AUM4103 | GREET+3 | 
| CLINMOD^AUM41032 | START+15 | 
| CLINNEW^AUM41032 | START+14 | 
| EDUCNEW^AUM41032 | START+18 | 
| EXAMMOD^AUM41032 | START+13 | 
| EXAMNEW^AUM41032 | START+12 | 
| HFNEW^AUM41032 | START+19 | 
| MEASNEW^AUM41032 | START+20 | 
| PCLASMOD^AUM41032 | START+17 | 
| PCLASNEW^AUM41032 | START+16 | 
| TRIBEMOD^AUM41032 | START+11 | 
| ^AUM4103A | E+1, AREANEW+2, SUNEW+4, SUMOD+4, LOCNEW+4, LOCMOD+4, LOCINACT+2, COMMNEW+4, COMMMOD+4, CLINNEW+4 , CLINMOD+2, CLINMOD+3 | 
| UPDATE^AUM4103A | GREET+1 | 
| $$VAL^AUM4103M | IEN+3 | 
| $$COMMMOD^AUMXPORT | COMMMOD+25 | 
| $$LOCMOD^AUMXPORT | LOCMOD+27 | 
| IX^DIC | IXDIC+6 | 
| FILE^DICN | FILE+4 | 
| ^DIE | DIE+4, CLINMOD+7 | 
| ^DIK | DIK+2 | 
| $$LJ^XLFSTR | ADDAREA+2, ADDSU+2, SUNEW+2, SUNEW+3, ADDCLIN+1 | 
| $$REPEAT^XLFSTR | DASH+2 | 
| $$RJ^XLFSTR | LOCNEW+2, LOCNEW+3, LOCMOD+2, LOCMOD+3, COMMNEW+2, COMMNEW+3 | 
| MES^XPDUTL | MES+2 | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(4 - [#4] | Classic Fileman Calls | 
| ^DIC(40.7 - [#40.7] | Classic Fileman Calls | 
| ^AUTTCOM - [#9999999.05] | Classic Fileman Calls | 
| ^AUTTLOC - [#9999999.06] | Classic Fileman Calls | 
| ^AUTTAREA - [#9999999.21] | Classic Fileman Calls | 
| ^AUTTSU - [#9999999.22] | Classic Fileman Calls | 
| ^AUTTCTY - [#9999999.23] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUTTAREA("B" | ADDAREA+3 | 
| ^AUTTAREA("C" | ADDAREA+4 | 
| ^AUTTCOM("C" | ADDCOMM+2, COMMMOD+6, COMMMOD+8 | 
| ^AUTTCTY("C" | ADDCNTY+3 | 
| ^AUTTLOC - [#9999999.06] | ADDLOC+5, ADDLOC+6, ADDLOC+9, ADDLOC+15, LOCMOD+17 | 
| ^AUTTLOC("C" | ADDLOC+3, ADDLOC+6, ADDLOC+8, LOCMOD+6, LOCMOD+8, LOCINACT+5 | 
| ^AUTTSU("C" | ADDSU+3, SUMOD+6, SUMOD+8 | 
| ^DD(4 | ADDLOC+23 | 
| ^DIC(4 - [#4] | ADDLOC+7, ADDLOC+15 | 
| ^DIC(40.7 - [#40.7] | ADDCLIN+2, CLINMOD+5 | 
| ^TMP("AUM4103" | RSLT+3 | 
| Name | Line Occurrences | 
|---|---|
| $$E | SUNEW+1, SUMOD+1, SUMOD+14, LOCNEW+1, LOCMOD+1, LOCINACT+9, COMMNEW+1, COMMMOD+1, CLINNEW+1 | 
| $$IEN | ADDCNTY+4, ADDSU+4, SUMOD+10, ADDLOC+11, ADDLOC+13, LOCMOD+10, LOCMOD+12, ADDCOMM+3, ADDCOMM+5, ADDCOMM+7 , COMMMOD+10, COMMMOD+12, COMMMOD+14 | 
| $$M | ADDFAIL+1, DIE+3, IEN+23, ADDAREA+3, ADDAREA+4, ADDCNTY+3, ADDSU+3, ADDLOC+4, ADDLOC+5, ADDLOC+7 , ADDLOC+9, ADDLOC+15, ADDLOC+20, ADDLOC+29, LOCMOD+16, LOCMOD+19, ADDCOMM+2, COMMMOD+18, ADDCLIN+2 | 
| @( | ADDAREA+10, ADDCNTY+10, ADDSU+11, ADDLOC+32, ADDCOMM+11 | 
| ADDAREA | IEN+10, AREANEW+2 | 
| ADDCLIN | CLINNEW+4, CLINMOD+6 | 
| ADDCNTY | IEN+20 | 
| ADDCOMM | COMMNEW+4, COMMMOD+8 | 
| ADDFAIL | ADDCLIN+5 | 
| ADDLOC | LOCNEW+4, LOCMOD+8 | 
| ADDOK | ADDLOC+28, ADDCLIN+5 | 
| ADDSU | IEN+15, SUNEW+4, SUMOD+8 | 
| AREANEW | START+3 | 
| COMMMOD | START+10 | 
| COMMNEW | START+9 | 
| DASH | START+3, START+4, START+5, START+6, START+7, START+8, START+9, START+10, START+11, START+12 , START+13, START+14, START+15, START+16, START+17, START+18, START+19, START+20, LOCMOD+23, LOCMOD+27 , COMMMOD+21, COMMMOD+25 | 
| DIE | SUMOD+13, ADDLOC+5, ADDLOC+7, ADDLOC+9, ADDLOC+27, LOCMOD+15, LOCMOD+18, LOCINACT+8, COMMMOD+17 | 
| FILE | ADDAREA+9, ADDCNTY+9, ADDSU+10, ADDLOC+18, ADDLOC+32, ADDCOMM+10, ADDCLIN+5 | 
| GREET | START+2 | 
| LOCINACT | START+8 | 
| LOCMOD | START+7 | 
| LOCNEW | START+6 | 
| MES | RSLT+3 | 
| MODOK | SUMOD+15, LOCMOD+20, COMMMOD+19, CLINMOD+9 | 
| RSLT | GREET+1, GREET+3, ADDOK+1, ADDFAIL+1, DASH+1, DASH+2, DASH+3, DIE+3, IEN+9, IEN+11 , IEN+14, IEN+16, IEN+19, IEN+21, IEN+23, MODOK+1, ADDAREA+3, ADDAREA+4, ADDCNTY+3, ADDSU+3 , SUNEW+1, SUNEW+2, SUNEW+3, SUMOD+1, SUMOD+2, SUMOD+3, SUMOD+14, LOCNEW+1, LOCNEW+2, LOCNEW+3 , ADDLOC+4, ADDLOC+5, ADDLOC+7, ADDLOC+9, ADDLOC+15, ADDLOC+20, ADDLOC+29, LOCMOD+1, LOCMOD+2, LOCMOD+3 , LOCMOD+16, LOCMOD+19, LOCMOD+24, LOCMOD+25, LOCMOD+26, LOCMOD+27, LOCINACT+1, LOCINACT+6, LOCINACT+9, LOCINACT+10 , COMMNEW+1, COMMNEW+2, COMMNEW+3, ADDCOMM+2, COMMMOD+1, COMMMOD+2, COMMMOD+3, COMMMOD+18, COMMMOD+22, COMMMOD+23 , COMMMOD+24, COMMMOD+25, CLINNEW+1, CLINNEW+2, CLINNEW+3, ADDCLIN+2, CLINMOD+8 | 
| SUMOD | START+5 | 
| SUNEW | START+4 | 
| SVARS | START+1, DIE+1, IEN+5, DIK+1, FILE+1, MES+1, IXDIC+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | RSLT+3*, ADDLOC+23 | 
| ^(0 | RSLT+3* | 
| ^(1 | ADDLOC+23 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | GREET+3*, IEN~, IEN+3, IEN+5~, IEN+23, M~, M+1, RSLT~, RSLT+3, MES~ , MES+2, ADDLOC+3*, ADDLOC+4, ADDLOC+5, ADDLOC+6*, ADDLOC+7, ADDLOC+8*, ADDLOC+9, LOCINACT+5*, LOCINACT+6 , LOCINACT+7 | 
| >> A | ADDAREA+2*, ADDAREA+4, ADDAREA+8, ADDCNTY+2*, ADDCNTY+8, ADDSU+2*, ADDSU+3, ADDSU+4, SUMOD+5*, SUMOD+6 , SUMOD+7*, SUMOD+8, SUMOD+9, SUMOD+10, ADDLOC+1*, ADDLOC+2, ADDLOC+3, ADDLOC+4, ADDLOC+6, ADDLOC+8 , ADDLOC+11, ADDLOC+13, LOCMOD+5*, LOCMOD+6, LOCMOD+7*, LOCMOD+8, LOCMOD+9, LOCMOD+10, LOCMOD+12, LOCINACT+3* , LOCINACT+4, LOCINACT+5, LOCINACT+6, ADDCOMM+1*, ADDCOMM+5, ADDCOMM+7, COMMMOD+7*, COMMMOD+9, COMMMOD+12, COMMMOD+14 , ADDCLIN+1*, ADDCLIN+3 | 
| AUMAD | ADDLOC+21~, ADDLOC+22*, ADDLOC+23*, ADDLOC+25 | 
| >> C | ADDAREA+2*, ADDAREA+8, ADDCNTY+2*, ADDCNTY+3, ADDCNTY+8, ADDCOMM+1*, ADDCOMM+2, ADDCOMM+9, COMMMOD+5*, COMMMOD+6 , COMMMOD+7*, COMMMOD+8, COMMMOD+9, COMMMOD+16, ADDCLIN+1*, ADDCLIN+2, ADDCLIN+3, CLINMOD+4*, CLINMOD+5 | 
| D | IXDIC~ | 
| DA | START+1~, DIE+2, DIE+3, DIE+5, SUMOD+12*, ADDLOC+5*, ADDLOC+7*, ADDLOC+9*, ADDLOC+26*, LOCMOD+14* , LOCMOD+17*, LOCINACT+7*, COMMMOD+16*, CLINMOD+5*, CLINMOD+6 | 
| DD | FILE+2! | 
| DIC | START+1~, FILE+5!, IXDIC~, ADDAREA+6*, ADDCNTY+6*, ADDSU+7*, ADDLOC+17*, ADDLOC+31*, ADDCOMM+9*, ADDCLIN+3* | 
| DIC("DR" | ADDAREA+8*, ADDCNTY+8*, ADDSU+9*, ADDLOC+31*, ADDCOMM+9*, ADDCLIN+3*, ADDCLIN+4* | 
| DIC(0 | FILE+3*, IXDIC+3* | 
| DIC0 | IXDIC~, IXDIC+3, IXDIC+4! | 
| DIE | START+1~, DIE+2, DIE+3, DIE+5, SUMOD+12*, ADDLOC+5*, ADDLOC+7*, ADDLOC+9*, ADDLOC+26*, LOCMOD+14* , LOCMOD+17*, LOCINACT+7*, COMMMOD+16*, CLINMOD+7* | 
| DIK | DIK+1~ | 
| DINUM | START+1~, ADDLOC+15*, ADDLOC+16, ADDLOC+19!, ADDLOC+31*, ADDLOC+33! | 
| DLAYGO | START+1~, FILE+5!, IXDIC~, IXDIC+5!, ADDAREA+5*, ADDSU+6*, ADDLOC+17*, ADDLOC+19!, ADDLOC+31*, ADDLOC+33! , ADDCOMM+9*, CLINNEW+5!, ADDCLIN+3* | 
| DO | FILE+2! | 
| DR | START+1~, SUMOD+12*, ADDLOC+5*, ADDLOC+7*, ADDLOC+9*, ADDLOC+26*, LOCMOD+14*, LOCMOD+17*, LOCINACT+7*, COMMMOD+16* , CLINMOD+7* | 
| DT | ADDLOC+5, ADDLOC+9, ADDLOC+26, ADDLOC+31, LOCMOD+14, LOCINACT+7 | 
| >> E | AREANEW+1*, CLINMOD+1*, CLINMOD+8 | 
| >> F | ADDLOC+1*, ADDLOC+2, ADDLOC+3, ADDLOC+4, ADDLOC+6, ADDLOC+8, ADDLOC+26, ADDLOC+31, LOCMOD+5*, LOCMOD+6 , LOCMOD+7*, LOCMOD+8, LOCMOD+9, LOCMOD+14, LOCINACT+3*, LOCINACT+4, LOCINACT+5, LOCINACT+6 | 
| IOM | DASH+2 | 
| L | GREET+2*, ADDOK+1, ADDFAIL+1, E~, IEN+6*, MODOK+1, AREANEW+2*, ADDAREA+2*, ADDCNTY+2*, ADDSU+2* , SUNEW+4*, SUMOD+4*, SUMOD+5*, SUMOD+7*, SUMOD+8*, SUMOD+9*, SUMOD+14, LOCNEW+4*, ADDLOC+1*, ADDLOC+2* , ADDLOC+5, ADDLOC+7, ADDLOC+9, ADDLOC+20, ADDLOC+29, LOCMOD+4*, LOCMOD+5*, LOCMOD+7*, LOCMOD+8*, LOCMOD+9* , LOCMOD+16, LOCMOD+19, LOCINACT+2*, LOCINACT+3*, LOCINACT+4*, LOCINACT+9, LOCINACT+10, COMMNEW+4*, ADDCOMM+1*, COMMMOD+4* , COMMMOD+5*, COMMMOD+7*, COMMMOD+8*, COMMMOD+9*, COMMMOD+18, CLINNEW+4*, ADDCLIN+1*, CLINMOD+2*, CLINMOD+4*, CLINMOD+6* , CLINMOD+8 | 
| L("TO" | SUMOD+4*, SUMOD+7, LOCMOD+4*, LOCMOD+7, LOCMOD+9, LOCMOD+14, COMMMOD+4*, COMMMOD+7, CLINMOD+3*, CLINMOD+4 | 
| >> N | ADDAREA+2*, ADDAREA+3, ADDAREA+7, ADDCNTY+2*, ADDCNTY+7, ADDSU+2*, ADDSU+8, SUMOD+5*, SUMOD+7*, SUMOD+9 , SUMOD+12, ADDLOC+1*, ADDLOC+2, ADDLOC+7, ADDLOC+17, LOCMOD+7*, LOCMOD+9, LOCMOD+17, LOCINACT+3*, LOCINACT+4 , ADDCOMM+1*, ADDCOMM+9, COMMMOD+7*, COMMMOD+9, COMMMOD+16, ADDCLIN+1*, ADDCLIN+3, CLINMOD+4*, CLINMOD+7 | 
| >> O | ADDCOMM+1*, ADDCOMM+2, ADDCOMM+3, COMMMOD+5*, COMMMOD+6, COMMMOD+7*, COMMMOD+8, COMMMOD+9, COMMMOD+10 | 
| >> P | ADDSU+4*, ADDSU+5, ADDSU+9, SUMOD+6*, SUMOD+8*, SUMOD+12, ADDLOC+1*, ADDLOC+2, ADDLOC+9, ADDLOC+26 , ADDLOC+31, LOCMOD+6*, LOCMOD+8*, LOCMOD+14, LOCMOD+17, LOCINACT+3*, LOCINACT+4, COMMMOD+6*, COMMMOD+8*, COMMMOD+16 , ADDCLIN+1*, ADDCLIN+4 | 
| >> P("A" | SUMOD+10*, SUMOD+11, SUMOD+12, ADDLOC+11*, ADDLOC+12, ADDLOC+26, ADDLOC+31, LOCMOD+10*, LOCMOD+11, LOCMOD+14 , ADDCOMM+5*, ADDCOMM+6, ADDCOMM+9, COMMMOD+12*, COMMMOD+13, COMMMOD+16 | 
| >> P("O" | ADDCOMM+3*, ADDCOMM+4, ADDCOMM+9, COMMMOD+10*, COMMMOD+11, COMMMOD+16 | 
| >> P("S" | ADDCNTY+4*, ADDCNTY+5, ADDCNTY+8, ADDLOC+13*, ADDLOC+14, ADDLOC+26, ADDLOC+31, LOCMOD+12*, LOCMOD+13, LOCMOD+14 | 
| >> P("V" | ADDCOMM+7*, ADDCOMM+8, ADDCOMM+9, COMMMOD+14*, COMMMOD+15, COMMMOD+16 | 
| >> R | ADDAREA+2*, ADDAREA+8, ADDCLIN+1*, ADDCLIN+3 | 
| >> S | ADDCNTY+2*, ADDCNTY+3, ADDCNTY+4, ADDSU+2*, ADDSU+3, ADDSU+9, SUMOD+5*, SUMOD+6, SUMOD+7*, SUMOD+8 , SUMOD+9, SUMOD+12, ADDLOC+1*, ADDLOC+2, ADDLOC+3, ADDLOC+4, ADDLOC+6, ADDLOC+8, ADDLOC+13, LOCMOD+5* , LOCMOD+6, LOCMOD+7*, LOCMOD+8, LOCMOD+9, LOCMOD+12, LOCINACT+3*, LOCINACT+4, LOCINACT+5, LOCINACT+6, ADDCOMM+1* , ADDCOMM+2, ADDCOMM+3, COMMMOD+5*, COMMMOD+6, COMMMOD+7*, COMMMOD+8, COMMMOD+9, COMMMOD+10 | 
| >> T | AREANEW+2*, SUNEW+4*, SUMOD+4*, LOCNEW+4*, LOCMOD+4*, LOCINACT+2*, COMMNEW+4*, COMMMOD+4*, CLINNEW+4*, CLINMOD+2* | 
| U | IEN+23, ADDAREA+2, ADDCNTY+2, ADDSU+2, SUMOD+5, SUMOD+7, ADDLOC+1, ADDLOC+5, ADDLOC+6, ADDLOC+7 , ADDLOC+9, ADDLOC+15, ADDLOC+23, LOCMOD+5, LOCMOD+7, LOCMOD+9, LOCMOD+14, LOCMOD+17, LOCINACT+3, ADDCOMM+1 , COMMMOD+5, COMMMOD+7, ADDCLIN+1 | 
| >> V | ADDCOMM+1*, ADDCOMM+7, COMMMOD+7*, COMMMOD+9, COMMMOD+14 | 
| X | IEN~, IEN+2, IEN+3, IEN+7, IEN+8~, IEN+12, IEN+13~, IEN+17, IEN+18~, IEN+23 , IXDIC~, ADDAREA+7*, ADDCNTY+7*, ADDSU+8*, ADDLOC+17*, ADDLOC+31*, ADDCOMM+9*, ADDCLIN+3* | 
| Y | DIE+3*, IEN~, IEN+2*, IEN+3*, IEN+4*, IEN+6, IEN+23, IEN+24, IXDIC+7, ADDAREA+10 , ADDCNTY+10, ADDSU+11, SUMOD+14, ADDLOC+5, ADDLOC+7, ADDLOC+9, ADDLOC+20, ADDLOC+26, ADDLOC+28, ADDLOC+31 , ADDLOC+32, LOCMOD+16, LOCMOD+19, LOCINACT+9, ADDCOMM+11, COMMMOD+18, ADDCLIN+5, CLINMOD+8 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(@L+%+1^AUM4103 | GREET+3 | 
| $T(@L+%^AUM4103 | GREET+3 | 
| $T(@L^AUM4103A | E+1 | 
| $T(AREANEW+T^AUM4103A | AREANEW+2 | 
| $T(CLINMOD+T+1^AUM4103A | CLINMOD+3 | 
| $T(CLINMOD+T^AUM4103A | CLINMOD+2 | 
| $T(CLINNEW+T^AUM4103A | CLINNEW+4 | 
| $T(COMMMOD+T+1^AUM4103A | COMMMOD+4 | 
| $T(COMMMOD+T^AUM4103A | COMMMOD+4 | 
| $T(COMMNEW+T^AUM4103A | COMMNEW+4 | 
| $T(LOCINACT+T^AUM4103A | LOCINACT+2 | 
| $T(LOCMOD+T+1^AUM4103A | LOCMOD+4 | 
| $T(LOCMOD+T^AUM4103A | LOCMOD+4 | 
| $T(LOCNEW+T^AUM4103A | LOCNEW+4 | 
| $T(SUMOD+T+1^AUM4103A | SUMOD+4 | 
| $T(SUMOD+T^AUM4103A | SUMOD+4 | 
| $T(SUNEW+T^AUM4103A | SUNEW+4 | 
| $T(SVARS | START+1~, DIE+1~, IEN+5~, DIK+1~, FILE+1~, MES+1~, IXDIC+2~ | 
| $T(UPDATE^AUM4103A | GREET+1 |