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

Package: Registration

Routine: DGDIS


Information

DGDIS ;ALB/JDS,RN - DISPOSITION A REGISTRATION ; 8/6/04 3:17pm

Source Information

Source file <DGDIS.m>

Entry Points

Name Comments DBIA/ICR reference
GETL
FIND
DP
ANS ;
DISP
DONE
Q
CHT
DEL
ODS ;if operation desert shield admission, create an entry in the ODS ADMISSIONS file
MT ;Check if user requires a means test. Ask user if s/he wants to
ACT ;Execute Program Action
BEFORE(DFN,SDDT,SDEVT,SDISHDL) ; -- set 'before' vars for opt evt drv
; -- use tag for NEWing
EVT(DFN,SDDT,SDEVT,SDISHDL) ; -- opt evt drv
; -- use tag for NEWing
VALIDATE(DFN,DFN1) ; -- c/o validator
; -- use tag for NEWing

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no open registrations to disposition for this patient.",!!,*7,*7
  • Line Location: FIND+1
Function Call: WRITE
  • Prompt: !!,"LOG DATE",?20,"TYPE OF BENEFIT APPLIED FOR",!
  • Line Location: DP+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: DP+0
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT($E($P(L,U),1,12),"5Z"),?20,$P($P(L2,L3,2),";",1)
  • Line Location: DP+2
Function Call: WRITE
  • Prompt: !!,"Primary Eligibility Code and Period of Service are unspecified."
  • Line Location: ANS+18
Function Call: WRITE
  • Prompt: !!,"Primary Eligibility Code is unspecified."
  • Line Location: ANS+19
Function Call: WRITE
  • Prompt: !!,"Period of Service is unspecified."
  • Line Location: ANS+20
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !!,"A disposition must be entered to continue.",!!,*7,*7
  • Line Location: DISP+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !!,"A disposition must be entered to continue.",!!,*7,*7
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !!,"A disposition must be entered to continue.",!!,*7,*7
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !!,"A disposition must be entered to continue.",!!,*7,*7
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: !!,"***** Registration dispositioned *****",!!,*7
  • Line Location: DISP+23
Function Call: WRITE
  • Prompt: !!,"* Disposition deleted *",!!,*7,*7
  • Line Location: DEL+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
2.101 GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call