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
Print Page as PDF
Routine: BPSSCRCV

Package: E Claims Management Engine

Routine: BPSSCRCV


Information

BPSSCRCV ;BHAM ISC/SS - ECME SCREEN CHANGE VIEW ;05-APR-05

Source Information

Source file <BPSSCRCV.m>

Entry Points

Name Comments DBIA/ICR reference
CV ;
CV1 ;
EDITPROF(BPARR,BPDUZ7) ;
BPS113 ; FIELD 1.13 - Division
DATETIME ; Display by Date Range or Timeframe
; Prompt the user to select Display Activity Date Range or Timeframe.
ERRMSG(BPMSG) ;
EDITFLD(FLDNO,RECIEN,DIR0,PRMTMSG,DFLTVAL,BPARRAY) ;*/
FILEIT(FILENO,FLDNO,RECIEN,NEWVAL) ;
PROMPT(ZERONODE,PRMTMSG,DFLTVAL) ;
GETFLD(FILENO,FLDNO,RECIEN) ;
FILEALL(BPARRAY,BPDUZ7) ;
ACTTYP() ; Prompt the user to select Display Activity Date Range or Timeframe.
; The user is required to select D or T and there is no default value.
;
BEGDATE() ; Enter Activity Beginning Date when Date Range is selected
BEGDATE1 ;
ENDDATE() ; Enter Activity Ending Date when Date Range is selected
ENDDATE1 ;
DTERNG ; Date Range Check
; If ALL patients selected, verify the user preferred time frame
; is not outside of the allowable range. If time frame is outside
; of the allowable range, update range to the past 7 days.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CV+3
Function Call: WRITE
  • Prompt: !!,"Beginning and Ending Dates are required for Date Range"
  • Line Location: DATETIME+22
Function Call: WRITE
  • Prompt: !,"***",BPMSG,"***",!
  • Line Location: ERRMSG+1
Function Call: WRITE
  • Prompt: !,"Enter a date less than or equal to "_$$FMTE^XLFDT($$NOW^XLFDT(),"D"),!
  • Line Location: BEGDATE1+10
Function Call: WRITE
  • Prompt: " (",Y(0),")"
  • Line Location: BEGDATE1+12
Function Call: WRITE
  • Prompt: !!,"Ending Date precedes Beginning Date.",!
  • Line Location: ENDDATE1+10
Function Call: WRITE
  • Prompt: !!,"Date range exceeds "_BPSDAYS_" day limit. Select an Ending Date no more"
  • Line Location: ENDDATE1+13
Function Call: WRITE
  • Prompt: !,"than "_BPSDAYS_" days after the Beginning Date.",!
  • Line Location: ENDDATE1+14
Function Call: WRITE
  • Prompt: " (",Y(0),")"
  • Line Location: ENDDATE1+16
Function Call: WRITE
  • Prompt: !!,"Date range exceeds 180 day limit which is not allowed when all patients"
  • Line Location: DTERNG+18
Function Call: WRITE
  • Prompt: !,"are selected. The window of time has changed from "_BPSDAYS_" days to the"
  • Line Location: DTERNG+19
Function Call: WRITE
  • Prompt: !,"last 7 days."
  • Line Location: DTERNG+20
Info |  Source |  Entry Points |  Interaction Calls