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

Package: Integrated Billing

Routine: IBJD


Information

IBJD ;ALB/CPM - DIAGNOSTIC MEASURES UTILITIES ; 16-DEC-96

Source Information

Source file <IBJD.m>

Entry Points

Name Comments DBIA/ICR reference
DS ; Print a (S)ummary or (D)etail Report?
SDIV() ; - Sort by division.
; Output: SDIV = 1 - Sort by Division / 0 - Do not sort by Division
; or "^" - User selected "^"
; VAUTD = 1 - All divisions selected / 0 - Specific divisions
; VAUTD(DIV) = Divsions selected
QDIV
MLTP(PRPT,OPT,ALL) ; Function for multiple value selection
; Input: PRPT - String to be prompted to the user, before listing options
; OPT - Array containing the possible entries (indexed by code)
; Obs: Code must be sequential starting with 1
; ALL - Flag indicating if the last option is ALL OF THE ABOVE
PRPT
QT
SNL() ; - Determine the sorting of the patient (By Name or Last 4 SSN)
; Output: SNL = "N" (Name)/"L" (Last 4 SSN) ^ "NAME" or "LAST 4"
INTV(SORT) ; Selects the interval
; Output: First value ^ Last Value ^ "ALL"/"NULL"/""
FRST
LAST
QINT
EXCEL() ; - Returns whether to catpture data for Excel report.
; Output: EXCEL = 1 - YES (capture data) / 0 - NO (DO NOT capture data)
CLMACT(X,Y) ; - Check if AR has a corresponding claim or IB action.
; Input: X=Claim/AR pointer to file #399/#430
; Y=AR category pointer to file #430.2
; Output: Z=1-IB action, 2-Claim, 3-No IB action or claim
; ^ IB action IEN (if 1) or AR/claim IEN (if 2 or 3)
; OR null=Invalid IB action or claim
CLAC1 ; - Check for IB claim.
CLACQ
ALSP(PRPT,FILE,ARR) ; Selection of (A)LL or (S)pecific values from a given file
; Input: PRPT - Piece 1: Label for the PROMPT to be asked for the
; selection (in the plural) - e.g. "Providers"
; Piece 2: Singular of piece 1 - e.g. "Provider"
; Exaple: "Specialties^Specialty"
; FILE - File global root (e.g., "^IBE(356.8," ) that the values
; will be selected from
; ARR - Name of the array that will contain the specific values
; (must be passed as a refernce value ".ARR")
; Output: ARR - "A" - ALL values OR "S" - Specific values OR "^"
; The values will be returned in the array indicated in
; ARR parameter
ALSP1
ALSP2
QALSP
HDS ; Help for Summary/Detail prompt.
HDIV ; - 'Sort by division...' prompt
HNL ; - 'Sort Patients by (N)AME... ' prompt
HFST ; - 'START WITH PATIENT/DEBTOR...' prompt
HLST ; - 'GO TO PATIENT/DEBTOR' prompt
HEXC ; - 'Do you want to capture data...' prompt
HALSP ; - 'Run report for (A)LL or (S)pecific...' prompt.
EXMSG ; - Displays the message about capturing to an Excel file format
EXPAND(FILE,FIELD,VALUE) ; Resolve coded data.
EXPQ
DT(X,Y) ; - Return date.
; Input: X=Date in Fileman format
; Output: Z=Date in MMM DD,YYYY format or MMDDYY format if Y=1
DTQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: DS+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SDIV+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PRPT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: PRPT+19
Function Call: WRITE
  • Prompt: !
  • Line Location: SNL+8
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: FRST+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: LAST+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EXCEL+5
Function Call: WRITE
  • Prompt: !!,"Run report for (A)LL or (S)PECIFIC "_PRL_": A// "
  • Line Location: ALSP1+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ALSP1+1
Function Call: WRITE
  • Prompt: " ",$S("Ss"[X:"SPECIFIC",1:"ALL")
  • Line Location: ALSP1+3
Function Call: WRITE
  • Prompt: !!?3,"Already selected. Choose another "_SNG,*7,!
  • Line Location: ALSP2+6
Function Call: WRITE
  • Prompt: !,"Please enter 'S' for 'Summary' or 'D' for a Detailed Report."
  • Line Location: HDS+1
Function Call: WRITE
  • Prompt: !,"Note that if you select the Detailed report, the Summary will also print."
  • Line Location: HDS+2
Function Call: WRITE
  • Prompt: !!," Enter: '<CR>' - To print the report without regard to division"
  • Line Location: HDIV+1
Function Call: WRITE
  • Prompt: !!," 'Y' - To select those divisions for which a separate"
  • Line Location: HDIV+2
Function Call: WRITE
  • Prompt: !," report should be created"
  • Line Location: HDIV+3
Function Call: WRITE
  • Prompt: !," '^' - To quit this option"
  • Line Location: HDIV+4
Function Call: WRITE
  • Prompt: !!," Enter: '<CR>' - To select and sort patients by name"
  • Line Location: HNL+1
Function Call: WRITE
  • Prompt: !!," 'L' - To select and sort patients by the last 4"
  • Line Location: HNL+2
Function Call: WRITE
  • Prompt: !," of the SSN"
  • Line Location: HNL+3
Function Call: WRITE
  • Prompt: !," '^' - To quit this option"
  • Line Location: HNL+4
Function Call: WRITE
  • Prompt: !!," Enter a valid field value, or"
  • Line Location: HFST+1
Function Call: WRITE
  • Prompt: !!," '@' - To include null values"
  • Line Location: HFST+2
Function Call: WRITE
  • Prompt: !," '<CR>' - To start from the 'first' value for this field"
  • Line Location: HFST+3
Function Call: WRITE
  • Prompt: !," '^' - To quit this option"
  • Line Location: HFST+4
Function Call: WRITE
  • Prompt: !!," Enter a valid field value, or"
  • Line Location: HLST+1
Function Call: WRITE
  • Prompt: !!," '@' - To include only null values, if 'Start with'"
  • Line Location: HLST+2
Function Call: WRITE
  • Prompt: !," value is @"
  • Line Location: HLST+3
Function Call: WRITE
  • Prompt: !," '<CR>' - To go to the 'last' value for this field"
  • Line Location: HLST+4
Function Call: WRITE
  • Prompt: !," '^' - To quit this option",!
  • Line Location: HLST+5
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: !!?6,"Enter: '<CR>' - To select all "_PRL
  • Line Location: HALSP+1
Function Call: WRITE
  • Prompt: !?16,"'S' - To select one or more "_PRL
  • Line Location: HALSP+2
Function Call: WRITE
  • Prompt: !?16,"'^' - To quit this option"
  • Line Location: HALSP+3
Function Call: WRITE
  • Prompt: !!?5,"Before continuing, please set up your terminal to capture the"
  • Line Location: EXMSG+2
Function Call: WRITE
  • Prompt: !?5,"detail report data. On some terminals, this can be done by"
  • Line Location: EXMSG+3
Function Call: WRITE
  • Prompt: !?5,"clicking on the 'Tools' menu above, then click on 'Capture"
  • Line Location: EXMSG+4
Function Call: WRITE
  • Prompt: !?5,"Incoming Data' to save to Desktop. This report may take a"
  • Line Location: EXMSG+5
Function Call: WRITE
  • Prompt: !?5,"while to run."
  • Line Location: EXMSG+6
Function Call: WRITE
  • Prompt: !!?5,"Note: To avoid undesired wrapping of the data saved to the"
  • Line Location: EXMSG+7
Function Call: WRITE
  • Prompt: !?5," file, please enter '0;256;999' at the 'DEVICE:' prompt.",!
  • Line Location: EXMSG+8
Info |  Source |  Entry Points |  Interaction Calls