GMRCYP15 ;SLC/JFR-- CONVERT PROCEDURES FROM 101 TO 123.3; 3/08/01 22:00
Source file <GMRCYP15.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SERVS(PROC,PROT) | ;get related servisces from 123.5 and move to 123.3 | |
| CVT4(PCL) | ;convert field 4 from 101 to 123.3 ; PCL = pointer to file 101 | |
| EN | ;called from post-install of GMRC*3*15 | |
| NWMAL | ;make post-install message new | |
| CVTPRO(PROT) | ;move protocol entry to 123.3 | |
| CVTOIS | ;loop through ORD ITEMS  in S.PROC x-ref | |
| CHK123 | ;loop 123 and check field 4 to make sure it's converted | |
| CNVT(IEN) | ;move it from 101.43 to 123.3 | |
| SYN(OITM,PROC) | ;get any synonyms from 101.43 and update 123.3 | |
| CVT123 | ; loop through file 123 and convert field #4 and #13 | |
| CK10143 | ;loop thru S.PROC x-ref in 101.43 and check for complete conv | |
| ; check conversion and send mail to installer | ||
| OKTOGO(NAME,NUM) | ;OK to move from 101.43 to 123.3? | 
| Name | Field # of Occurrence | 
|---|---|
| ^%ZTLOAD | MAIL+18 | 
| ^DIC | CNVT+5, SYN+7, SERVS+6, CVTPRO+6 | 
| $$FIND1^DIC | CVT123+5, CVT123+6 | 
| ^DIE | CNVT+9, CVTPRO+9 | 
| $$ID^ORDD43 | CVTOIS+13 | 
| $$FMADD^XLFDT | CVTOIS+4, MAIL+16 | 
| $$NOW^XLFDT | CVTOIS+4, CVTOIS+5, MAIL+16 | 
| $$UP^XLFSTR | CNVT+4, CVTPRO+5 | 
| MAKENEW^XMXUTIL | NWMAL+3 | 
| $$GET^XPAR | EN+2 | 
| EN^XPAR | EN+6, EN+8, CVTOIS+2, CVT123+2 | 
| UPDATE^XPDID | CVT123+8, CHK123+6 | 
| BMES^XPDUTL | EN+3, CVTOIS+3, CVT123+3, MAIL+12, CK10143+2 | 
| FileNo | Call Tags | 
|---|---|
| ^ORD(101 - [#101] | FIND1^DIC | 
| ^GMR(123.3 - [#123.3] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD(123.3 | SYN+5, SERVS+5 | 
| ^GMR(123 - [#123] | CVT123+4, CVT123+7, CVT123+9, CVT123+10, CVT123+14, CVT123+16*, CVT123+17*, CHK123+5, CHK123+9 | 
| ^GMR(123.3 - [#123.3] | CVT4+3 | 
| ^GMR(123.5 - [#123.5] | SERVS+3, SERVS+4 | 
| ^ORD(101 - [#101] | CVTPRO+2, CVTPRO+3, CVTPRO+4 | 
| ^ORD(101.43 - [#101.43] | CVTOIS+7, CVTOIS+9, CVTOIS+12, OKTOGO+2, OKTOGO+3, OKTOGO+4, CNVT+3, CNVT+8, SYN+3, SYN+6 , CK10143+4, CK10143+5, CK10143+6, CK10143+7 | 
| ^TMP("GMRCP15" | MAIL+3, MAIL+4*, MAIL+5*, MAIL+8, MAIL+19!, CHK123+3, CHK123+4*, CHK123+11, CHK123+12*, CK10143+8 , CK10143+9* | 
| ^XTMP("GMRCCVPR" | CVTOIS+4*, CVTOIS+5*, CVTOIS+6*, CVTOIS+14*, OKTOGO+1, CVT123+15* | 
| Name | Line Occurrences | 
|---|---|
| $$CNVT | CVTOIS+11 | 
| $$CVT4 | CVT123+14 | 
| $$CVTPRO | CVT4+4 | 
| $$OKTOGO | CVTOIS+10 | 
| CHK123 | MAIL+2 | 
| CK10143 | MAIL+1 | 
| CVT123 | EN+7 | 
| CVTOIS | EN+5 | 
| EN+9 | |
| SERVS | CNVT+11 | 
| SYN | CNVT+10 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | SYN+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DA | CNVT+1~, CNVT+6*, SYN+1~, SERVS+1~, CVTPRO+1~, CVTPRO+8* | 
| DA(1 | SYN+4*, SERVS+4* | 
| DIC | CNVT+1~, CNVT+2*, CNVT+6, SYN+1~, SYN+4*, SERVS+1~, SERVS+4*, CVTPRO+1~, CVTPRO+5*, CVTPRO+9 | 
| DIC("P" | SYN+5*, SERVS+5* | 
| DIC(0 | CNVT+2*, SYN+5*, SERVS+5*, CVTPRO+5* | 
| DIE | CNVT+1~, CNVT+6*, CVTPRO+1~, CVTPRO+9* | 
| DLAYGO | CNVT+1~, CNVT+2*, CVTPRO+1~ | 
| DR | CNVT+1~, CNVT+7*, CNVT+8*, CNVT+9, SYN+1~, SERVS+1~, CVTPRO+1~, CVTPRO+9* | 
| DTOUT | CNVT+1~, SYN+1~, SERVS+1~ | 
| DUOUT | CNVT+1~ | 
| DUZ | MAIL+9, MAIL+14, NWMAL+3 | 
| GMR0 | CVT123+1~, CVT123+10*, CVT123+11, CVT123+12, CVT123+15 | 
| GMRCCSLT | CVT123+1~, CVT123+5* | 
| GMRCDUZ | MAIL+13~, MAIL+14*, NWMAL+2 | 
| GMRCID | CVTOIS+1~, CVTOIS+13*, CVTOIS+14 | 
| GMRCIEN | CHK123+1~, CHK123+2*, CHK123+5*, CHK123+6, CHK123+7, CHK123+8, CHK123+9, CHK123+12 | 
| GMRCMSG | MAIL+6~, MAIL+11, MAIL+12, NWMAL+2, NWMAL+3 | 
| GMRCPRC | CVT123+1~, CVT123+6* | 
| GMRCPROC | CNVT+1~, CNVT+6*, CNVT+10, CNVT+11, CNVT+12 | 
| GMRCPROG | EN+1~, EN+2*, EN+3, EN+4 | 
| GMRCSB | MAIL+6~, MAIL+7* | 
| GMRCTO | MAIL+6~ | 
| GMRCTO( | MAIL+9* | 
| GMRCTXT | MAIL+6~, MAIL+8* | 
| IEN | CNVT~, CNVT+3, CNVT+8, CNVT+10, CVT123+1~, CVT123+7*, CVT123+8, CVT123+9, CVT123+10, CVT123+14 , CVT123+15, CVT123+16, CVT123+17 | 
| ITMNM | CVTOIS+1~, CVTOIS+4*, CVTOIS+7*, CVTOIS+9, CVTOIS+10 | 
| NAME | OKTOGO~, OKTOGO+2, CVTPRO+1~, CVTPRO+3*, CVTPRO+5 | 
| NEW | CNVT+1~, CNVT+6*, CNVT+7 | 
| NEXT | CHK123+1~, CHK123+11*, CHK123+12, CK10143+1~, CK10143+8*, CK10143+9 | 
| NUM | OKTOGO~, OKTOGO+1, OKTOGO+2, OKTOGO+3, OKTOGO+4 | 
| NWPROC | CVT123+13~, CVT123+14*, CVT123+15, CVT123+16 | 
| OINAME | CK10143+1~, CK10143+3*, CK10143+4*, CK10143+5, CK10143+6 | 
| OINUM | CK10143+1~, CK10143+5*, CK10143+6, CK10143+7, CK10143+9 | 
| OITM | SYN~, SYN+3, SYN+6 | 
| ORD0 | CNVT+1~, CNVT+3*, CNVT+4, CNVT+7, CNVT+11 | 
| ORDITM | CVTOIS+1~, CVTOIS+8*, CVTOIS+9*, CVTOIS+10, CVTOIS+11, CVTOIS+12, CVTOIS+14 | 
| PCL | CVT4~, CVT4+3, CVT4+4 | 
| PROC | CVTOIS+1~, CVTOIS+11*, CVTOIS+13, CVTOIS+14, SYN~, SYN+4, SERVS~, SERVS+4, CVTPRO+1~, CVTPRO+8* , CVTPRO+10, CVT123+1~, CVT4+2~, CVT4+3*, CVT4+4*, CVT4+5, CHK123+1~, CHK123+9*, CHK123+10, CHK123+12 | 
| PROT | SERVS~, SERVS+3, CVTPRO~, CVTPRO+2, CVTPRO+3, CVTPRO+4 | 
| PROTID | CVTOIS+1~, CVTOIS+12*, CVTOIS+13, CVTOIS+14 | 
| SERV | SERVS+1~, SERVS+2*, SERVS+3*, SERVS+4 | 
| SYN | SYN+1~, SYN+2*, SYN+3*, SYN+6 | 
| U | CVTOIS+5, CVTOIS+6, CVTOIS+12, CVTOIS+14, OKTOGO+2, OKTOGO+3, OKTOGO+4, CNVT+4, CNVT+6, CNVT+7 , CNVT+11, SYN+5, SYN+6, SERVS+4, SERVS+5, CVTPRO+3, CVTPRO+7, CVT123+4, CVT123+11, CVT123+12 , CVT123+14, CVT123+15, CVT123+16, CVT123+17, CHK123+9, CK10143+7 | 
| X | CNVT+1~, CNVT+4*, SYN+1~, SYN+6*, SERVS+1~, SERVS+4*, CVTPRO+1~, CVTPRO+5* | 
| XPDIDTOT | EN+1~, CVT123+4*!, CVT123+8, CHK123+6 | 
| >> XPDNM | CHK123+7, CHK123+8 | 
| Y | CNVT+1~, CNVT+5, CNVT+6, SYN+1~, SERVS+1~, CVTPRO+1~, CVTPRO+6, CVTPRO+7, CVTPRO+8 | 
| ZTDESC | MAIL+13~, MAIL+17* | 
| ZTDTH | MAIL+13~, MAIL+16* | 
| ZTIO | MAIL+13~, MAIL+17* | 
| >> ZTREQ | NWMAL+1* | 
| ZTRTN | MAIL+13~, MAIL+16* | 
| ZTSAVE | MAIL+13~ | 
| ZTSAVE("GMRCDUZ" | MAIL+15* | 
| ZTSAVE("GMRCMSG" | MAIL+15* | 
| ZTSK | MAIL+13~ |