XBNEW(XBRET) ; IHS/ADC/GTH - NESTING OF DIE ; [ 10/29/2002 7:42 AM ]
Source file <XBNEW.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| RETURN | ; | |
| EN(XBRT,XBNS) | ;PEP XBRT=TAG^ROUTINE  XBNS=varialbe list ";" with * allowed | |
| S | ; | |
| END | ;-------------------------------------------------------------- ; the following taken from the variable list in KILL^XUSCLEAN from KERNEL | |
| NEW | ; | |
| XBKVAR | ;;DUZ,DTIME,DT,DISYS,IO,IOBS,IOF,IOM,ION,IOSL,IOST,IOT,IOS,IOXY,U,XRTL,%ZH0,XQVOL,XQY,XQY0,XQDIC,XQPSM,XQPT,XQAUDIT,XQXFLG,ZTSTOP,ZTQUEUED,ZTREQ,XQORS;; IHS/SET/GTH XB*3*9 10/29/2002 | 
| Name | Line Occurrences | 
|---|---|
| @( | NEW+2 | 
| RETURN | S+3 | 
| S | XBNEW+30 | 
| XBKVAR | S+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| XB | XBNEW+29~, EN+1~, S+4*, S+5, S+6*, S+7 | 
| >> XBI | S+4* | 
| XBKVAR | XBNEW+29~, EN+1~, S+2*, RETURN+1 | 
| XBL | XBNEW+29~, EN+1~, S+6*, S+7 | 
| XBN | XBNEW+29~, EN+1~, S+2*, S+5*, S+6*, S+7*, RETURN+1* | 
| XBNS | XBNEW+29~, EN~, EN+2, S+2*, S+3, S+4 | 
| XBRET | XBNEW~, EN+1~, EN+2*, S+1*, S+2, RETURN+1*, NEW+1~, NEW+2 | 
| XBRT | EN~, EN+2 | 
| XBY | XBNEW+29~, EN+1~, S+4*, S+6*, S+7* | 
| Name | Field # of Occurrence | 
|---|---|
| $T(XBKVAR | S+2 |