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

Package: Accounts Receivable

Routine: RCDPRTP0


Information

RCDPRTP0 ;ALB/LDB - CLAIMS MATCHING REPORT ;5/24/00 10:48 AM

Source Information

Source file <RCDPRTP0.m>

Entry Points

Name Comments DBIA/ICR reference
PAT
DATE
TYPE
BILL
REC
TYPEPIC(RCTYPE) ; function for user selection of care types PRCA*4.5*315
; RCTYPE is an output array, pass by reference
; RCTYPE(type)="" where type can be (I)npatient, (O)utpatient,(P)rosthetics or (R)x (Prescription)
; Function value is 1 if at least 1 care type was selected, 0 otherwise
; User can select one, all or a combination of care types.
FORMAT(RCEXCEL) ; capture the report format from the user (normal or CSV output) PRCA*4.5*315
; RCEXCEL=0 for normal output
; RCEXCEL=1 (^ separated values) for Excel output
; pass parameter by reference
DEVICE ; Device Selection for Excel output PRCA*4.5*315
; RCEXCEL=1 for Excel ('^' separated values) output
EXMSG ; - Displays the message about capturing to an Excel file format

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TYPEPIC+17
Function Call: WRITE
  • Prompt: !!,"User exited with '^', quitting",!
  • Line Location: TYPEPIC+29
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TYPEPIC+36
Function Call: WRITE
  • Prompt: !
  • Line Location: FORMAT+14
Function Call: WRITE
  • Prompt: !!,"Report compilation has started with task# ",ZTSK,".",!
  • Line Location: DEVICE+16
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
Info |  Source |  Entry Points |  Interaction Calls