ORQQCN2 ; slc/REV - Functions for GUI consult actions ;Sep 09, 2020@13:31:05
Source file <ORQQCN2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CMT(ORERR,ORIEN,ORCOM,ORALRT,ORALTO,ORDATE) | ;Add comment to existing consult without changing status
|
|
| SCH(ORERR,ORIEN,ORNP,ORDATE,ORALRT,ORALTO,ORCOM) | ;Schedule consult and change status
|
|
| SVCTREE(Y,PURPOSE) | ;Returns list of consult service for current
; context, screening for inactive, groupers, and tracking ; PURPOSE: Display=0, Forward=1, Order=1 |
|
| SVCSYN(ORROOT,ORSTRT,ORWHY,ORSYN,ORIEN) | ;;return CSLT services for GUI
|
|
| STATUS(Y) | ; Returns a list of statuses currently in use
|
|
| MEDRSLT(ORY,GMRCO) | ;Returns Medicine results plus TIU results
|
|
| SHOW513(ORY,GMRCO) | ||
| PRT513(Y,GMRCO,GMRCCHT,GMRCDEV) | ; Print SF513 to VistA device from GUI
|
|
| WPRT513(ORY,GMRCO,GMRCCHT) | ;Print SF513 to Windows device from GUI
|
|
| SIGFIND(Y,ORIEN,ORFL,ORCOM,ORALRT,ORALTO,ORDATE) | ;Significant findings
|
|
| ADMCOMPL(Y,ORIEN,ORFL,ORCOM,ORRESP,ORALRT,ORALTO,ORDATE) | ; Admin users
; Administrative complete action |
|
| SVCLIST(ORY,FROM,DIR) | ; Return a set of consult services in long list format
; .ORY=returned list, FROM=text to $O from, DIR=$O direction, |
|
| GETCTXT(Y,ORUSER) | ; Returns current view context for user
|
|
| SAVECTXT(Y,ORCTXT) | ; Save new view preferences for user
|
|
| DEFRFREQ(ORY,ORSVC,ORDFN,RESOLVE) | ;Return default reason for request for service
; ORSVC=pointer to file 123.5 ; ORDFN=patient, if RESOLVE=1 ; RESOLVE=1 to resolve boilerplate, 0 to not resolve |
|
| EDITDRFR(ORY,ORSVC) | ; Allow editing of reason for request?
|
|
| SVCIEN(ORY,ORIEN) | ;Given orderable item file entry, return IEN in 123.5, OR -1 IF INACTIVE IN 101.43
|
|
| PROVDX(ORY,ORIEN) | ;Return provisional dx prompting info for service
|
|
| PREREQ(ORY,ORSVC,ORDFN) | ;Returns prequisites for ordering
|
|
| UNRSLVD(ORY,ORDFN) | ;Returns true if unresolved consults for user/pt
|
|
| ISPROSVC(ORY,ORIEN) | ; IS THIS SERVICE PART OF CONSULTS-PROSTHETICS INTERFACE, wat/OR*3*280
|
|
| VALID(ORY,GMRCIEN,ORDUZ,ORIFC) | ;Return users update authority for a consult
|
| RPC Name | Call Tags |
|---|---|
| ORQQCN ADDCMT | CMT |
| ORQQCN SVCTREE | SVCTREE |
| ORQQCN STATUS | STATUS |
| ORQQCN MED RESULTS | MEDRSLT |
| ORQQCN SHOW SF513 | SHOW513 |
| ORQQCN PRINT SF513 | PRT513 |
| ORQQCN SIGFIND | SIGFIND |
| ORQQCN ADMIN COMPLETE | ADMCOMPL |
| ORQQCN SVCLIST | SVCLIST |
| ORQQCN2 GET CONTEXT | GETCTXT |
| ORQQCN2 SAVE CONTEXT | SAVECTXT |
| ORQQCN DEFAULT REQUEST REASON | DEFRFREQ |
| ORQQCN GET SERVICE IEN | SVCIEN |
| ORQQCN PROVDX | PROVDX |
| ORQQCN SF513 WINDOWS PRINT | WPRT513 |
| ORQQCN EDIT DEFAULT REASON | EDITDRFR |
| ORQQCN2 GET PREREQUISITE | PREREQ |
| ORQQCN2 SCHEDULE CONSULT | SCH |
| ORQQCN SVC W/SYNONYMS | SVCSYN |
| ORQQCN UNRESOLVED | UNRSLVD |
| ORQQCN ISPROSVC | ISPROSVC |
| ORQQCN GET USER AUTH | VALID |
