GMRCP5A ;SLC/DCM,RJS,MA - Print Consult form 513 (Gather Data - TIU Results) ;4/18/01 10:29
Source file <GMRCP5A.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRNT(GMRCIFN,TIUFLG,GMRCQUED,GMRCCPY,GMRCGUI,GMRCAUDT) | ;
 | 
|
| PRNTAUDT(GMRCIFN,ZTIO,GMRCAUDT) | ; Update the last activity field in 123 and
 ; Processing Activity multiple ; Update the activity log to reflect "Printed To:" and the printer ; GMRCAUDT=1 indicates the consult is NW or Discontinued ; and it should update the audit trail.  | 
|
| FORMAT(PAGEWID) | ;
 | 
|
| EXDT(X) | ;EXTERNAL DATE FORMAT
 | 
|
| CENTER(X) | ;
 | 
|
| BLD(SUB,NDX,LINE,TAB,TEXT,RUNTIME) | ;
 | 
|
| SUB(ZONE,SUB,NDX,TEXT) | ;
 | 
|
| LASTLN(SUB,NDX) | ;
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: READ | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^GMR(123 - [#123] | Classic Fileman Calls | 
| ^DIC(4 - [#4] | GET1^DIQ |