- AUPNLKDP ; IHS/CMI/LAB - PGMR DOCUMENTATION FOR AUPNLK (PATIENT LOOKUP) 24-MAY-1993 ;
- ;;99.1;IHS DICTIONARIES (PATIENT);;MAR 09, 1999
- ;
- PGMR ; Programmer documentation
- ;
- ; There are seven functional routines in the IHS PATIENT LOOKUP:
- ;
- ; AUPNLK - Main driver
- ; AUPNLK1 - Looks up on xrefs
- ; AUPNLK2 - Adds new patients
- ; AUPNLK3 - Checks for duplicates
- ; AUPNLKD - Actual duplicate checking logic. Called by AUPNLK3
- ; AUPNLKID - Prints identifiers and duplicate patient messages
- ; AUPNLKUT - Contains functions common to multiple routines
- ;
- ; AUPNLKI is the initialization logic for AUPNLK.
- ;
- ; Routines broken up because of size will create a new
- ; routine with B appended (e.g. AUPNLKB & AUPNLK2B).
- ;
- ; Use caution with the following variables:
- ;
- ; AUPDIC, AUPDICS, AUPDICW - All used to save a variable that needs
- ; to be restored.
- ; AUPX - Input value for patient lookup. Common to most routines.
- ; AUPDFN - Flag indicating lookup status - patient DFN if found.
- ; Common to most routines.
- ; AUP("DR") - Used to build DIC("DR") string - AUPNLK2 only.
- ; AUP("NOPRT^") - Used to suppress printing in PRTAUP^AUPNLKUT.
- ; Used by AUPNLK and AUPNLK1.
- ; AUPS(s) - Used to store all xref lookup hits. Used by AUPNLK,
- ; AUPNLK1, and AUPNLKUT. Contains the patient's NAME_"^"_
- ; LOOKUP VALUE which caused the hit.
- ; AUPNICK(s) - Indicates hit on ALIAS. Used by AUPNLK, AUPNLK1,
- ; AUPNLKUT.
- ; AUPIFNS(s) - Used to table all xref lookup hits stored by hit
- ; sequence. Used by AUPNLK, AUPNLK1, and AUPNLKUT.
- ; AUPCNT - Indicates # of hits stored in AUPIFNS(s). Used by
- ; AUPNLK, AUPNLK1, and AUPNLKUT.
- ; AUPNUM - Used to display AUPIFNS(s) list. Used by AUPNLK, AUPNLK1
- ; and AUPNLKUT.
- ; AUPSEL - Indicates patient from AUPIFNS(s) selected by user.
- ; Used by AUPNLK, AUPNLK1, and AUPNLKUT.
- ; AUPIFN - Patient DFN taken from xrefs by $O. Used by AUPNLK,
- ; AUPNLK1, and AUPNLKUT.
- ; AUPIDS(s) - Used to build list of identifiers. Created by
- ; AUPNLK2 but referenced by AUPNLK3.
- ; AUPD(s) - List of potential duplicates. Created by AUPNLKD
- ; but referenced by AUPNLK3.
- ;
- M ; MARKER FOR INSERTIONS
- AUPNLKDP ; IHS/CMI/LAB - PGMR DOCUMENTATION FOR AUPNLK (PATIENT LOOKUP) 24-MAY-1993 ;
- +1 ;;99.1;IHS DICTIONARIES (PATIENT);;MAR 09, 1999
- +2 ;
- PGMR ; Programmer documentation
- +1 ;
- +2 ; There are seven functional routines in the IHS PATIENT LOOKUP:
- +3 ;
- +4 ; AUPNLK - Main driver
- +5 ; AUPNLK1 - Looks up on xrefs
- +6 ; AUPNLK2 - Adds new patients
- +7 ; AUPNLK3 - Checks for duplicates
- +8 ; AUPNLKD - Actual duplicate checking logic. Called by AUPNLK3
- +9 ; AUPNLKID - Prints identifiers and duplicate patient messages
- +10 ; AUPNLKUT - Contains functions common to multiple routines
- +11 ;
- +12 ; AUPNLKI is the initialization logic for AUPNLK.
- +13 ;
- +14 ; Routines broken up because of size will create a new
- +15 ; routine with B appended (e.g. AUPNLKB & AUPNLK2B).
- +16 ;
- +17 ; Use caution with the following variables:
- +18 ;
- +19 ; AUPDIC, AUPDICS, AUPDICW - All used to save a variable that needs
- +20 ; to be restored.
- +21 ; AUPX - Input value for patient lookup. Common to most routines.
- +22 ; AUPDFN - Flag indicating lookup status - patient DFN if found.
- +23 ; Common to most routines.
- +24 ; AUP("DR") - Used to build DIC("DR") string - AUPNLK2 only.
- +25 ; AUP("NOPRT^") - Used to suppress printing in PRTAUP^AUPNLKUT.
- +26 ; Used by AUPNLK and AUPNLK1.
- +27 ; AUPS(s) - Used to store all xref lookup hits. Used by AUPNLK,
- +28 ; AUPNLK1, and AUPNLKUT. Contains the patient's NAME_"^"_
- +29 ; LOOKUP VALUE which caused the hit.
- +30 ; AUPNICK(s) - Indicates hit on ALIAS. Used by AUPNLK, AUPNLK1,
- +31 ; AUPNLKUT.
- +32 ; AUPIFNS(s) - Used to table all xref lookup hits stored by hit
- +33 ; sequence. Used by AUPNLK, AUPNLK1, and AUPNLKUT.
- +34 ; AUPCNT - Indicates # of hits stored in AUPIFNS(s). Used by
- +35 ; AUPNLK, AUPNLK1, and AUPNLKUT.
- +36 ; AUPNUM - Used to display AUPIFNS(s) list. Used by AUPNLK, AUPNLK1
- +37 ; and AUPNLKUT.
- +38 ; AUPSEL - Indicates patient from AUPIFNS(s) selected by user.
- +39 ; Used by AUPNLK, AUPNLK1, and AUPNLKUT.
- +40 ; AUPIFN - Patient DFN taken from xrefs by $O. Used by AUPNLK,
- +41 ; AUPNLK1, and AUPNLKUT.
- +42 ; AUPIDS(s) - Used to build list of identifiers. Created by
- +43 ; AUPNLK2 but referenced by AUPNLK3.
- +44 ; AUPD(s) - List of potential duplicates. Created by AUPNLKD
- +45 ; but referenced by AUPNLK3.
- +46 ;
- M ; MARKER FOR INSERTIONS