XDRDOC ;IHS/OHPRD/JCM - DOCUMENTATION OF KERNEL ROUTINES ;09/13/93 08:39
;;7.3;TOOLKIT;;Apr 25, 1995
;
XDRDADD ; ADDS POTENTIAL DUPLICATE RECORDS TO DUPLICATE RECORD FILE
;
; Input Variables: XDRCD,XDRCD2,XDRFL,XDRGL,XDRDSCOR(,XDRDTEST(
;
; Called by: XDRDUP
;
; Calls: FILE^DICN,DIE,EN^XDRMAIN
;
XDRDADJ ; ADJUSTS DUPLICATE RECORD FILE UPON MERGE OF A PATIENT
;
; This routine is executed by a MUMPS xref on the MERGE STATUS field
; of the DUPLICATE RECORD file only when the status is set to MERGED.
; This routine checks for entries in the file that are affected by
; the merging of this entry, and adjusts their .01 and .02 fields
; accordingly. The problem being addressed is:
;
; 1 to 5 If 5 to 10 merged first 1 to 10
; 5 to 10 then other entries would 5 to 10
; 5 to 20 be adjusted as follows: 10 to 20
;
; Or, if both 1 to 5 and 1 to 10 existed at the time of the
; merge, the 1 to 5 entry would be deleted.
;
; The STATUS field (.03) is re-indexed because it sets xrefs based
; on the values in the .01 and .02 fields. TRIGGERs are not fired
; for the .01, .02, or .03 fields.
;
; Entries previously resolved are ignored.
;
; Called by: Cross Reference on Merge Status field of
; Duplicate Record File entry
;
; Calls: EN^XDRDUP,DIK
;
XDRDCOMP ; COMPARE TWO PATIENTS VIA THE DUP CHECKER ALGORITHM
;
; Input variables: XDRFL
;
; Calls: %ZIS,%ZTLOAD,DIC,DR,EN^DITC,FILE^XDRDQUE,XDRDSCOR,XDRDUP
;
XDRDLIST ; PRINT POTENTIAL AND VERIFIED DUPLICATES
;
; This routine is the main driver for reports dealing with the
; duplicate record file. It will print listings of Potential
; duplicates, ready and not ready to merge verified duplicates.
;
; Input variables: XDRFL
;
; Calls: EN1^DIP,DIR,FILE^XDRDQUE
;
XDRDMAIN ; MAIN DRIVER FOR DUPLICATE CHECKING SOFTWARE
;
; Input Variables: XDRFL - File number of File to be Checked
; XDRDPDTI - Defined if Potential Threshold Increased
; and Previous search completed
; XDRDTYPE - Type of search to run
;
; Calls: NOW^%DTC,DIE,DIK,XDRDPDTI,XDRDUP,XDREMSG,XDRMAINI
;
; We will pass the variable XDRCD for them to then get the candidates
; Expect the routine to send back the possibles in
; ^TMP("XDRD",$J,XDRFL,DFN
;
; There is a basic assumption in the limiting of which records are
; checked. It is assumed that if Record 1 gathers Record 2 as a
; candidate for duplicate checking that Record 2 will in turn
; gather Record 1 as a candidate for duplicate checking.
;
; It was decided that if a record is being checked again outside of
; the BASIC search type any entries in the Duplicate Record file
; other than merged entries will be deleted and then the pair
; rechecked.
;
XDRDPDTI ; CHECKS POTENTIAL DUPLICATES IF THRESHOLD RAISED
;
; This routine is called by XDRDMAIN when the Potential Duplicate
; threshold has been increased from a previous value. This routine
; $O's through the "APOT" cross reference on the Duplicate Record file
; and deletes all entries in the Duplicate Record file that had a DC
; Dupe Match Score that did not meet the new Potential Duplicate
; Threshold value. It also updates the DC Potential Dupe Threshold %.
; It should be noted that if a person changes the weights of the
; Duplicate Tests, they should delete all Non-Verified Potential
; Duplicates and rerun the Duplicate Resolution search.
;
; Input Variables: XDRGL,XDRFL,XDRDSCOR(
;
; Called by: XDRDMAIN
;
; Calls: DIE,DIK
;
XDRDPRGE ; PURGE DUPLICATE RECORD FILE
;
; This routine is used to purge the Duplicate Record file of either
; Potential Duplicates, Verified Non-Duplicates, or both.
; Verified Duplicates cannot be purged until Fileman institutes
; some sort of archival or merged node.
;
; Input Variable: XDRFL
;
; Calls: %ZTLOAD,DIC,DIR,DIK
;
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HXDRDOC 3998 printed Oct 16, 2024@18:39:42 Page 2
XDRDOC ;IHS/OHPRD/JCM - DOCUMENTATION OF KERNEL ROUTINES ;09/13/93 08:39
+1 ;;7.3;TOOLKIT;;Apr 25, 1995
+2 ;
XDRDADD ; ADDS POTENTIAL DUPLICATE RECORDS TO DUPLICATE RECORD FILE
+1 ;
+2 ; Input Variables: XDRCD,XDRCD2,XDRFL,XDRGL,XDRDSCOR(,XDRDTEST(
+3 ;
+4 ; Called by: XDRDUP
+5 ;
+6 ; Calls: FILE^DICN,DIE,EN^XDRMAIN
+7 ;
XDRDADJ ; ADJUSTS DUPLICATE RECORD FILE UPON MERGE OF A PATIENT
+1 ;
+2 ; This routine is executed by a MUMPS xref on the MERGE STATUS field
+3 ; of the DUPLICATE RECORD file only when the status is set to MERGED.
+4 ; This routine checks for entries in the file that are affected by
+5 ; the merging of this entry, and adjusts their .01 and .02 fields
+6 ; accordingly. The problem being addressed is:
+7 ;
+8 ; 1 to 5 If 5 to 10 merged first 1 to 10
+9 ; 5 to 10 then other entries would 5 to 10
+10 ; 5 to 20 be adjusted as follows: 10 to 20
+11 ;
+12 ; Or, if both 1 to 5 and 1 to 10 existed at the time of the
+13 ; merge, the 1 to 5 entry would be deleted.
+14 ;
+15 ; The STATUS field (.03) is re-indexed because it sets xrefs based
+16 ; on the values in the .01 and .02 fields. TRIGGERs are not fired
+17 ; for the .01, .02, or .03 fields.
+18 ;
+19 ; Entries previously resolved are ignored.
+20 ;
+21 ; Called by: Cross Reference on Merge Status field of
+22 ; Duplicate Record File entry
+23 ;
+24 ; Calls: EN^XDRDUP,DIK
+25 ;
XDRDCOMP ; COMPARE TWO PATIENTS VIA THE DUP CHECKER ALGORITHM
+1 ;
+2 ; Input variables: XDRFL
+3 ;
+4 ; Calls: %ZIS,%ZTLOAD,DIC,DR,EN^DITC,FILE^XDRDQUE,XDRDSCOR,XDRDUP
+5 ;
XDRDLIST ; PRINT POTENTIAL AND VERIFIED DUPLICATES
+1 ;
+2 ; This routine is the main driver for reports dealing with the
+3 ; duplicate record file. It will print listings of Potential
+4 ; duplicates, ready and not ready to merge verified duplicates.
+5 ;
+6 ; Input variables: XDRFL
+7 ;
+8 ; Calls: EN1^DIP,DIR,FILE^XDRDQUE
+9 ;
XDRDMAIN ; MAIN DRIVER FOR DUPLICATE CHECKING SOFTWARE
+1 ;
+2 ; Input Variables: XDRFL - File number of File to be Checked
+3 ; XDRDPDTI - Defined if Potential Threshold Increased
+4 ; and Previous search completed
+5 ; XDRDTYPE - Type of search to run
+6 ;
+7 ; Calls: NOW^%DTC,DIE,DIK,XDRDPDTI,XDRDUP,XDREMSG,XDRMAINI
+8 ;
+9 ; We will pass the variable XDRCD for them to then get the candidates
+10 ; Expect the routine to send back the possibles in
+11 ; ^TMP("XDRD",$J,XDRFL,DFN
+12 ;
+13 ; There is a basic assumption in the limiting of which records are
+14 ; checked. It is assumed that if Record 1 gathers Record 2 as a
+15 ; candidate for duplicate checking that Record 2 will in turn
+16 ; gather Record 1 as a candidate for duplicate checking.
+17 ;
+18 ; It was decided that if a record is being checked again outside of
+19 ; the BASIC search type any entries in the Duplicate Record file
+20 ; other than merged entries will be deleted and then the pair
+21 ; rechecked.
+22 ;
XDRDPDTI ; CHECKS POTENTIAL DUPLICATES IF THRESHOLD RAISED
+1 ;
+2 ; This routine is called by XDRDMAIN when the Potential Duplicate
+3 ; threshold has been increased from a previous value. This routine
+4 ; $O's through the "APOT" cross reference on the Duplicate Record file
+5 ; and deletes all entries in the Duplicate Record file that had a DC
+6 ; Dupe Match Score that did not meet the new Potential Duplicate
+7 ; Threshold value. It also updates the DC Potential Dupe Threshold %.
+8 ; It should be noted that if a person changes the weights of the
+9 ; Duplicate Tests, they should delete all Non-Verified Potential
+10 ; Duplicates and rerun the Duplicate Resolution search.
+11 ;
+12 ; Input Variables: XDRGL,XDRFL,XDRDSCOR(
+13 ;
+14 ; Called by: XDRDMAIN
+15 ;
+16 ; Calls: DIE,DIK
+17 ;
XDRDPRGE ; PURGE DUPLICATE RECORD FILE
+1 ;
+2 ; This routine is used to purge the Duplicate Record file of either
+3 ; Potential Duplicates, Verified Non-Duplicates, or both.
+4 ; Verified Duplicates cannot be purged until Fileman institutes
+5 ; some sort of archival or merged node.
+6 ;
+7 ; Input Variable: XDRFL
+8 ;
+9 ; Calls: %ZTLOAD,DIC,DIR,DIK
+10 ;
