GMRCXR ; ALB/SAT - GMR DD UTILITY ; May 25, 2023@10:25:35
Source file <GMRCXR.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| AG123S1(GMRCDA1,GMRCDR) | ;build AG xref ;called by 'Set Logic' and 'Kill Logic' of the New Style AG cross reference #336 in file 123
 | 
|
| REQCHK(GMRCID) | ;check activities to determine if the REQUEST/CONSULTATION entry is still active and not scheduled
 | 
|
| REQCHKX | ; exit  ;alb/sat 86 - add REQCHKX tag
 | 
|
| GETIEN(GMRCNM) | ;get ID from REQUEST ACTION TYPES file 123.1
 | 
|
| SCHED(DFN,GMRCDT,GMRCSVC) | ;look for appointment with stop code matching one in REQUEST SERVICES
 | 
|
| FINDTXT(GMRCID,GMRCRPA,GMRCTXT) | ;find text in word processing field   ;alb/sat 86 - removed unused 3rd parameter
 | 
|
| GMRCTXT | ||
| POST | ;post install for GMRC*3*86
 | 
|
| XREF | ||
| POST169 | ;post install for GMRC*3*169
 | 
|
| AIFC | ;create and build NEW style AIFC for all REQUEST/CONSULTATION entries in file 123
 | 
|
| POST189 | ; post=install for GMRC*3*189
 | 
| FileNo | Call Tags | 
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ | 
| 123.02 | GET1^DIQ |