IBJDI7 ;ALB/CPM - OUTPATIENT WORKLOAD REPORT ; 19-DEC-96
Source file <IBJDI7.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; - Option entry point.
|
|
DATE | ||
DQ | ; - Tasked entry point.
|
|
ENQ | ||
ENQ1 | ||
ENC(IBOE,IBOED) | ; - Extract encounter - must be called from DQ above.
|
|
ENCQ | ||
SUM | ; - Print the summary report.
|
|
DASH(X) | ; - Return a dashed line.
|
|
PAUSE | ; - Page break.
|
|
INS(IBOE,IBOED) | ; - Is this an insured encounter?
; Input: IBOE = IEN of outpatient encounter in file #409.68 ; IBOED = Outpatient encounter in file #409.68 ; Output: 1 = Insured encounter ; 0 = Not an insured encounter |
|
INSQ | ||
SC(OE) | ; - Is the encounter related to the veteran's SC condition?
; Input: OE = IEN of outpatient encounter in file #409.68 ; Output: SC = 1 (Encounter related to SC condition) ; 0 (Encounter NOT related to SC condition) |
|
DHLP | ; - Display 'Sort by division' help.
|
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 |
|