ORRCTSK ;SLC/MKB -- Patient Task file #102.3 utilities ; 25 Jul 2003 9:31 AM
Source file <ORRCTSK.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | FILE^DICN ^DIE |
| Kernel | 1 | ($$FMTHL7,$$HL7TFM,$$NOW)^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PVQ | ||
| PROV(USR,PAT) | ; -- Return 1 or 0, if USR is a provider for PAT
|
|
| CANC(ORY,ORUSR,TASK) | ; -- Cancel tasks by ORUSR
; where TASK(#) = ID ; returns ORY(#) = ID^1 or ID^0^error, if successful or not ; RPC = ORRC TASK CANCEL |
|
| EDIT(ORY,TASK) | ; -- Change existing tasks
; where TASK(#) = ID^subject^date created^user^patient^priority^due^date completed^who completed^date canceled^who canceled^items ; returns ORY(#) = ID^1 or ID^0^error, if successful or not ; RPC = ORRC TASK EDIT |
|
| COMP(ORY,ORUSR,TASK) | ; -- Complete tasks by ORUSR
; where TASK(#) = ID ; returns ORY(#) = ID^1 or ID^0^error, if successful or not ; RPC = ORRC TASK COMPLETE |
|
| DETAIL(ORY,TASK) | ; -- Return details of TASKs
; where TASK(#) = ID ; in ORY(#) = ID^subject^date created^who created^patient^priority^due^date completed^who completed^date canceled^who canceled^items ; RPC = ORRC TASKS BY ID |
|
| LIST(ORY,ORPAT,ORUSR,ORDUE) | ; -- Return incomplete[ORDUE] tasks [by ORUSR] for ORPAT
; in ORY(#) = ID^subject^date created^who created^patient^priority^due^date completed^who completed^date canceled^who canceled^items ; RPC = ORRC TASKS BY PATIENT |
|
| VQ | ||
| DUE(ORY,ORPAT) | ; -- Return tasks that are due for ORPAT
; in ORY(#) = ID^subject^date created^who created^patient^priority^due^date completed^who completed^date canceled^who canceled^items ; RPC = ORRC TASKS DUE BY PATIENT <not used> |
|
| SUBJ(ORY,ORPAT) | ; -- Return list of task subjects used for ORPAT
; as ORY(#) = task subject |
|
| IDS(ORY,PAT) | ; -- Return due tasks for PAT
; in @ORY@(PAT) = #tasks ^ 1 if any are high priority ; @ORY@(PAT,ID) = * if high priority, else null ; [from ORRCDPT1] |
|
| VALID(DATA) | ; -- Returns 1 or 0^error if DATA string is valid
|
|
| PATS(ORY,ORUSR) | ; -- Return list of patients for whom ORUSR has tasks due
; in @ORY@(PAT) = #tasks ^ 1 if any are high priority ; @ORY@(PAT,ID) = * if high priority, else null ; [from ORRCDPT] |
|
| NEW(ORY,DATA) | ; -- Create new task
; where DATA = [^]subject^date created^user^patient^priority^due^date completed^who completed^date canceled^who canceled^items ; returns ORY = ID if successful, else 0^error message ; RPC = ORRC TASK ADD |
| RPC Name | Call Tags |
|---|---|
| ORRC TASKS BY PATIENT | LIST |
| ORRC TASKS BY ID | DETAIL |
| ORRC TASK ADD | NEW |
| ORRC TASK EDIT | EDIT |
| ORRC TASK COMPLETE | COMP |
| ORRC TASK SUBJECTS BY PT | SUBJ |
| ORRC TASKS DUE BY PATIENT | DUE |
| ORRC TASK CANCEL | CANC |
| FileNo | Call Tags |
|---|---|
| ^ORRT(102.3 - [#102.3] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | PROV+2, PROV+3, VALID+3 |
| ^OR(100.21 - [#100.21] | PROV+5 |
| ^ORRT(102.3 - [#102.3] | PATS+7, PATS+10, PATS+11, IDS+7, IDS+8, LIST+6, LIST+7, LIST+11, DETAIL+6, DETAIL+8 , NEW+9*, NEW+10*, NEW+11*, NEW+13*, NEW+14*, VALID+2, EDIT+9, EDIT+11, EDIT+12*, EDIT+13* , EDIT+14!*, EDIT+15!*, EDIT+16!, EDIT+17*, EDIT+18, COMP+9, COMP+10, CANC+9, CANC+10, SUBJ+3 , SUBJ+4 |
| ^TMP($J | PATS+5, PATS+8, IDS+5 |
| ^VA(200 - [#200] | VALID+4 |
| Name | Line Occurrences |
|---|---|
| $$PROV | PATS+9, LIST+4 |
| $$VALID | NEW+6, EDIT+8 |
| LIST | DUE+4 |
| PVQ | PROV+2, PROV+3 |
| VQ | VALID+2, VALID+3, VALID+4, VALID+9, VALID+10 |
| Name | Field # of Occurrence |
|---|---|
| ^( | LIST+11, DETAIL+8 |
| ^(0 | EDIT+11* |
| ^(1 | LIST+7, DETAIL+6, NEW+9*, EDIT+11* |
| ^(2 | EDIT+11! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABN | PATS+4~, PATS+9*, PATS+14*, PATS+15, IDS+4~, IDS+6*, IDS+10*, IDS+11 |
| CNT | PATS+4~, PATS+9*, PATS+14*, PATS+15, IDS+4~, IDS+6*, IDS+10*, IDS+11 |
| DA | EDIT+4~, EDIT+6*, EDIT+7, EDIT+9, EDIT+11, EDIT+12, EDIT+13, EDIT+14, EDIT+15, EDIT+16 , EDIT+17, EDIT+18, COMP+4~, COMP+8*, COMP+9, COMP+10, CANC+4~, CANC+8*, CANC+9, CANC+10 |
| DATA | NEW~, NEW+5, NEW+6*, NEW+7, NEW+9, NEW+10, NEW+11, NEW+12, VALID~, VALID+2 , VALID+3, VALID+5, VALID+7*, VALID+9, VALID+10, VALID+11, EDIT+4~, EDIT+5*, EDIT+6, EDIT+8 , EDIT+10*, EDIT+11, EDIT+14, EDIT+15, EDIT+17 |
| DIC | NEW+4~, NEW+7* |
| DIC(0 | NEW+7* |
| DIE | COMP+4~, COMP+6*, CANC+4~, CANC+6* |
| DO | NEW+4~ |
| DR | COMP+4~, COMP+6*, CANC+4~, CANC+6* |
| DT | PATS+6, IDS+6, DUE+3 |
| DUE | PATS+4~, PATS+6*, PATS+11, IDS+4~, IDS+6*, IDS+8 |
| I | LIST+3~, LIST+10*, LIST+11*, DETAIL+4~, DETAIL+7*, DETAIL+8*, NEW+4~, NEW+13*, NEW+14, VALID+1~ , VALID+4*, VALID+5*, VALID+7, VALID+8, VALID+11*, EDIT+4~, EDIT+12*, EDIT+13 |
| ID | DETAIL+4~, DETAIL+5*, DETAIL+6, DETAIL+9, EDIT+4~, EDIT+6*, EDIT+7, EDIT+8, EDIT+9, EDIT+18 , COMP+4~, COMP+7*, COMP+8, COMP+9, COMP+10, CANC+4~, CANC+7*, CANC+8, CANC+9, CANC+10 |
| IFN | PATS+4~, PATS+9*, PATS+10*, PATS+11, PATS+13, IDS+4~, IDS+7*, IDS+8, IDS+9, LIST+3~ , LIST+6*, LIST+7, LIST+11, LIST+12, DETAIL+4~, DETAIL+6*, DETAIL+8 |
| ITMS | LIST+3~, LIST+7*, LIST+11*, LIST+12, DETAIL+4~, DETAIL+8*, DETAIL+9, NEW+4~, NEW+12*, NEW+13 , EDIT+4~, EDIT+10*, EDIT+11, EDIT+12 |
| L | VALID+1~, VALID+11* |
| LIST | PROV+1~, PROV+4*, PROV+5* |
| ORDT | DUE+3~*, DUE+4 |
| ORDUE | LIST~, LIST+5*, LIST+8 |
| ORI | DETAIL+4~, DETAIL+5*, EDIT+4~, EDIT+5*, EDIT+7, EDIT+8, EDIT+9, EDIT+18, COMP+4~, COMP+7* , COMP+8, COMP+9, COMP+10, CANC+4~, CANC+7*, CANC+8, CANC+9, CANC+10, SUBJ+2~, SUBJ+3* , SUBJ+4 |
| ORN | LIST+3~, LIST+4*, LIST+12*, DETAIL+4~*, DETAIL+9*, SUBJ+2~*, SUBJ+5* |
| ORPAT | LIST~, LIST+4*, LIST+6, DUE~, DUE+4, SUBJ~, SUBJ+3 |
| ORPROV | PATS+4~, PATS+9*, PATS+12, LIST+3~, LIST+4*, LIST+9 |
| ORUSR | PATS~, PATS+6*, PATS+9, PATS+12, LIST~, LIST+4, LIST+9, COMP~, COMP+5, COMP+6 , CANC~, CANC+5, CANC+6 |
| ORY | PATS~, PATS+5*, PATS+13, PATS+15, IDS~, IDS+5*, IDS+9, IDS+11, LIST~, LIST+3! , DUE~, DUE+4, DETAIL~, DETAIL+4!, NEW~, NEW+4*, NEW+5*, NEW+6*, NEW+8*, NEW+15* , EDIT~, EDIT+4!, COMP~, CANC~, SUBJ~, SUBJ+2! |
| ORY( | LIST+12*, DETAIL+9*, EDIT+7*, EDIT+8*, EDIT+9*, EDIT+18*, COMP+8*, COMP+9*, COMP+10*, CANC+8* , CANC+9*, CANC+10*, SUBJ+5* |
| ORY(0 | COMP+5*, CANC+5* |
| PAT | PATS+4~, PATS+7*, PATS+8, PATS+9, PATS+10, PATS+13, PATS+15, IDS~, IDS+7, IDS+9 , IDS+11, PROV~, PROV+1*, PROV+2, PROV+3, PROV+4*, PROV+5 |
| SUBJ | EDIT+4~, EDIT+10*, EDIT+11 |
| TASK | DETAIL~, EDIT~, COMP~, CANC~ |
| TASK( | DETAIL+5, EDIT+5, COMP+7, CANC+7 |
| U | PATS+11, PATS+12, PATS+13, PATS+14, PATS+15, IDS+8, IDS+9, IDS+10, IDS+11, LIST+8 , LIST+9, LIST+10, LIST+12, DETAIL+7, DETAIL+9, NEW+6, NEW+7, NEW+9, NEW+10, NEW+11 , NEW+12, NEW+14, VALID+2, VALID+3, VALID+4, VALID+5, VALID+7, VALID+9, VALID+10, VALID+11 , EDIT+6, EDIT+8, EDIT+10, EDIT+13, EDIT+14, EDIT+15, EDIT+16, EDIT+17 |
| USR | PROV~, PROV+1*, PROV+2, PROV+3, PROV+5 |
| X | LIST+3~, LIST+10*, LIST+11*, DETAIL+4~, DETAIL+7*, DETAIL+8*, NEW+4~, NEW+7*, NEW+13*, VALID+1~ , VALID+2*, VALID+3*, VALID+4*, VALID+5*, VALID+6*, VALID+7*, VALID+9*, VALID+10*, VALID+11*, EDIT+4~ , EDIT+8*, EDIT+12*, COMP+4~, CANC+4~, SUBJ+4*, SUBJ+5 |
| X0 | PATS+4~, PATS+11*, PATS+12, PATS+13, PATS+14, IDS+4~, IDS+8*, IDS+9, IDS+10, LIST+3~ , LIST+7*, LIST+8, LIST+9, LIST+10*, LIST+12*, DETAIL+4~, DETAIL+6*, DETAIL+7*, DETAIL+9*, EDIT+4~ , EDIT+11*, EDIT+14, EDIT+15, EDIT+16 |
| X1 | LIST+3~, LIST+7*, LIST+12, DETAIL+4~, DETAIL+6*, DETAIL+9 |
| Y | PROV+1~*, PROV+2*, PROV+3*, PROV+5*, PVQ, NEW+4~, NEW+8, NEW+9, NEW+10, NEW+11 , NEW+13, NEW+14, NEW+15, VALID+1~*, VALID+2*, VALID+3*, VALID+4*, VALID+5, VALID+8*, VALID+9* , VALID+10*, VALID+11*, VQ, EDIT+4~, COMP+4~, CANC+4~ |