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

Package: Registration

Routine: DGRP11A


Information

DGRP11A ;ALB/LEG - REGISTRATION SCREEN 11.5/CAREGIVER ;Apr 05, 2020@16:48

Source Information

Source file <DGRP11A.m>

Entry Points

Name Comments DBIA/ICR reference
CHKCOLL(DFN) ; If patient Eligibility Codes include a COLLATERAL OF VET then return TRUE
MPICGCNT(DGCGRET) ; Return the number of CAREGIVER entries from MPI DGCGRET
; Input: DGCGRET - array of ALL returned records from MPI
; Return: DGCGNUM - number of CAREGIVER entries from MPI DGCGRET
MPIGETCG(DGCGRET,DGCG,DGCGTCNT) ;Get array of CAREGIVER entries from MPI DGCGRET
; Inputs:
; DGCGRET - array of ALL returned records from MPI
; Ouputs:
; DGCG - array of only Caregiver records from MPI
; DGCGTCNT - total number of only Caregiver recs
MPISORT(DGCGARRIN,DGCGARROUT,DGCGSORTPC) ; sorts the input array by data piece; default is 7=STATUS DATE, descending
; DGCGARRIN - Input array of Caregiver data records to be sorted by Status Date
; DGCGARROUT - Output array of Caregiver data records sorted by Status Date
; DGCGSORTPC - Piece number of array data to sort by (Status Date)
; DGCGARRTMP - Intermediate array of Caregiver data being sorted by Status Date

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Caregiver Status Data: "
  • Line Location: DGRP11A+7
Function Call: WRITE
  • Prompt: "(WARNING: MPI CONNECTION NOT AVAILABLE - Systems will",!,"be updated automatically when MPI is available. No further action needed to",!,"update.)"
  • Line Location: DGRP11A+10
Function Call: WRITE
  • Prompt: "(",DGCGTCNT_$S(DGCGTCNT=1:" entry",1:" entries"),")"
  • Line Location: DGRP11A+13
Function Call: WRITE
  • Prompt: " Community Care Program (CCP) Collateral Data "
  • Line Location: DGRP11A+26

FileMan Files Accessed Via FileMan Db Call

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