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

Package: Registration

Routine: DGPFUT1


Information

DGPFUT1 ;ALB/RBS - PRF UTILITIES CONTINUED ; 6/9/06 10:56am

Source Information

Source file <DGPFUT1.m>

Entry Points

Name Comments DBIA/ICR reference
DISPACT(DGPFAPI) ;Display all ACTIVE Patient Record Flag's for a patient
; Input: DGPFAPI() = Array of patients active flags
; (passed by reference)
; See $$GETACT^DGPFAPI for array format.
; Output: None
ASKDET() ;does user want to display flag details?
DISPPRF(DGDFN) ; Patient Record Flags screen Display
SELPAT(DGPAT) ;This procedure is used to perform a patient lookup for an existing patient in the PATIENT (#2) file.
GETFLAG(DGPFPTR,DGPFLAG) ;retrieve a single FLAG record
; This function acts as a wrapper around the $$GETLF and $$GETNF
; API's. Function will be used to obtain a single flag record from
; either the PRF LOCAL FLAG (#26.11) file or the PRF NATIONAL FLAG
; (#26.15) file depending on the value of the DGPFPTR input parameter.
PARENT(DGCHILD) ;lookup and return the parent of a child
FMTPRNT(DGCHILD) ;lookup and return parent of a child in display format
CNTRECS(DGFILE) ;return number of records of a file

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ">>> Active Patient Record Flag(s):"
  • Line Location: DISPACT+13
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue..."
  • Line Location: DISPACT+25
Function Call: WRITE
  • Prompt: ">>> Active Patient Record Flag(s):"
  • Line Location: DISPACT+28
Function Call: WRITE
  • Prompt: !?5,IORVON,"<"_DGPFFLAG_">",IORVOFF,?45,"CATEGORY ",DGPFCAT
  • Line Location: DISPACT+33
Function Call: WRITE
  • Prompt: !,"Do you wish to view active patient record flag details"
  • Line Location: ASKDET+10
Function Call: WRITE
  • Prompt: !,"Enter either 'Y' or 'N'."
  • Line Location: ASKDET+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call