GMRCGUIB ;SLC/DCM,JFR,MA/AFS,PB - GUI actions for consults ; Jan 17, 2024@13:17
Source file <GMRCGUIB.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETDA() | ;set DA of where audit actions are to be filed
|
|
| REASON(GMRCFN,GMRCRQ,GMRCDT) | ;Load the reason for the request into ^GMR(123,GMRCO,20
|
|
| SETCOM(COMMENT,WHO) | ;Set comment array into tracking actions
|
|
| CMT(GMRCO,GMRCOM,GMRCADUZ,GMRCWHN,GMRCWHO) | ;add comment to consult
; GMRCO = IEN from file 123 ; GMRCOM = array of comments in format GMRCOM(1)="xxxx", GMRCOM(2)="xxx" ; GMRCADUZ = array of alert recipients as GMRCADUZ(DUZ)="" (optional) ; GMRCWHO = IEN from file 200 who's responsible activity (optional) ; GMRCWHN = date time of activity in FM format ; GMRCFORC = copy of GMRCADUZ; these users will recieve alert 63 even if alert is turned OFF; optional argument to MSG^GMRCP |
|
| SFILE(GMRCO,GMRCA,GMRCSF,GMRCORNP,GMRCDUZ,GMRCOM,GMRCALF,GMRCATO,GMRCAD) | ;Process various file update functions from the GUI for a consult
; ADMIN COMPLETE or SIGNIFICANT FINDINGS |
|
| SCH(GMRCO,GMRCORNP,GMRCAD,GMRCADUZ,GMRCMT) | ;schedule a consult API
; Input variables: |
|
| DOCLIST(GMRCAR,GMRCDA,GMRCMED) |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | Classic Fileman Calls, GET1^DIQ |
