ORY195 ;SLCOIFO - Pre and Post-init for patch OR*3*195 [10/4/04 7:21am] ; [1/20/05 9:26am]
Source file <ORY195.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; initiate pre-init processes
|
|
| MAGRPC1 | ; Register Imaging RPC if MAG*3.0*7 present (DBIA 4526)
|
|
| SCH | ; -- Adjust admin schedule Help Msg for Non-Std Schedules
|
|
| MAGRPC2 | ; Register Imaging RPCS if MAG*3.0*37 installed (DBIA 4528/4530)
|
|
| INSERT(OPTION,RPC) | ; Call FM Updater with each RPC
; Input -- OPTION Option file (#19) Name field (#.01) ; RPC RPC sub-file (#19.05) RPC field (#.01) ; Output -- None |
|
| SETIMO | ; Create "CLINIC MEDICATIONS" display group
|
|
| GNRPCS | ;
|
|
| PARVAL | ;add Clin. Meds display group to SEQUENCE parameter
|
|
| STUFDTRG | ; Stuff existing date ranges into new parameters for CS and PCE.
|
|
| VERSION | ;;25.28
|
|
| LINE(DATA) | ; set text into array
|
|
| SURGREG | ; Register TIU SURGERY RPCs if TIU*1.0*112 present
|
|
| ; send bulletin of installation time
|
||
| POST | ; initiate post-init processes
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | SETIMO+6, SETIMO+8, SETIMO+9, SETIMO+19 |
| ^DIE | SETIMO+14 |
| UPDATE^DIE | INSERT+7 |
| ^DIK | PRE+7, PRE+10, PRE+13, PRE+16 |
| Q^ORY195A | POST+10 |
| $$FMTE^XLFDT | MAIL+9 |
| $$NOW^XLFDT | MAIL+9 |
| ^XMD | MAIL+11 |
| $$GET^XPAR | STUFDTRG+18, STUFDTRG+20 |
| EN^XPAR | STUFDTRG+24, STUFDTRG+25, STUFDTRG+35, STUFDTRG+45, STUFDTRG+63, STUFDTRG+78, STUFDTRG+94, STUFDTRG+109 |
| ENVAL^XPAR | STUFDTRG+52, STUFDTRG+83 |
| NDEL^XPAR | STUFDTRG+12, STUFDTRG+13, STUFDTRG+14, STUFDTRG+15, STUFDTRG+60, STUFDTRG+75, STUFDTRG+91, STUFDTRG+106 |
| PUT^XPAR | PARVAL+4 |
| $$PATCH^XPDUTL | POST+2, POST+3, POST+4, POST+5 |
| FileNo | Call Tags |
|---|---|
| ^ORD(100.98 - [#100.98] | Classic Fileman Calls |
| ^XTV(8989.52 - [#8989.52] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(9.4 - [#9.4] | SCH+6 |
| ^ORD(100.98 - [#100.98] | SETIMO+7*, SETIMO+16, SETIMO+17, PARVAL+2, PARVAL+3, SCH+3, SCH+4 |
| ^ORD(101.41 - [#101.41] | SCH+2, SCH+7, SCH+8, SCH+9, SCH+10* |
| ^XTV(8989.52 - [#8989.52] | PRE+6, PRE+9, PRE+12, PRE+15 |
| Name | Line Occurrences |
|---|---|
| GNRPCS | POST+3 |
| INSERT | SURGREG+3, GNRPCS+3, MAGRPC1+1, MAGRPC2+1, MAGRPC2+2 |
| LINE | MAIL+7, MAIL+8, MAIL+9 |
| MAGRPC1 | POST+4 |
| MAGRPC2 | POST+5 |
| POST+9 | |
| PARVAL | POST+7 |
| SETIMO | POST+6 |
| STUFDTRG | POST+8 |
| SURGREG | POST+2 |
| VERSION | MAIL+3, MAIL+6 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SETIMO+17* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNT | MAIL+1~, MAIL+2*, LINE+1*, LINE+2 |
| DA | PRE+4~, PRE+6*, PRE+7, PRE+9*, PRE+10, PRE+12*, PRE+13, PRE+15*, PRE+16, SETIMO+12~ , SETIMO+13* |
| DA(1 | SETIMO+16*, SETIMO+17, SETIMO+18 |
| DATA | LINE~, LINE+2 |
| DG | SCH+1~ |
| DG( | SCH+3*, SCH+4*, SCH+8 |
| DIC | SETIMO+4~, SETIMO+5*, SETIMO+18* |
| DIC(0 | SETIMO+5*, SETIMO+8*, SETIMO+9*, SETIMO+18* |
| DIE | SETIMO+12~, SETIMO+13* |
| DIERR | INSERT+4~ |
| DIFROM | MAIL+1~ |
| DIK | PRE+4~, PRE+7*, PRE+10*, PRE+13*, PRE+16* |
| DLAYGO | SETIMO+15~, SETIMO+18* |
| DLG | SETIMO+1~, SETIMO+2*, SCH+1~, SCH+7*, SCH+8, SCH+9, SCH+10 |
| DR | SETIMO+12~, SETIMO+13* |
| DUZ | MAIL+4 |
| ERR | INSERT+4~ |
| FDA | INSERT+4~ |
| FDA( | INSERT+6* |
| FDA(19 | INSERT+5* |
| FDAIEN | INSERT+4~ |
| I | MAIL+1~, MAIL+4*, SCH+1~, SCH+3*, SCH+4*, GNRPCS+1~, GNRPCS+3* |
| IEN | SETIMO+1~, SETIMO+2*, SETIMO+10*, SETIMO+11, SETIMO+13 |
| IPKG | SCH+1~, SCH+6*, SCH+7 |
| MENU | SURGREG+1~, SURGREG+2*, SURGREG+3, GNRPCS+1~, GNRPCS+2*, GNRPCS+3 |
| NDATA | SETIMO+1~, SETIMO+2*, SETIMO+3*, SETIMO+5, SETIMO+7 |
| OPTION | INSERT~, INSERT+5 |
| OR0 | SCH+1~, SCH+8* |
| ORBE | STUFDTRG+7~, STUFDTRG+49*, STUFDTRG+54*, STUFDTRG+55, STUFDTRG+56, STUFDTRG+57, STUFDTRG+81*, STUFDTRG+85*, STUFDTRG+86, STUFDTRG+87 , STUFDTRG+88 |
| ORBX | STUFDTRG+7~, STUFDTRG+49*, STUFDTRG+54*, STUFDTRG+81*, STUFDTRG+85* |
| ORBZ | STUFDTRG+7~, STUFDTRG+49*, STUFDTRG+55*, STUFDTRG+56, STUFDTRG+81*, STUFDTRG+86*, STUFDTRG+87 |
| ORDUZ | STUFDTRG+7~, STUFDTRG+49*, STUFDTRG+56*, STUFDTRG+60, STUFDTRG+63, STUFDTRG+75, STUFDTRG+78, STUFDTRG+81*, STUFDTRG+87*, STUFDTRG+91 , STUFDTRG+94, STUFDTRG+106, STUFDTRG+109 |
| ORERR | STUFDTRG+7~, STUFDTRG+12, STUFDTRG+13, STUFDTRG+14, STUFDTRG+15, STUFDTRG+49*, STUFDTRG+52, STUFDTRG+53, STUFDTRG+60, STUFDTRG+75 , STUFDTRG+81*, STUFDTRG+83, STUFDTRG+84, STUFDTRG+91, STUFDTRG+106 |
| ORLST | STUFDTRG+7~, STUFDTRG+49*, STUFDTRG+52, STUFDTRG+53, STUFDTRG+54, STUFDTRG+81*, STUFDTRG+83, STUFDTRG+84, STUFDTRG+85 |
| ORLST( | STUFDTRG+54, STUFDTRG+57, STUFDTRG+85, STUFDTRG+88 |
| ORNEG | STUFDTRG+7~, STUFDTRG+28*, STUFDTRG+31*, STUFDTRG+34, STUFDTRG+38*, STUFDTRG+41*, STUFDTRG+44, STUFDTRG+49*, STUFDTRG+66*, STUFDTRG+69* , STUFDTRG+72, STUFDTRG+81*, STUFDTRG+97*, STUFDTRG+100*, STUFDTRG+103 |
| ORSTART | STUFDTRG+7~, STUFDTRG+18*, STUFDTRG+19*, STUFDTRG+24, STUFDTRG+28 |
| ORSTOP | STUFDTRG+7~, STUFDTRG+20*, STUFDTRG+21*, STUFDTRG+25, STUFDTRG+38, STUFDTRG+45 |
| ORVAL | STUFDTRG+7~, STUFDTRG+28*, STUFDTRG+29*, STUFDTRG+30*, STUFDTRG+31*, STUFDTRG+32*, STUFDTRG+33*, STUFDTRG+34*, STUFDTRG+35, STUFDTRG+38* , STUFDTRG+39*, STUFDTRG+40*, STUFDTRG+41*, STUFDTRG+42*, STUFDTRG+43*, STUFDTRG+44*, STUFDTRG+49*, STUFDTRG+57*, STUFDTRG+63, STUFDTRG+67* , STUFDTRG+68*, STUFDTRG+69*, STUFDTRG+70*, STUFDTRG+71*, STUFDTRG+72*, STUFDTRG+78, STUFDTRG+81*, STUFDTRG+88*, STUFDTRG+94, STUFDTRG+98* , STUFDTRG+99*, STUFDTRG+100*, STUFDTRG+101*, STUFDTRG+102*, STUFDTRG+103*, STUFDTRG+109 |
| PKG | SCH+1~, SCH+5*, SCH+6 |
| PRMT | SCH+1~, SCH+9*, SCH+10 |
| RPC | SURGREG+1~, SURGREG+3*, INSERT~, INSERT+6 |
| SCH | SCH+1~, SCH+2*, SCH+9 |
| START | MAIL+1~ |
| TEXT | MAIL+1~ |
| TEXT( | LINE+2* |
| U | SETIMO+5, SCH+8 |
| X | MAIL+6*, MAIL+7, SETIMO+1~, SETIMO+2*, SETIMO+5*, SETIMO+19*, PARVAL+1~, PARVAL+3*, PARVAL+4, SCH+3* , SCH+4* |
| XMDUZ | MAIL+1~, MAIL+2* |
| XMSUB | MAIL+1~, MAIL+3* |
| XMTEXT | MAIL+1~, MAIL+2* |
| XMY | MAIL+1~ |
| XMY( | MAIL+4* |
| Y | SETIMO+7, SETIMO+8, SETIMO+10, SETIMO+20! |
| Name | Field # of Occurrence |
|---|---|
| $T(VERSION | MAIL+3, MAIL+6 |