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

Package: Accounts Receivable

Routine: RCDMCUT2


Information

RCDMCUT2 ;HEC/SBW - Utility Functions for Hold Debt to DMC Project ;30/AUG/2007

Source Information

Source file <RCDMCUT2.m>

Entry Points

Name Comments DBIA/ICR reference
DEVICE(ROUTINE,DESC,STOPIT,RCSCR,BEGDT,EXCEL,RCTYPE,RCDMC) ;
STOPIT() ; Checks if user requested task to stop
EXCEL() ; - Returns whether to capture data for Excel report.
HEXC ; - 'Do you want to capture data...' prompt
EXMSG ; - Displays the message about capturing to an Excel file format
GETTYPE(STOPIT) ; Choose a (S)ummary or (D)etail or (E)xcel Delimited Report
GETTYPE2(STOPIT) ; Choose a (S)ummary or (D)etail
BILLPAYS() ; Do you want to see only bills with payments?
GETDMC(STOPIT) ;Chose DMC Debt Valid field value to include Null, Pending,
; Yes, No and All vallues
EXTTYPE(TYPE) ;Get Set of Code external format for Report type
EXTDMC(VAL) ;Get Set of Code external format for DMC Debt Valid field value
DATE(PROMPT,PROMPT2,BEG,END,DTYPE) ;Get beginning and Ending dates
DATE2(PROMPT,PROMPT2,BEG,END,DTYPE) ;Get beginning and Ending dates
GETBEGDT(PROMPT1,PROMPT2,DTPROMPT) ;Get beginning date
ARSTAT(STOPIT) ;Chose AR status
; Yes, No and All vallues
PAUSE ;If sending report to screen display pause message at screen bottom
PAUSE2 ;If sending report to screen display pause message at screen bottom;
ULINE(X,WIDTH) ;Display line of a given character

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVICE+18
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Request Queued. TASK = "_ZTSK,1:"REQUEST CANCELLED")
  • Line Location: DEVICE+31
Function Call: WRITE
  • Prompt: !
  • Line Location: EXCEL+10
Function Call: WRITE
  • Prompt: !!," Enter: 'Y' - To capture detail report data to transfer"
  • Line Location: HEXC+1
Function Call: WRITE
  • Prompt: !," to an Excel document"
  • Line Location: HEXC+2
Function Call: WRITE
  • Prompt: !," '<CR>' - To skip this option"
  • Line Location: HEXC+3
Function Call: WRITE
  • Prompt: !," '^' - To quit this option"
  • Line Location: HEXC+4
Function Call: WRITE
  • Prompt: !!?5,"This report may take a while to run. It is recommended that you Queue it."
  • Line Location: EXMSG+2
Function Call: WRITE
  • Prompt: !!?5,"To capture as an Excel format, it is recommended that you queue this"
  • Line Location: EXMSG+3
Function Call: WRITE
  • Prompt: !?5,"report to a spool device with margins of 256 and page length of 99999"
  • Line Location: EXMSG+4
Function Call: WRITE
  • Prompt: !?5,"(e.g. spoolname;256;99999). This should help avoid wrapping problems."
  • Line Location: EXMSG+5
Function Call: WRITE
  • Prompt: !!?5,"Another method would be to set up your terminal to capture the detail"
  • Line Location: EXMSG+6
Function Call: WRITE
  • Prompt: !?5,"report data. On some terminals, this can be done by clicking on the"
  • Line Location: EXMSG+7
Function Call: WRITE
  • Prompt: !?5,"'Tools' menu above, then click on 'Capture Incoming Data' to save to"
  • Line Location: EXMSG+8
Function Call: WRITE
  • Prompt: !?5,"Desktop. To avoid undesired wrapping of the data saved to the file,"
  • Line Location: EXMSG+9
Function Call: WRITE
  • Prompt: !?5,"please enter '0;256;99999' at the 'DEVICE:' prompt.",!
  • Line Location: EXMSG+10
Function Call: WRITE
  • Prompt: !
  • Line Location: GETTYPE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: GETTYPE2+11
Function Call: WRITE
  • Prompt: !
  • Line Location: BILLPAYS+10
Function Call: WRITE
  • Prompt: !
  • Line Location: GETDMC+17
Function Call: WRITE
  • Prompt: !,$G(PROMPT)
  • Line Location: DATE+15
Function Call: WRITE
  • Prompt: !,$G(PROMPT2)
  • Line Location: DATE+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+21
Function Call: WRITE
  • Prompt: !,$G(PROMPT)
  • Line Location: DATE2+15
Function Call: WRITE
  • Prompt: !,$G(PROMPT2)
  • Line Location: DATE2+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE2+21
Function Call: WRITE
  • Prompt: !!,$G(PROMPT1)
  • Line Location: GETBEGDT+11
Function Call: WRITE
  • Prompt: !
  • Line Location: GETBEGDT+17
Function Call: WRITE
  • Prompt: !
  • Line Location: ARSTAT+15
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue, '^' to exit:"
  • Line Location: PAUSE+3
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue:"
  • Line Location: PAUSE2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ULINE+7
Function Call: WRITE
  • Prompt: $G(X,"-")
  • Line Location: ULINE+8
Info |  Source |  Entry Points |  Interaction Calls