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

Package: Automated Medical Information Exchange

Routine: DVBAUTL7


Information

DVBAUTL7 ;ALB/GTS;UTILITY ROUTINE;12/6/94

Source Information

Source file <DVBAUTL7.m>

Entry Points

Name Comments DBIA/ICR reference
SEL7131() ;** Select a 7131 request
CHECK ;** Check 7131 for a pending report
INITRPT(DVBAIEN) ;** Set nodes for division updates on 7131
SETDR ;** Set DR string for 7131 division/tran date field updates
CLEARDR ;** Set DR string to clear 7131 division/tran date fields (7131 edit)
REQDT ;** Output 7131 date for DIC("W")
FILE ;** Update 7131 record - Called from DVBADXFR
RPTNMS ;
9 ;;Notice of Discharge
11 ;;Hospital Summary
13 ;;Certificate (21-day)
15 ;;Other/Exam (Review Remarks)
17 ;;Special Report
19 ;;Competency Report
21 ;;VA Form 21-2680
23 ;;Asset Information
7 ;;Admission Report
28 ;;Beginning Date Care
26 ;;OPT Treatment Report (Date Range)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?35,$S($P(^(2),U,10)="L":"Activity Date: ",$P(^(2),U,10)="A":"Admission Date: ",1:""),DVBADTE
  • Line Location: REQDT+10

FileMan Files Accessed Via FileMan Db Call

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