Routine: IBCOMA

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Entry point from option ; IBAIB - 1 (Patient Name Range) or 2 (Terminal Digit Range) sorting method ; IBAPPTE - Ending Appointment Date for filtering ; IBAPPTS - Starting Appointment Date for filtering ; IBBDT - Beginning Verification Date for filtering ; IBEDT - Ending Verification Date for filtering ; IBEXCEL - 1 for Excel Format, 0 for Report Format ; IBRF - First Patient Name or Terminal Digit, depending on sorting method ; IBRL - Last Patient Name or Terminal Digit, depending on sorting method ; IBPTYPE - 1 (Living Patients), 2 (Deceased Patients) or 3 (Both) ; IBSIN - 1 (Verified Policies), 2 (Non-Verified Policies) or 3 (Both)
STRT	;
PATLIFE	; IB2549 - Prompt for Living/Deceased Patient filter
VER	;
FILTYPE	; IB.2.0.549 added method
PVDATE	;
LADATE	;
FORMAT	; Prompt for Excel or Report Format
EXIT	;
WITEXT()	;
FORMATH	; Excel or Report Format Help
NR	; Ask Name Range
NRR	;
NRRHLP(LEVEL)	; ?? Help for the Range Prompt
TR	; Ask Terminal Digit Range
TRR	; IB*752/DTG new tag for return to if '^' on go to prompt
PATLIFEH	; Living/Deceased/Both patient filter help Text
FILTYPEH	; Filter by Verification Date or Last Appointment Date Help Text
GETDATES(TEXT,STRTDATE,ENDDATE)	; Ask Date Range
VRBDT	; - get begin date
VREDT	; - get ending date
VRQ	;
ENH	; Sort help Text
ICH	; Search criteria help Text
QUE	; Ask Device
QUEQ	; EXIT CLEAN-UP

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?10,"Identify Active Policies with NO Effective Date",! Line Location: STRT+3
Function Call: WRITE	Prompt: !! Line Location: STRT+14
Function Call: WRITE	Prompt: !! Line Location: PATLIFE+1
Function Call: WRITE	Prompt: !! Line Location: VER+1
Function Call: WRITE	Prompt: !! Line Location: FILTYPE+4
Function Call: WRITE	Prompt: !! Line Location: LADATE+4
Function Call: WRITE	Prompt: ! Line Location: FORMAT+1
Function Call: WRITE	Prompt: !! Line Location: FORMAT+11
Function Call: WRITE	Prompt: !,?5,"Enter E to Export data in a format readable by Microsoft Excel." Line Location: FORMATH+1
Function Call: WRITE	Prompt: !,?5,"Enter R to display output in Report format." Line Location: FORMATH+2
Function Call: WRITE	Prompt: !!,"Enter Start With value or Press <ENTER> to start at the beginning of the list.",! Line Location: NRR+2
Function Call: WRITE	Prompt: !!,"Enter Go To value or Press <ENTER> to finish at the end of the list.",! Line Location: NRR+10
Function Call: WRITE	Prompt: !!,?5,"* The Go to Patient Name must follow after the Start with Name. *",! Line Location: NRR+20
Function Call: WRITE	Prompt: !!,?5,"* The Go to Patient Name must follow after the Start with Name. *",! Line Location: NRR+21
Function Call: WRITE	Prompt: !!,?5,"Enter a value the Patient Name should ",LEVEL," with." Line Location: NRRHLP+1
Function Call: WRITE	Prompt: !,?5,"Press <ENTER> to start at the beginning of the list." Line Location: NRRHLP+2
Function Call: WRITE	Prompt: !,?5,"Press <ENTER> to finish at the end of the list." Line Location: NRRHLP+3
Function Call: WRITE	Prompt: !!,?5,"* The Go to Terminal Digit must follow after the Start with Digit. *",! Line Location: TRR+12
Function Call: WRITE	Prompt: !!,?5,"Enter 1 to only display Living Patients." Line Location: PATLIFEH+1
Function Call: WRITE	Prompt: !,?5,"Enter 2 to only display Deceased Patients." Line Location: PATLIFEH+2
Function Call: WRITE	Prompt: !,?5,"Enter 3 to display both Living and Deceased Patients." Line Location: PATLIFEH+3
Function Call: WRITE	Prompt: !!,?5,"Enter 1 to only display policies with a Verification Date falling" Line Location: FILTYPEH+1
Function Call: WRITE	Prompt: !,?11,"within a specified date range." Line Location: FILTYPEH+2
Function Call: WRITE	Prompt: !,?5,"Enter 2 to only display patients with a Last Appointment Date falling" Line Location: FILTYPEH+3
Function Call: WRITE	Prompt: !,?11,"within a specified date range." Line Location: FILTYPEH+4
Function Call: WRITE	Prompt: !!," Please enter ",TEXT," Dates:" Line Location: GETDATES+3
Function Call: READ	Formatting: ! Prompt: " Go to DATE: " Variable: X Timeout: DTIME Line Location: VREDT+2
Function Call: WRITE	Prompt: *7," ??",!,"ENDING DATE must follow BEGINNING DATE." Line Location: VREDT+2
Function Call: READ	Formatting: ! Prompt: " Go to DATE: " Variable: X Timeout: DTIME Line Location: VREDT+3
Function Call: WRITE	Prompt: *7," ??",!,"ENDING DATE must follow BEGINNING DATE." Line Location: VREDT+7
Function Call: WRITE	Prompt: " <Date Range not entered>" Line Location: VRQ+1
Function Call: WRITE	Prompt: !!,?5,"Enter 1 to search by a Patient Name Range. (i.e. ADAMS to ADAMSZ)" Line Location: ENH+1
Function Call: WRITE	Prompt: !!,?5,"Enter 2 to search by Terminal Digit. The output will be sorted" Line Location: ENH+2
Function Call: WRITE	Prompt: !?5,"by the 8th and 9th digits and then the 6th and 7th digits" Line Location: ENH+3
Function Call: WRITE	Prompt: !?5,"of the Patient's SSN.",! Line Location: ENH+4
Function Call: WRITE	Prompt: !!,?5,"Enter 1 to list active policies by Verification Date Range" Line Location: ICH+1
Function Call: WRITE	Prompt: !,?15,"(i.e. Sort Date By: 10-1-96 Go to Date: 01-1-97)" Line Location: ICH+2
Function Call: WRITE	Prompt: !,?5,"Enter 2 to list active policies with no Verification Date." Line Location: ICH+3
Function Call: WRITE	Prompt: !,?5,"Enter 3 to include active policies with or without a Verification Date." Line Location: ICH+4
Function Call: WRITE	Prompt: !!,?15,"... One Moment Please ..." Line Location: QUE+19
Function Call: WRITE	Prompt: ! Line Location: QUEQ+1

Customize PDF page

Package: Integrated Billing

Routine: IBCOMA

Information

Source Information

Entry Points

Interaction Calls