YTQRQAD1 ;SLC/KCM - RESTful Calls to handle MHA assignments ; 1/25/2017
Source file <YTQRQAD1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ASMTBYID(ARGS,RESULTS) | ; get assignment identified by assignmentId
 | 
|
| ASMTBYNM(ARGS,RESULTS) | ; get assignment identified by lastName and last4
 | 
|
| PROGRESS(ADMIN,TEST,ASMTID) | ; return the progress for an administration
 ; progress in 100% if administration is complete  | 
|
| NEWASMT(ARGS,DATA) | ; save assignment, return /api/mha/assignment/{assignmentId}
 | 
|
| FILASGN(ARGS,DATA,SETID,TYPE) | ;File the Assignment Data
 ; ARGS = incoming arguments ; DATA = incoming data ; SETID = Assignment number if existing assignment(EDIT) ; TYPE = NEW or EDIT  | 
|
| DELASMT(ARGS) | ; delete the assignment identified in ARGS("assignmentId")
 | 
|
| TRSASMT(ARGS) | ; Delete an assignment from Staff Entry by Trash icon
 ; Allows deletion of any incomplete assignment (ie no instruments complete) ; *Deletes any incomplete MH ADMINISTRATIONS  | 
|
| DELASMT1(ASMT,TRS,REPLACE) | ; delete the assignment given the assignment number
 | 
|
| DELIDX(ASMT,DFN,ORDBY) | ; return true if able to remove "AC", "AD" indexes
 | 
|
| DELTEST(ARGS) | ; remove an instrument from an assignment
 | 
|
| RMVTEST(ASMT,TEST,DELADMIN,DELFASGN,REPLACE) | ; remove test from assignment, delete assignment if empty
 | 
|
| DELMHAD(ARGS,DATA) | ;Delete Completed MH Admin
 | 
|
| ISMGR() | ; return 1 if admin access to admins
 | 
|
| ADMEXPD(ADMIN,TEST) | ; return 1 if incomplete admin has expired
 | 
|
| DELADMIN(YSADM) | ; delete an admin & associated records
 | 
| FileNo | Call Tags | 
|---|---|
| ^YTT(601.84 - [#601.84] | Classic Fileman Calls | 
| ^YTT(601.85 - [#601.85] | Classic Fileman Calls | 
| ^YTT(601.92 - [#601.92] | Classic Fileman Calls |