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~ |