FBNHEDPA ;AISC/GRR - EDIT PAYMENT FOR COMMUNITY NURSING HOME ;10/7/14 17:55
Source file <FBNHEDPA.m>
| 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 |
|---|---|---|
| EDIT | ;ENTRY POINT TO EDIT PAYMENT
|
|
| BT | ||
| INV | ||
| END | ||
| BADDATE(INVRCVDT,TEMPDA) | ;Compare edited Invoice Received Date to Treatment Date, reject if before
|
|
| BADTDATE(TDAT,INVRCVDT,SHODAT) | ;Compare edited Treatment TO or FROM Date to Invoice Received Date, reject if AFTER
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | EDIT+1 |
| ^DIC | BT, INV |
| ^DIE | INV+26, INV+27 |
| $$GET1^DIQ | BADDATE+2, BADDATE+3 |
| START^FBCHDI | INV+1 |
| FILEADJ^FBCHFA | INV+29 |
| LOADADJ^FBCHFA | INV+19 |
| FILERR^FBCHFR | INV+31 |
| LOADRR^FBCHFR | INV+23 |
| KILL^FBPAY | END+2 |
| $$ADJL^FBUTL2 | INV+21, INV+29 |
| $$RRL^FBUTL4 | INV+25, INV+31 |
| $$UOKPAY^FBUTL9 | INV+7 |
| 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 |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^FBAA(161.7 - [#161.7] | Classic Fileman Calls |
| ^FBAAI - [#162.5] | Classic Fileman Calls, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^FBAA(161.7 - [#161.7] | BT+2, INV+32* |
| ^FBAAA("AG" | INV+6 |
| ^FBAAI - [#162.5] | INV+16, INV+17 |
| ^XUSEC("FBAA LEVEL 2" | BT, BT+3, BT+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | INV+12*, END! |
| DFN | INV+4*, INV+6, INV+7, INV+8, END! |
| DIC | BT*, INV*!, INV+12*, END! |
| DIC("A" | INV* |
| DIC("S" | BT*, INV* |
| DIC(0 | BT*, INV*, INV+12* |
| DIE | INV+12*, END! |
| DIE("NO^" | INV+12*, INV+26! |
| DR | INV+12*, INV+27*, END! |
| >> DTOUT | INV+27 |
| DUZ | BT, BT+3, BT+4 |
| FB7078I | INV+5*, INV+6, END+1! |
| FBAAOUT | END! |
| FBAC | END! |
| FBADJ | INV+19, INV+21, INV+29, END+1! |
| FBADJL | END+1! |
| FBADJL(0 | INV+21*, INV+29 |
| FBAP | INV+11!, INV+32, END! |
| FBBAL | END! |
| FBDIF | INV+32*, END! |
| FBDX | END! |
| FBFPPSC | INV+16*, END+1! |
| FBFPPSL | INV+17*, END+1! |
| FBHAC | INV+14~ |
| FBHAP | INV+11!, INV+32, END! |
| FBHDI | INV+1*! |
| FBI | INV*, INV+1*, INV+12, INV+16, INV+17, INV+19, INV+23, INV+29, INV+31, END! |
| FBIN | END! |
| FBINODE | END+2! |
| FBLISTC | INV+1*, END! |
| FBN | BT+1*, BT+2, INV+32, END! |
| FBN(0 | BT+1* |
| FBOLD | END+2! |
| FBOLD(0 | INV*, INV+4, INV+5, INV+27 |
| FBPAT | END+2! |
| FBPRGNAM | END+2! |
| FBPROC | END! |
| FBRRMK | INV+23, INV+25, INV+31, END+1! |
| FBRRMKL | END+1! |
| FBRRMKL(0 | INV+25*, INV+31 |
| FBSTAT | BT+2*, BT+3, BT+4, BT+5, END! |
| FBVEN | END! |
| FBVID | END! |
| FTP | INV+6*, INV+7, INV+8, END+1! |
| INVRCVDT | BADDATE~, BADDATE+1, BADDATE+4, BADTDATE~, BADTDATE+1, BADTDATE+2 |
| IOF | INV+1 |
| ION | EDIT+1 |
| IOP | EDIT+1*! |
| J | END! |
| K | END! |
| L | END! |
| MSG1 | BADDATE+6~*, BADDATE+7, BADTDATE+3~*, BADTDATE+4 |
| MSG2 | BADDATE+6~*, BADDATE+7, BADTDATE+3~*, BADTDATE+4 |
| POP | END! |
| Q | END! |
| SHODAT | BADDATE+2~*, BADDATE+3*, BADDATE+6, BADTDATE~, BADTDATE+3 |
| SHOIRDAT | BADTDATE+2~*, BADTDATE+3 |
| SHOTDAT | BADDATE+5~*, BADDATE+6 |
| TDAT | BADDATE+2~*, BADDATE+3*, BADDATE+4, BADDATE+5, BADTDATE~, BADTDATE+1 |
| TEMPDA | BADDATE~, BADDATE+2, BADDATE+3 |
| U | INV+4, INV+5, INV+16, INV+17, INV+27 |
| VA | END! |
| VADM | END! |
| X | BT+1, INV, END! |
| Y | BT+1, INV, END! |
| Y(0 | BT+1, INV |