Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: XDRRMRG1

Package: Toolkit

Routine: XDRRMRG1


Information

XDRRMRG1 ;SF-IRMFO.SEA/JLI - DUP VERIFICATION FOR ANCILLARY SERVICES ;10/21/2010

Source Information

Source file <XDRRMRG1.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
LDATE
SHOW ;
CHK ;
CHK1
CHEKVER ;
SETUP(XDRDA) ;
VERWARN ;Warning message when ready to Verified Dupicates; p126-REM

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"NO DATA TO REVIEW....",!!
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SHOW+3
Function Call: WRITE
  • Prompt: !," RECORD"_N1_" contains fewer data elements, usually this would indicate",!," that this record would be merged INTO the other."
  • Line Location: SHOW+3
Function Call: WRITE
  • Prompt: !!,"Determine if these entries ARE or ARE NOT duplicates."
  • Line Location: SHOW+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW+7
Function Call: WRITE
  • Prompt: !,$S($D(LABEL(I)):LABEL(I),1:I),?20,$E(DFNFR(I),1,20),?45,$E(DFNTO(I),1,20)
  • Line Location: SHOW+16
Function Call: WRITE
  • Prompt: !
  • Line Location: SHOW+17
Function Call: WRITE
  • Prompt: !!,"There is NO DATA in the "_PACKAGE_" file for either entry."
  • Line Location: SHOW+19
Function Call: WRITE
  • Prompt: !!,"There is NO DATA in the "_PACKAGE_" file for (",DFNFRX,") ",DFNFR(1)," ",DFNFR(2)
  • Line Location: SHOW+20
Function Call: WRITE
  • Prompt: !!,"There is NO DATA in the "_PACKAGE_" file for (",DFNTOX,") ",DFNTO(1)," ",DFNTO(2)
  • Line Location: SHOW+21
Function Call: WRITE
  • Prompt: !!!,?20,"RECORD1 [#"_DFNFR_"]",?45,"RECORD2 [#"_DFNTO_"]"
  • Line Location: CHK1+18
Function Call: WRITE
  • Prompt: !,?20,DFNFR(1),?45,DFNTO(1)
  • Line Location: CHK1+19
Function Call: WRITE
  • Prompt: !!!,$C(7),"VERIFICATION ABORTED!",!
  • Line Location: CHK1+22
Function Call: WRITE
  • Prompt: !!,"*** WARNING!!! You have verified these two records are the SAME"
  • Line Location: VERWARN+1
Function Call: WRITE
  • Prompt: !,"patient. Once these records are merged, there is no automated way to"
  • Line Location: VERWARN+2
Function Call: WRITE
  • Prompt: !,"""un-do"" the merge. If you are not certain these are the same patient,"
  • Line Location: VERWARN+3
Function Call: WRITE
  • Prompt: !,"edit the status back to 'Potential Duplicate, Unverified' and repeat the"
  • Line Location: VERWARN+4
Function Call: WRITE
  • Prompt: !,"verification process. For additional assistance, please log a NOIS/Remedy"
  • Line Location: VERWARN+5
Function Call: WRITE
  • Prompt: !,"ticket. ***"
  • Line Location: VERWARN+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: VERWARN+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
15.02 FIND1^DIC
15.03 FIND1^DIC
^XMB(3.8 - [#3.8] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call