IBJDF2 ;ALB/CPM - THIRD PARTY FOLLOW-UP SUMMARY REPORT ;Feb 09, 2018@10:11:43
Source file <IBJDF2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; - Option entry point.
|
|
DATE | ; - Choose date to use for calculation
|
|
TYP | ; - Select type of summaries to print.
; IB*2.0*554 DRF 10/19/2015 Add Non-VA care |
|
DQ | ; - Tasked entry point.
|
|
ENQ | ||
ENQ1 | ||
SUM(IBDIV) | ; - Print the report.
; Input: IBDIV=Pointer to the division in file #40.8 |
|
SUMQ | ||
DASH(X) | ; - Return a dashed line.
|
|
PAUSE | ; - Page break.
|
|
DHLP | ; - 'Display Registration User' help.
|
|
CAT(X) | ; - Determine category to place receivable.
|
|
ACT(X) | ; - Determine the activation date for a receivable.
|
|
ACTQ | ||
DATE1(X) | ; - Determine the Date of Care
|
|
DATEQ | ||
DIV(IBX) | ; - Determine the division for a claim.
; Input: IBX=Pointer to a claim in file #399 ; Output: IBY=Pointer to a division in file #40.8, ; or 0 if not determined |
|
DIVQ | ; - If a division cannot be determined, use the primary division.
|
|
INP(X) | ; - Return division for a movement.
|
|
OPT(X,DFN) | ; - Return division for a patient's outpatient visit date.
|
|
OPTQ | ||
CATN | ; - List of category names.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^PRCA(430.2 - [#430.2] | GET1^DIQ |