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

Package: Registration

Routine: DGRPEIS1


Information

DGRPEIS1 ;ALB/MIR - CALLS TO ADD NEW PATIENT RELATIONS AND INCOME PERSONS ; 6/19/09 11:33am

Source Information

Source file <DGRPEIS1.m>

Entry Points

Name Comments DBIA/ICR reference
NEW ;check if data in FILE #408.12
NEWIP ;Add relation to #408.13 file
; In - DFN=IEN of File #2
; DGRP0ND=0 node of 408.13
; DGDEP=Optional count of children dependents associated with patient
NEWPR ;Add entry to file #408.12
DIC ;* GTS - DG*6.3*688 restructured the IF code and DIC("S") that follows
NEWPRQ
SETUP ; called from SPINACT / sets vars for ASOF tag
ASOF ;ask as of date
ASOFQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7," Required!!"
  • Line Location: DIC+8
Function Call: WRITE
  • Prompt: !?3,*7,"Effective date is prior to veteran's DOB (",$$GET1^DIQ(2,DFN,.03),")...deleted",!
  • Line Location: DIC+17
Function Call: WRITE
  • Prompt: Y
  • Line Location: SETUP+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DG(408.11 - [#408.11] Classic Fileman Calls
^DGPR(408.12 - [#408.12] Classic Fileman Calls
^DGPR(408.13 - [#408.13] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call