IBFBWL6 ;ALB/PAW-IB NVC Precert Worklist IV and RUR ;30-SEP-2015
Source file <IBFBWL6.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 |
---|---|---|
EN | ; -- main entry point for IB NVC PRECERT WORKLIST IV and RUR
; add code to do filters here |
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
; input - ^TMP("IBFBWA",$J)=DFN^IBNAME^IBAUTH ; output - none |
|
BLD | ; Build data to display
|
|
IVDONE | ; IV is complete
|
|
IVREM | ; IV Remove Auth from Worklist
|
|
RUDONE | ; RUR Pre-certification is complete
|
|
RUREM | ; RUR Remove Auth from Worklist
|
|
RUNRD | ; RUR Set Next Review Date
|
|
FIND | ; Find Auth Match
|
|
LOGUPD | ; Update Log
|
|
RESET | ; Reset ^TMP global
|
|
RURRC | ; Reason Codes
; Option 2 (internal comment 2) was removed - Addl Info Req - Refer to FR - and renumbered |
|
RURRCPR | ; RUR Reason Code Prompt
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | IVDONE+10, IVREM+7, RUDONE+8, RUREM+8, RUNRD+15 |
^%ZISC | EXIT+1 |
UPDATE^DIE | IVDONE+6, IVDONE+8, IVREM+5, RUDONE+5, RUREM+5, RUNRD+12, LOGUPD+7 |
$$GET1^DIQ | HDR+4 |
^DIR | RUNRD+9, RURRCPR+6 |
EN^VALM | EN+3, EN+4 |
$$FDATE^VALM1 | RUNRD+16, RUNRD+18 |
FULL^VALM1 | BLD+3 |
PAUSE^VALM1 | IVDONE+15, IVREM+12, RUDONE+13, RUREM+14, RUNRD+20 |
SET^VALM10 | BLD+6, BLD+7, BLD+8, BLD+9, BLD+10, BLD+12, BLD+13, BLD+14, BLD+15, BLD+16 , RURRC+2, RURRC+3, RURRC+4, RURRC+5, RURRC+6, RURRC+7, RURRC+8, RURRC+9, RURRC+10 |
$$FMTE^XLFDT | RUNRD+8 |
$$NOW^XLFDT | LOGUPD+2 |
$$SCH^XLFDT | RUNRD+7 |
DISP^XQORM1 | HELP+1 |
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 |
---|---|
^DPT - [#2] | GET1^DIQ |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | HDR+4, INIT+3~, INIT+6*, FIND+2, LOGUPD+8, LOGUPD+9, RESET+5, RESET+6, RESET+11, RESET+12 |
DIR | RUNRD+9!, RURRCPR+3!, RURRCPR+6! |
DIR("?" | RURRCPR+5* |
DIR("A" | RUNRD+5*, RURRCPR+4* |
DIR("B" | RUNRD+8* |
DIR(0 | RUNRD+5*, RURRCPR+3* |
DIRUT | RUNRD+1~, RUNRD+9 |
DT | RUNRD+5, RUNRD+7, RUNRD+8, LOGUPD+8, LOGUPD+9 |
DUZ | LOGUPD+3 |
ECNT | INIT+3~, INIT+5*, INIT+6 |
FDA | LOGUPD+1~ |
FDA( | LOGUPD+3*, LOGUPD+6* |
FDA(360 | IVDONE+5*, IVDONE+7*, IVREM+4*, RUDONE+4*, RUREM+4*, RUNRD+11* |
IBAUTH | INIT+3~, INIT+6*, FIND+3, RESET+5, RESET+6, RESET+11, RESET+12 |
IBDOS | RESET+1~, RESET+8*, RESET+9*, RESET+10, RESET+11, RESET+12 |
IBDT | LOGUPD+1~, LOGUPD+2*, LOGUPD+3 |
IBEVENT | IVDONE+1~, IVDONE+11*, IVREM+1~, IVREM+8*, RUDONE+1~, RUDONE+9*, RUREM+1~, RUREM+9*, RUNRD+1~, RUNRD+16* , LOGUPD+6 |
IBFIRST | INIT+3~, BLD+2*, IVDONE+2*, IVDONE+14*, IVREM+2*, IVREM+11*, RUDONE+2*, RUDONE+12*, RUREM+2*, RUREM+13* , RUNRD+2*, RUNRD+19* |
>> IBGRP | EN+3, EN+4, BLD+4, BLD+5, BLD+11, RESET+2, RESET+7 |
IBGRPX | BLD+1~, BLD+4* |
IBIEN | IVDONE+1~, IVDONE+5, IVDONE+7, IVREM+1~, IVREM+4, RUDONE+1~, RUDONE+4, RUREM+1~, RUREM+4, RUNRD+1~ , RUNRD+11, FIND+3*, LOGUPD+3, LOGUPD+4, LOGUPD+6, LOGUPD+8, LOGUPD+9 |
IBINS | RESET+1~, RESET+3*, RESET+4*, RESET+5, RESET+6, RESET+10*, RESET+11, RESET+12 |
IBLOG | LOGUPD+1~, LOGUPD+4*, LOGUPD+5*, LOGUPD+8, LOGUPD+9 |
IBNAME | HDR+5, HDR+6, INIT+3~, INIT+6*, IVDONE+13, IVREM+10, RUDONE+11, RUREM+11, RUNRD+18, RESET+5 , RESET+6, RESET+11, RESET+12 |
IBNRD | RUNRD+1~, RUNRD+3*, RUNRD+10*, RUNRD+11, RUNRD+16, RUNRD+18 |
IBRC | RUDONE+1~, RUDONE+9, RUREM+1~, RUREM+9, RUNRD+1~, RUNRD+16, RURRCPR+2*, RURRCPR+7*, RURRCPR+8, RURRCPR+9* |
IBSS | HDR+2~, HDR+5*, HDR+6 |
IBSSLE | HDR+2~, HDR+4*, HDR+5 |
IBSSLS | HDR+2~, HDR+4*, HDR+5 |
IBSSX | HDR+2~, HDR+4*, HDR+5 |
IBX | FIND+1~, FIND+2*, FIND+3 |
IENROOT | IVDONE+1~, IVDONE+3*, IVREM+1~, RUDONE+1~, RUNRD+1~, RUNRD+3* |
U | INIT+6, FIND+3, LOGUPD+4 |
>> VALM("TITLE" | HDR+3* |
>> VALMBCK | BLD+18*, IVDONE+16*, IVREM+13*, RUDONE+14*, RUREM+15*, RUNRD+21*, EXIT+2* |
>> VALMHDR(2 | HDR+6* |
VALMY | BLD+1~ |
X | RUNRD+1~, RUNRD+7*, RUNRD+8, RURRCPR+1~, HELP+1* |
Y | RUNRD+1~, RUNRD+10, RURRCPR+1~, RURRCPR+7 |