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

Package: Registration

Routine: DGMFR10


Information

DGMFR10 ;DAL/JCH - NDS DEMOGRAPHICS RACE MASTER ASSOCIATIONS REPORT ;15-AUG-2017

Source Information

Source file <DGMFR10.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; MRAC Report Entry point
MAIN ; Driver loop
DQ ; report (queue) starts here
PRINT ; Print output
PRINT2(DGRAC0) ; Get details
MUA(DGMUA) ; Select (M)apped, (U)nmapped, or(A)ll - entries from 10 mapped to 10.99
SUMMARY() ; ask to print detailed or summary report
OUT() ; select Excel or Report format
DELIM(DGRAC0,DGRACI)
SELDEV()
HEADER ; page break and report header information
PRINRAC(DGRACI)
INFO ; Display message, clear screen

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: MAIN+17
Function Call: WRITE
  • Prompt: !!!?5,"No Data Found"
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !?3,"VUID: ",$P(DGMV0,"^")
  • Line Location: PRINT2+22
Function Call: WRITE
  • Prompt: !
  • Line Location: MUA+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY+4
Function Call: WRITE
  • Prompt: !
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: !,"VA Race^Mapped/Not Mapped^Race Master"
  • Line Location: DELIM+3
Function Call: WRITE
  • Prompt: !,"VA Race^VA Race Abbreviation^VA Race Status^VA Race HL7 Code^VA Race PTF Code^Mapped/Not Mapped^Race Master Name^Race Master Code^Race Master Status^VUID"
  • Line Location: DELIM+4
Function Call: WRITE
  • Prompt: !,$P(DGRAC0,"^")
  • Line Location: DELIM+7
Function Call: WRITE
  • Prompt: "^",DGCTX
  • Line Location: DELIM+14
Function Call: WRITE
  • Prompt: "^",$S(DGMRACI:"MAPPED",1:"NOT MAPPED")
  • Line Location: DELIM+19
Function Call: WRITE
  • Prompt: "^",$P(DGMRAC0,"^")
  • Line Location: DELIM+21
Function Call: WRITE
  • Prompt: !
  • Line Location: SELDEV+15
Function Call: WRITE
  • Prompt: !,"You may queue this report to print at a later time.",!
  • Line Location: SELDEV+18
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: ?DGTAB,DGHDR
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: !!,"Race: ",$P(DGRAC0,"^")
  • Line Location: PRINRAC+1
Function Call: WRITE
  • Prompt: !?3,"HL7 Value: ",DGCT
  • Line Location: PRINRAC+6
Function Call: WRITE
  • Prompt: ?27,"PTF Value: ",DGCT2
  • Line Location: PRINRAC+7
Function Call: WRITE
  • Prompt: !,"Mapped to Race Master: ",$S(DGMRACI:"YES",1:"NO")
  • Line Location: PRINRAC+10
Function Call: WRITE
  • Prompt: !?3,"Race Master Name: ",$P(^TMP($J,"DGMFR10",DGRAC0,DGRACI,"MRACE"),"^")
  • Line Location: PRINRAC+12

FileMan Files Accessed Via FileMan Db Call

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