XDRDOC1.m

XDRDOC1 ;IHS/OHPRD/JCM - DOCUMENTATION OF KERNEL ROUTINES ;07/06/93  16:46

 ;;7.3;TOOLKIT;;Apr 25, 1995

 ;

XDRDQUE ; START AND STOP DUPLICATE CHECKER SEARCH

 ;

 ; Called by: XDRDCOMP,XDRDLIST,XDRDSCOR,XDRMADD if XDRFL or

 ;            XDRFL not defined

 ;

 ; Calls : %ZTLOAD,DIC,DIE,Y^DIQ,DIR,CHECK^XDRU1

 ;

 ;FILE

 ;** I would suggest some sort of screen to allow users to select only

 ;** files that they have access for

 ;

 ;CHECK

 ; Checks the Duplicate Resolution file to make sure that all

 ; the information for the Duplicate Resolution software to

 ; run is present.  Checks for existance of Candidate Collection

 ; routine, Potential Duplicate Threshold, and that there are

 ; Duplicate Tests entered in the Duplicate Tests multiple.

 ;

XDRDSCOR ; SETS SCORES FOR DUPLICATE CHECKING ALGORITHM

 ;

 ; Input Variables: XDRFL,XDRD(0)

 ;

 ; Output Variables - XDRDSCOR(,XDRDTEST(

 ;

 ; Called by: XDRDCOMP,XDRDMAINI,XDRDUP,XDRMADD

 ;

 ; Calls: FILE^XDRDQUE,XDREMSG

 ;

XDRDSTAT ; DISPLAY STATUS OF SEARCH

 ;

 ; Input variables: XDRFL

 ;

 ; Calls: DIC,Y^DIQ

 ;

XDRDUP ; CHECKS TWO RECORDS TO SEE IF DUPLICATES

 ;

 ; Input variables: XDRFL,XDRDPDA

 ;

 ; Called by: XDRDADJ,XDRDCOMP,XDRDMAIN,XDRMADD

 ;

 ; Calls: EN^DIQ1,XDRDADD,XDRDSCOR,XDREMSG

 ;

XDREMSG ; ERROR MESSAGE PROCESSOR

 ;

 ; This routine is responsible for either sending error messages to

 ; the operator or if the calling routine is running in background

 ; it will send a bulletin to the people in the Duplicate Manager

 ; mail group if one is defined.

 ;

 ; The following meanings of XDRERR=

 ;

 ; 1=      The Candidate Collection Routine is Undefined

 ; 2=      The Candidate Collection Routine is not present

 ; 3=      The Potential Duplicate Threshold is Undefined

 ; 4=      There are no Duplicate Tests entered for this Duplicate

 ;         Resolution entry

 ; 5=      The Global root node in DIC is undefined

 ; 6=      No entry in Duplicate Resolution file for this file

 ; 7=      The From and To Record are undefined

 ; 8=      The test routine is not present

 ; 9=      The routine defined as the Pre-Merge routine is not present

 ; 10=     The routine defined as the Post-Merge routine is not present

 ; 11=     The routine defined as the Verified Msg routine is

 ;         not present

 ; 12=     The routine defined as the Merged Msg routine is not present

 ; 13=     Non-Interactive Merge style not allowed with Dinum Files

 ;         for Merge entries

 ;

 ; Input Variables: XDRERR

 ;

 ; Called by: XDRDMAIN,XDRDSCOR,XDRDUP,XDRMAINI,XDRU1

 ;

 ; Calls: XMB

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---XDRDOC1   2615     printed  Apr 09, 2024@21:42:21                                                                                                                                                                                                     Page 2

XDRDOC1   ;IHS/OHPRD/JCM - DOCUMENTATION OF KERNEL ROUTINES ;07/06/93  16:46

 +1       ;;7.3;TOOLKIT;;Apr 25, 1995

 +2       ;

XDRDQUE   ; START AND STOP DUPLICATE CHECKER SEARCH

 +1       ;

 +2       ; Called by: XDRDCOMP,XDRDLIST,XDRDSCOR,XDRMADD if XDRFL or

 +3       ;            XDRFL not defined

 +4       ;

 +5       ; Calls : %ZTLOAD,DIC,DIE,Y^DIQ,DIR,CHECK^XDRU1

 +6       ;

 +7       ;FILE

 +8       ;** I would suggest some sort of screen to allow users to select only

 +9       ;** files that they have access for

 +10      ;

 +11      ;CHECK

 +12      ; Checks the Duplicate Resolution file to make sure that all

 +13      ; the information for the Duplicate Resolution software to

 +14      ; run is present.  Checks for existance of Candidate Collection

 +15      ; routine, Potential Duplicate Threshold, and that there are

 +16      ; Duplicate Tests entered in the Duplicate Tests multiple.

 +17      ;

XDRDSCOR  ; SETS SCORES FOR DUPLICATE CHECKING ALGORITHM

 +1       ;

 +2       ; Input Variables: XDRFL,XDRD(0)

 +3       ;

 +4       ; Output Variables - XDRDSCOR(,XDRDTEST(

 +5       ;

 +6       ; Called by: XDRDCOMP,XDRDMAINI,XDRDUP,XDRMADD

 +7       ;

 +8       ; Calls: FILE^XDRDQUE,XDREMSG

 +9       ;

XDRDSTAT  ; DISPLAY STATUS OF SEARCH

 +1       ;

 +2       ; Input variables: XDRFL

 +3       ;

 +4       ; Calls: DIC,Y^DIQ

 +5       ;

XDRDUP    ; CHECKS TWO RECORDS TO SEE IF DUPLICATES

 +1       ;

 +2       ; Input variables: XDRFL,XDRDPDA

 +3       ;

 +4       ; Called by: XDRDADJ,XDRDCOMP,XDRDMAIN,XDRMADD

 +5       ;

 +6       ; Calls: EN^DIQ1,XDRDADD,XDRDSCOR,XDREMSG

 +7       ;

XDREMSG   ; ERROR MESSAGE PROCESSOR

 +1       ;

 +2       ; This routine is responsible for either sending error messages to

 +3       ; the operator or if the calling routine is running in background

 +4       ; it will send a bulletin to the people in the Duplicate Manager

 +5       ; mail group if one is defined.

 +6       ;

 +7       ; The following meanings of XDRERR=

 +8       ;

 +9       ; 1=      The Candidate Collection Routine is Undefined

 +10      ; 2=      The Candidate Collection Routine is not present

 +11      ; 3=      The Potential Duplicate Threshold is Undefined

 +12      ; 4=      There are no Duplicate Tests entered for this Duplicate

 +13      ;         Resolution entry

 +14      ; 5=      The Global root node in DIC is undefined

 +15      ; 6=      No entry in Duplicate Resolution file for this file

 +16      ; 7=      The From and To Record are undefined

 +17      ; 8=      The test routine is not present

 +18      ; 9=      The routine defined as the Pre-Merge routine is not present

 +19      ; 10=     The routine defined as the Post-Merge routine is not present

 +20      ; 11=     The routine defined as the Verified Msg routine is

 +21      ;         not present

 +22      ; 12=     The routine defined as the Merged Msg routine is not present

 +23      ; 13=     Non-Interactive Merge style not allowed with Dinum Files

 +24      ;         for Merge entries

 +25      ;

 +26      ; Input Variables: XDRERR

 +27      ;

 +28      ; Called by: XDRDMAIN,XDRDSCOR,XDRDUP,XDRMAINI,XDRU1

 +29      ;

 +30      ; Calls: XMB