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

Package: Scheduling

Routine: SDESOPENVETREQS


Information

SDESOPENVETREQS ;ALB/JAS,ANU - REPORT OF ALL OPEN VETERAN REQUESTS ; JUL 15, 2023

Source Information

Source file <SDESOPENVETREQS.m>

Entry Points

Name Comments DBIA/ICR reference
REQSBYVETS ;
SRTOPT() ;
; 1 - Date Entered (Default)
; 2 - Patient Name
SRTRECS(REQIENS,SRTOPT) ;
HEADER ; Header for report data
DETAIL ; Detail line for Open Vet Request
DEVOPEN ;Prompt for device
DEVCLOSE ;Close device
EXIT ;Clean-up local vars and temp globals

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!,?21,"ALL OPEN VETERAN REQUESTS REPORT OPTIONS",!!
  • Line Location: SRTOPT+5
Function Call: WRITE
  • Prompt: !,"PATIENT NAME^LAST FOUR OF SSN^INSTITUTION^SERVICE/SPECIALTY"
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: "^REQUEST ENTRY DATE^WAIT TIME^PID^LAST PATIENT CONTACT"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,VRDATA1_"^"_VRDATA2_"^"_VRDATA3_"^"
  • Line Location: DETAIL+11
Function Call: WRITE
  • Prompt: ^TMP("SDESOPENVETREQS",$J,VRSRT1,VRSRT2,VRIEN,"COMM",COMMLN)_" | "
  • Line Location: DETAIL+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^SDEC(409.85 - [#409.85] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call