DVBAB6 ;ALB/DJS - CAPRI PENDING 2507 REQUEST REPORT ; 9/8/21 3:59pm
Source file <DVBAB6.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STRT(MSG,DVBCSORT,RSTAT,ERDAYS,OLDAYS,ADIVNUM,ELTYP,DVBADLMTR,ROFILTER) | ;
 ; MSG=DATA Passed back from RPC to GUI;(.MSG,"A","NR",1,1,7613,"W",0,0)  | 
|
| SETUP | ||
| HEAD | ||
| HEADRND | ; Print non-delimited output header
 | 
|
| HEADRD | ; Print delimited output header
 | 
|
| DATA | ; Sort data records
 | 
|
| EXIT | ||
| ; print 2507 request data
 | 
||
| ITEMS | ||
| ITEMSND | ||
| ITEMSD | ||
| PRINTD | ; Print delimited format output on report
 | 
|
| NXT | ;F DA(1)=0:0 S DA(1)=$O(^TMP($J,JX,PNAM,DFN,DA(1))) Q:DA(1)=""  D PRINT I $D(OUT) S DA(1)="",PNAM="ZZZZ",JX=$S($A(JX)>57:PNAM,1:9999999),DONE="YES"
 | 
|
| TST | ||
| TST1 | ||
| CLAIMTYP | ;THE CLAIM TYPE OF A 2507 REQUEST
 | 
|
| SPEC | ;SPECIAL CONSIDERATION(S) FOR A 2507 REQUEST
 | 
|
| REROUTE | ;REROUTE INFO FOR A 2507 REQUEST
 | 
| RPC Name | Call Tags | 
|---|---|
| DVBAB 2507 PENDING REPORT | STRT | 
| DVBAB PENDING C&P REPORT | STRT | 
| FileNo | Call Tags | 
|---|---|
| ^DVB(396.3 - [#396.3] | EXTERNAL^DILFD, GETS^DIQ | 
| 396.34 | EXTERNAL^DILFD | 
| ^DVB(396.4 - [#396.4] | EXTERNAL^DILFD |