source: FOIAVistA/trunk/r/CLINICAL_CASE_REGISTRIES-ROR/ROR01.m

Last change on this file was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 5.6 KB
Line 
1ROR01 ;HCIOFO/SG - CLINICAL CASE REGISTRIES (TEMP. GLOBALS) ; 11/17/06 11:56am
2 ;;1.5;CLINICAL CASE REGISTRIES;**1**;Feb 17, 2006;Build 24
3 ;
4 ; ^TMP($J,"RORTMP-"_) - TEMPORARY STORAGE (see the ^RORTMP routine)
5 ;
6 ; ^TMP($J,"RORTMP-0", Indexes of allocated buffers
7 ; i) ""
8 ;
9 ; ^TMP($J,"RORTMP-"_i, Allocated buffers
10 ; ...)
11 ;
12 ; ^TMP("RORACK") ------ CONTROL DATA OF ACKNOWLEDGEMENT PROCESSING
13 ;
14 ; ^TMP("RORACK",$J,
15 ; "PR",IEN) List of IENs of registry records that
16 ; acknowledgements have been processed for.
17 ;
18 ; ^TMP("RORHDT") ------ CONTROL DATA OF HISTORICAL DATA EXTRACTION
19 ;
20 ; ^TMP("RORHDT",$J,
21 ; "PR", List of IENs of registry records processed
22 ; in the re-extraction section of function
23 ; $$EXTRACT^RORHDT04.
24 ; IEN) Return code of the record processing. If this
25 ; value is less than zero, data extraction was
26 ; not successful again.
27 ;
28 ; ^TMP("RORPTF") ------ TEMPOPARY PTF INDEX FOR DATA EXTRACTION
29 ;
30 ; ^TMP("RORPTF",$J,
31 ; "DTF", List of already indexed time frames of
32 ; the PTF CLOSE OUT file (#45.84).
33 ; StartDate) StartDate^EndDate
34 ; "PDI", Temporary PTF index itself
35 ; DFN,PTFIEN) ""
36 ;
37 ; ^TMP("RORTMP",$J) --- TEMPORARY STORAGE
38 ;
39 ; ^TMP("RORUPD") ------ REGISTRY UPDATE TEMPORARY DATA
40 ;
41 ; ^TMP("RORUPD",$J,
42 ;
43 ; 1,File#,
44 ; "S",Rule Name) List of selection rules
45 ; "F",DataCode, List of data elements to load
46 ; "E") If expression implementing the selection
47 ; rule references an external value of the
48 ; element, the "E" sub-node will be defined.
49 ; "I") If expression implementing the selection
50 ; rule references an internal value of the
51 ; element, the "I" sub-node will be defined.
52 ;
53 ; 2,Registry#) Registry Name
54 ;
55 ; 3,Rule Name, Selection rule descriptor
56 ; ^1: Rule#
57 ; ^2: File Number
58 ; ^3: 1 if already processed, otherwise
59 ; empty string
60 ; ^4: 1 if registry should be updated (in
61 ; case of matched condition, of course)
62 ; 1) MUMPS function entry point
63 ; 2,Registry#) List of affected registries
64 ; 3,Rule Name) List of rules that this rule depend on
65 ;
66 ; 4,LabSearch#) List of Lab search IENs
67 ;
68 ; "LS",
69 ; Result Code,
70 ; LabSearch#,
71 ; Seq#) Condition to check the result
72 ; ^1: Indicator
73 ; ^2: Indicated Value
74 ;
75 ; "U",Patient#, This node is defined if the patient has been
76 ; processed
77 ; 2,Registry#, This node is defined if the registry should
78 ; be updated
79 ; Rule#) Reference to a top-level selection rule
80 ; ^01: Trigger date of the rule
81 ; ^02: Institution IEN
82 ;
83 ; ^XTMP("RORLOCK") ---- LIST OF LOCK DESCRIPTORS
84 ;
85 ; ^XTMP("RORLOCK",
86 ; NodeNdx) Lock Descriptor (see ^RORLOCK for details)
87 ; ^01: Date/Time (FileMan)
88 ; ^02: User/Process name
89 ; ^03: User IEN (DUZ)
90 ; ^04: $JOB
91 ; ^05: Task number
92 ; ^06: Lock counter
93 ;
94 ; ^XTMP("RORUPD"_) ---- REGISTRY UPDATE TEMPORARY DATA (MULTITASK)
95 ;
96 ; If the registry update starts in the
97 ; multitask mode, all temporary data from the
98 ; ^TMP("RORUPD",$J) node is merged to this
99 ; node so that it will be available for all
100 ; registry update subtasks.
101 ;
102 ; ^XTMP("RORUPDJ"_$J,
103 ; If the regular registry update is run in the
104 ; multitask mode, the ^XTMP("RORUPDJ"_$J) node
105 ; is used. $J is the job number of the main
106 ; registry update task.
107 ;
108 ; ^XTMP("RORUPDR"_Registry#,
109 ; During the initial registry population
110 ; (performed by the post-install routines),
111 ; the ^XTMP("RORUPDR"_Registry#) node is used.
112 ; The list of processed patients (the "U"
113 ; subscript) is used to restart the process
114 ; after an error or a crash.
115 ;
116 ; 0) Node descriptor
117 ; ^1: purge date (FileMan)
118 ; ^2: create date (FileMan)
119 ; ^3: description
120 ;
121 ; "T",Task#) This node is LOCKed while the (sub)task is
122 ; running (subscript of the main task is 0).
123 ;
124 ; Otherwise, "S" means that the subtask has
125 ; been scheduled but not started yet.
126 ;
127 ; A negative value of the non-locked node
128 ; represents the error code (for example,
129 ; -60 means that the subtask has crashed).
130 ;
131 ; Non-negative value of the node means that
132 ; the subtask has been completed. The value
133 ; has the following structure:
134 ; ^1: Number of processed patients
135 ; ^2: Number of patients processed with
136 ; errors
137 ;
138 Q
Note: See TracBrowser for help on using the repository browser.