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

Package: Registration

Routine: DGOTHMG2


Information

DGOTHMG2 ;SHRPE/YMG - OTH Management actions (cont.) ;04/30/19

Source Information

Source file <DGOTHMG2.m>

Entry Points

Name Comments DBIA/ICR reference
AP ; add 90 day period
CLRPND(DGDFN) ; clear existing pending request
ASKCONT ; display "press <Enter> to continue" prompt
HEADER(DFN) ;
DISPERR(DGERR) ; display error message
ASKREQDT(MAXDT,DEFDT) ; prompt for date request submitted
ASKAUAP() ; prompt for authorization approved
ASKAUCMT() ; prompt for authorization comment
ASKAUBY() ; prompt for authorized by
ASKAURDT(MAXDT) ; prompt for authorization received date
ASKSTDT(MINDT,MAXDT) ; prompt for period start date
CHRCHK(STR) ; check if give string contains one of the characters '|', '^', '&', '\', '~'

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"365 Day Period: ",$S(NUM365>0:NUM365,1:"None")
  • Line Location: AP+15
Function Call: WRITE
  • Prompt: !," 90 Day Period: ",$S(NUM90>0:NUM90,1:"None")
  • Line Location: AP+16
Function Call: WRITE
  • Prompt: !!,"Days Remaining: ",$S(SDT90>0:DAYS,1:"N/A")
  • Line Location: AP+25
Function Call: WRITE
  • Prompt: !!,"Patient has been authorized for 180 days or more of care",!
  • Line Location: AP+33
Function Call: WRITE
  • Prompt: !!,"Existing pending request has been removed.",!
  • Line Location: CLRPND+7
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Press <Enter> to continue.",80)
  • Line Location: ASKCONT+2
Function Call: WRITE
  • Prompt: ?24,"START ADDITIONAL 90-DAY PERIOD"
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"Patient Name: ",DGNAME,?60,"DOB: ",DGDOB
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,DDASH,!
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !!,"Error while filing OTH data:",!,DGERR
  • Line Location: DISPERR+4
Info |  Source |  Entry Points |  Interaction Calls