IBJD ;ALB/CPM - DIAGNOSTIC MEASURES UTILITIES ; 16-DEC-96
Source file <IBJD.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 3 | ^DIC Y^DIQ ^DIR |
| Integrated Billing | 1 | PSDR^IBODIV |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| 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 |
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | EXPAND+3 |
| ^DD("DD" | DT+5 |
| ^DG(40.8 - [#40.8] | SDIV+17 |
| ^DGCR(399 - [#399] | CLAC1+1, CLAC1+2 |
| ^DGCR(399.3 - [#399.3] | CLAC1+3 |
| ^IB - [#350] | CLMACT+11 |
| ^IB("ABIL" | CLMACT+10 |
| ^IBE(350.1 - [#350.1] | CLMACT+13 |
| ^PRCA(430 - [#430] | CLMACT+7 |
| Name | Line Occurrences |
|---|---|
| ALSP1 | ALSP1+2, ALSP2+4 |
| ALSP2 | ALSP2+5, ALSP2+7 |
| CLAC1 | CLMACT+10, CLMACT+11 |
| CLACQ | CLMACT+6, CLMACT+7, CLMACT+12, CLMACT+13, CLAC1+1, CLAC1+2, CLAC1+3 |
| DTQ | DT+3, DT+4 |
| EXPQ | EXPAND+2 |
| FRST | FRST+1 |
| HALSP | ALSP1+2 |
| HFST | FRST+1 |
| HLST | LAST+1 |
| LAST | LAST+1, LAST+4 |
| PRPT | PRPT+21 |
| QALSP | ALSP1+1, ALSP1+3, ALSP2+3, ALSP2+4 |
| QDIV | SDIV+12 |
| QINT | LAST+2, LAST+3 |
| QT | PRPT+8, PRPT+20 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | MLTP+9~, PRPT+4*, PRPT+5*, PRPT+6, PRPT+14* |
| ACT | CLMACT+6~, CLMACT+10*, CLMACT+11, CLMACT+13 |
| ALL | MLTP~, PRPT*, PRPT+11, PRPT+23 |
| ALNU | INTV+3~, INTV+5*, LAST+2*, LAST+3*, QINT |
| ARR | ALSP~, ALSP+14!, ALSP1+1*, ALSP1+3!*, ALSP1+4*, ALSP2+3!* |
| ARR( | ALSP2+5, ALSP2+7* |
| ARR("" | ALSP2+1, ALSP2+4 |
| BILL | CLMACT+6~, CLMACT+7*, CLMACT+10 |
| C | EXPAND+1~, EXPAND+3* |
| DIC | ALSP+13~, ALSP2*, ALSP2+3! |
| DIC("A" | ALSP2+1*, ALSP2+2* |
| DIC(0 | ALSP2* |
| DIR | DS+4!, SDIV+6~, SDIV+8!, SDIV+11!, MLTP+9~, PRPT+8!, PRPT+20!, PRPT+21!, SNL+3~, SNL+8! , EXCEL+3~, EXCEL+8! |
| DIR("?" | DS+3*, SDIV+10*, SNL+7*, EXCEL+7* |
| DIR("A" | DS+2*, SDIV+9*, PRPT+3*, PRPT+6*, PRPT+7*, PRPT+13*, PRPT+16*, PRPT+18*, PRPT+19*, SNL+6* , EXCEL+6* |
| DIR("B" | SDIV+8*, PRPT+7*, PRPT+19*, SNL+7*, EXCEL+5* |
| DIR("T" | SDIV+10*, PRPT+7*, PRPT+19*, SNL+7*, EXCEL+5* |
| DIR(0 | DS+1*, SDIV+8*, PRPT+2*, PRPT+13*, SNL+5*, EXCEL+5* |
| DIROUT | SDIV+12, SDIV+13!, MLTP+9~, PRPT+8, PRPT+9!, PRPT+20, PRPT+21!, SNL+3~, EXCEL+3~, EXCEL+8 , EXCEL+9! |
| DIRUT | SDIV+12, SDIV+13!, MLTP+9~, PRPT+8, PRPT+9!, PRPT+20, PRPT+21!, SNL+3~, EXCEL+3~, EXCEL+8 , EXCEL+9! |
| DTIME | SDIV+10, PRPT+7, PRPT+19, SNL+7, FRST, LAST, EXCEL+5, ALSP1+1 |
| DTOUT | SDIV+12, SDIV+13!, MLTP+9~, PRPT+8, PRPT+9!, PRPT+20, PRPT+21!, SNL+3~, EXCEL+3~, EXCEL+8 , EXCEL+9!, ALSP2+3 |
| DUOUT | SDIV+12, SDIV+13!, MLTP+9~, PRPT+8, PRPT+9!, PRPT+20, PRPT+21!, SNL+3~, EXCEL+3~, EXCEL+8 , EXCEL+9!, ALSP2+3 |
| EXCEL | EXCEL+3~, EXCEL+10*, EXCEL+12 |
| FIELD | EXPAND~, EXPAND+2, EXPAND+3 |
| FILE | ALSP~, ALSP2, EXPAND~, EXPAND+2, EXPAND+3 |
| FRST | INTV+3~, INTV+5*, FRST+2*, LAST+2, LAST+3, LAST+4, QINT |
| I | MLTP+9~, PRPT+15*, PRPT+16, PRPT+24* |
| >> IBRPT | DS+4* |
| IX | MLTP+9~, PRPT+4*, PRPT+6*, PRPT+7, PRPT+14*, PRPT+16, PRPT+17*, PRPT+18 |
| J | SDIV+6~, SDIV+17* |
| LAST | INTV+3~, INTV+5*, LAST+2*, LAST+3*, LAST+6*, QINT |
| LST | MLTP+9~, PRPT+1*, PRPT+2, PRPT+7, PRPT+11, PRPT+23, PRPT+24 |
| MLTP | MLTP+9~, PRPT*, PRPT+9*, PRPT+11*, PRPT+15, PRPT+16, PRPT+20*, PRPT+23, PRPT+24*, QT |
| NODE | CLMACT+6~, CLMACT+11*, CLMACT+12, CLMACT+13, CLAC1+2*, CLAC1+3 |
| NODE1 | CLMACT+6~, CLAC1+3*, CLAC1+4 |
| OPT | MLTP~ |
| OPT( | PRPT+5, PRPT+6, PRPT+16 |
| OPT("" | PRPT+1 |
| PRL | ALSP+13~, ALSP+14*, ALSP1, HALSP+1, HALSP+2 |
| PRPT | MLTP~, PRPT+3, ALSP~, ALSP+14 |
| SDIV | SDIV+6~, SDIV+12*, SDIV+13*, SDIV+14*, SDIV+17, QDIV |
| SNG | ALSP+13~, ALSP+14*, ALSP2+2, ALSP2+6 |
| SNL | SNL+3~, SNL+4*, SNL+9*, SNL+11 |
| SORT | INTV~, FRST, LAST |
| U | CLMACT+7, CLMACT+12, CLMACT+13, CLAC1+1, CLAC1+2, CLAC1+3, CLAC1+4 |
| VALUE | EXPAND~, EXPAND+1, EXPAND+2, EXPAND+3 |
| VAUTD | SDIV+8!, SDIV+17 |
| VAUTD( | SDIV+17* |
| X | SNL+8, INTV+3~, FRST*, FRST+1, FRST+2, LAST*, LAST+1, LAST+2, LAST+3, LAST+4 , LAST+6, CLMACT~, CLMACT+6, CLMACT+7, CLAC1+1, CLAC1+2, CLAC1+4, ALSP+13~, ALSP1+1*, ALSP1+2* , ALSP1+3, DT~, DT+3, DT+4, DT+5 |
| Y | DS+4, SDIV+13, SDIV+14, PRPT+9, PRPT+21, SNL+8, SNL+9, EXCEL+10, CLMACT~, CLMACT+6 , CLMACT+13, CLAC1+4, ALSP2+4, ALSP2+5, ALSP2+7, EXPAND+1~*, EXPAND+3*, EXPQ, DT~, DT+4 , DT+5~* |
| Z | CLMACT+6~*, CLMACT+13*, CLAC1+1*, CLAC1+4*, CLACQ, DT+3~*, DT+4*, DT+5*, DTQ |