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 |  Used in RPC
Print Page as PDF
Routine: DVBAB82

Package: Automated Medical Information Exchange

Routine: DVBAB82


Information

DVBAB82 ;ALB/DJS - CAPRI DVBA REPORTS ; 01/24/12

Source Information

Source file <DVBAB82.m>

Entry Points

Name Comments DBIA/ICR reference
START(MSG,RPID,PARM) ; CALLED BY REMOTE PROCEDURE DVBAB REPORTS
END
CHECK ; VALIDATE INPUT PARAMETERS
SDPP ; Report # 7 - Full (Patient Profile MAS) Report
ENDDT() ;Calculate end date for "all" date
VIEW ; Report # 9 - View Registration Data Report
; Parameters
; ==========
; DFN : Patient Identification Number
DSRP ; Report # 6 - Reprint a Notice of Discharge Report
; Parameters
; % : 1=Report on all veterans for a given day (BDATE required)
; : 0=Report on a single Veteran (DFN required)
; BDATE : Original Processing Date - $H/FileMan
; DFN : Patient Identification Number
SPRPT ; Report # 8 - OP(Operation Report)
CRPON ; Report # - 4 Reprint C&P Final Report
VBACRPON ; Report # - 4 Reprint C&P Final Report by VBA personnel
CIRPT ; Report # 5 - Insufficient Exam Report
EXMTPE ;exam types (retrieve all for filter)
INREAS ;insufficient reason (validate specific or retrieve all)
CRMS ; Report # 1 - Regional Office 21- day Certificate Printing Report.
; No Parameters
CRRR ; Report # 2 - Reprint a 21 - day Certificate for the RO
CPRNT ; Report # 3 - Print C&P Final Report (manual) Report
; No Parameters
VAL ; VALIDATE PATIENT
VALDATE(DVBADTE) ;Validate Date
CNHDEOC ; Report #10 - FBCNH Display Episode of Care
; Parameters
; ==========
; DFN : IEN in PATIENT (#2) file
; IFN : IEN in FEE CNH ACTIVITY (#162.3) file
CNHRP ; Report #11 - FBCNH Roster Print
; Parameters
; ==========
; DVBADLMTD : 0 (Standard) or 1 (Delimited)
;
CNHRAD ; Report #12 - FBCNH Report of Admissions/Discharges
; Parameters
; ==========
; BEGDATE : Start date in FM format
; ENDDATE : End date in FM format
; DVBADLMTD : 0 (Standard) or 1 (Delimited)
CNHSE90D ; Report #13 - FBCNH Stays in Excess of 90 Days
; Parameters
; ==========
; FBDT : Effective date in FM format
; DVBADLMTD : 0 (Standard) or 1 (Delimited)
HFS() ; -- get hfs file name
HFSOPEN(HANDLE,DVBHFS,DVBMODE) ; Open File
HFSCLOSE(HANDLE,DVBHFS) ;Close HFS and unload data
IOF() ;used to reset position and insert page break flag when @IOF is executed.
REQSTAT ; Report #14 - Request Status by Date Range
; Parameters
; ==========
; BEGDAT : Start date in FM format
; ENDDAT : End date in FM format
; REQSTAT : Request Status filter
; ISDELIM : 0 (Standard format); 1 (Delimited format)
; ISNODT : 0 (Use date range); 1 (Ignore date range)
DVBA8861 ; Report #15 - Form 28-8861 Status Report
; Parameters
; ==========
; BEGDAT - Start date in FM format
; ENDDAT - End date in FM format
; ROSTAT - Regional Office filter
; REQSTAT - Request Status filter
; DELIMTER - 0 (Standard format); 1 (Delimited format)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?($X+5),"Discharge date: ",$$FMTE^XLFDT(DISCH,"5DZ")
  • Line Location: DSRP+21
Function Call: WRITE
  • Prompt: *7,!!,"This does not belong to your RO.",!!
  • Line Location: DSRP+22
Function Call: WRITE
  • Prompt: !!," * * The Operation Report for this case is not yet available. * *"
  • Line Location: SPRPT+16
Function Call: WRITE
  • Prompt: !!,*7,"Those results do not belong to your office.",!!
  • Line Location: CRPON+30
Function Call: WRITE
  • Prompt: *7,!!,"This request has not been released to the Regional Office yet.",!!
  • Line Location: CRPON+32
Function Call: WRITE
  • Prompt: *7,!!,"This has never been printed.",!!
  • Line Location: CRPON+33
Function Call: WRITE
  • Prompt: *7,!!,"This request has not been released to the Regional Office yet.",!!
  • Line Location: CRPON+36

Used in RPC

RPC Name Call Tags
DVBAB REPORTS START
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC