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: DGEN339

Package: Registration

Routine: DGEN339


Information

DGEN339 ;ALB/SCK - IVMB HEC CLEANUP - VETERAN MERGE EXTRACT ; 1/13/2001

Source Information

Source file <DGEN339.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point for veteran merged pair collection and transmission to the HEC
QUE ;
TEST(MODE) ; Test entry point for development testing. This entry point is not
; supported for user use.
COLLECT(DGEXTRCT,DGDATA) ; Collect Merge From and Merge To pair from XDR Repointed Entry File
; Append ICN to end of merge pair using API call
BUILD(DGEXTRCT,DGDATA,MAX,DGDEST) ; Build and send mailman messages of veteran pairs
SEND(DGDATA,DGMSG,DGDEST) ; Build and send individual mailman messages
NOTIFY(DGDATA) ; Send notification message to local mailgroup.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?2,*7,">> There were no patient merge entries in the XDR REPOINTED ENTRY File (15.3)"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !?2,">> Please check that the Duplicate Patient Merge was completed."
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"Task Number: ",ZTSK
  • Line Location: EN+22

FileMan Files Accessed Via FileMan Db Call

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