IBTRH6 ;ALB/FA - HCSR Send 278 Short Worklist ;11-NOV-2014
Source file <IBTRH6.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 8 | $$NOPUNCT^IBCEF $$HPD^IBCNHUT1 PRMARK1^IBTRH1 ($$STATUS,SEND278)^IBTRH2 STATMSG^IBTRH2A ($$CLRASK,CLRENTRY)^IBTRH5K INIT^IBTRH6 $$PRVDATA^IBTRHLO2 |
| VA FileMan | 5 | FILE^DICN (,FILE)^DIE $$EXTERNAL^DILFD ($$GET1,GETS)^DIQ ^DIR |
| Kernel | 3 | $$FMTE^XLFDT DISP^XQORM1 $$TAXORG^XUSTAX |
| List Manager | 3 | EN^VALM ($$SETSTR,CLEAR,FULL)^VALM1 (CLEAN,CNTRL,SET)^VALM10 |
| Registration | 2 | DEM^VADPT $$SITE^VASITE |
| Automated Information Collection System | 1 | FORMAT^IBDFU6 |
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 4 | IBT HCSR SEND 278 ADD DATA IBT HCSR SEND 278 REQUEST SHORT IBT HCSR SEND 278 SHORT IBTRH6 |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Main entry point for the IBT HCSR SEND 278 SHORT worklist
; Displays the selected 278 short form for sending 278 requests ; Input: IBTRIEN - IEN of the selected entry to send a request for |
|
| SELSHORT(INPAT) | ; User selection of which 278 request to send
; Input: INPAT=1 if inpatient, 0 otherwise ; Returns: Selected Input Type or "" if none selected |
|
| HDR | ;EP
; Protocol action to display Worklist Patient header information ; Input: IBTRIEN - IEN of the selected entry to send a request for ; Output: Header information for the patient of the selected entry is set |
|
| INIT | ;EP
|
|
| BLD | ; Creates the body of the worklist
|
|
| BLDUMO(SLINE,ELINE) | ; Build the UMO Field Section
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDSUB(SLINE,ELINE) | ; Build the Subscriber Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDREQ(SLINE,ELINE) | ; Build the Requester fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDDEP(SLINE,ELINE) | ; Build the Dependent fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDDIAG(SLINE,ELINE) | ; Build the Diagnosis fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDHCSR(SLINE,ELINE) | ; Build the Health Care Service Review Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDPROV(SLINE,ELINE) | ; Build the Provider Information Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDSVC(SLINE,ELINE) | ; Build the Service Line Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDAPI(SLINE,ELINE) | ; Build the Additional Patient Information Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| BLDCOM(SLINE,ELINE) | ; Build the Comment Fields
; Input: ; SLINE - Starting Section Line Number ; ELINE - Current Ending Section Line Number ; Output: ELINE - Updated Ending Section Line Number |
|
| SET(LABEL,DATA,LINE,COL) | ; Sets text into the body of the worklist
; Input: LABEL - Label text to set into the line ; DATA - Field Data to set into the line ; LINE - Line to set LABEL and DATA into ; COL - Starting column position in LINE to insert ; LABEL_DATA text ; Returns: LINE - Updated Line by 1 |
|
| SETN(TITLE,LINE,COL,RV) | ; Sets a field Section title into the body of the worklist
; Input: TITLE - Text to be used for the field Section Title ; LINE - Line number in the body to insert the field section title ; COL - Starting Column position to set Section Title into ; RV - 1 - Set Reverse Video, 0 or null don't use Reverse Video ; Optional, defaults to "" ; Returns: LINE - Line number increased by 1 |
|
| SET1(TEXT,LINE,COL,WIDTH,RV) | ; Sets the TMP array with body data
; Input: TEXT - Text to be set into the specified line ; LINE - Line to set TEXT into ; COL - Column of LINE to set TEXT into ; WIDTH - Width of the TEXT being set into line ; RV - 1 - Set Reverse Video, 0 or null don't use ; Reverse Video ; Optional, defaults to "" ; ^TMP("IBTRH6",$J) - Current ^TMP array ; Output: ^TMP("IBTRH6",$J) - Updated ^TMP array |
|
| DATA | ;EP
; Protocol action to add/edit fields for the brief 278 request fields |
|
| SEND278 | ;EP
; Protocol action to send the completed brief 278 request |
|
| HELP | ;EP
; Protocol Action to display help information |
|
| EXIT | ;EP
; Protocol action to exit the worklist |
|
| WRTFLDS | ; auto populate some fields in 356.22
|
|
| CLRCNUM(IBTRIEN) | ; clear contact numbers in file 356.22
|
|
| WRTCNUM | ; auto populate contact numbers in file 356.22
|
|
| GETCNUM(CNARY) | ; get contact numbers from file 356.22
; CNARY - array of results, passed by reference |
|
| NEWSL(IBTRIEN) | ; create new entry in service line multiple (356.2216) if no entries are there
; IBTRIEN - ien of the entry in file 356.22 |
|
| NEWSLX | ;
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | NEWSL+7 |
| ^DIE | DATA+11, WRTFLDS+13 |
| FILE^DIE | CLRCNUM+4, WRTCNUM+11, WRTCNUM+12 |
| $$EXTERNAL^DILFD | BLDREQ+20, BLDDIAG+13, BLDHCSR+16, BLDSVC+15, BLDAPI+12, GETCNUM+5 |
| $$GET1^DIQ | BLDUMO+9, BLDUMO+10, BLDSUB+15, BLDREQ+17, BLDDIAG+12, BLDHCSR+9, BLDHCSR+10, BLDHCSR+11, BLDHCSR+12, BLDPROV+12 , BLDAPI+11 |
| GETS^DIQ | WRTCNUM+3 |
| ^DIR | SELSHORT+9, SELSHORT+16 |
| $$NOPUNCT^IBCEF | WRTCNUM+7 |
| $$HPD^IBCNHUT1 | BLDUMO+13 |
| FORMAT^IBDFU6 | BLDCOM+10 |
| PRMARK1^IBTRH1 | DATA+6 |
| $$STATUS^IBTRH2 | EN+5, DATA+6, DATA+12 |
| SEND278^IBTRH2 | SEND278+5 |
| STATMSG^IBTRH2A | EN+5 |
| $$CLRASK^IBTRH5K | DATA+12 |
| CLRENTRY^IBTRH5K | DATA+12 |
| INIT^IBTRH6 | DATA+13 |
| $$PRVDATA^IBTRHLO2 | BLDREQ+7, BLDPROV+11 |
| DEM^VADPT | INIT+4 |
| EN^VALM | EN+10 |
| $$SETSTR^VALM1 | SET1+13 |
| CLEAR^VALM1 | EXIT+3 |
| FULL^VALM1 | SELSHORT+4, DATA+5 |
| CLEAN^VALM10 | DATA+13 |
| CNTRL^VALM10 | SET1+15 |
| SET^VALM10 | SET1+14 |
| $$SITE^VASITE | BLDREQ+7 |
| $$FMTE^XLFDT | BLDSVC+13 |
| DISP^XQORM1 | HELP+3 |
| $$TAXORG^XUSTAX | BLDREQ+13 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GETS^DIQ |
| ^IBE(353.1 - [#353.1] | GET1^DIQ |
| ^IBT(356.001 - [#356.001] | GET1^DIQ |
| ^IBT(356.002 - [#356.002] | GET1^DIQ |
| ^IBT(356.006 - [#356.006] | GET1^DIQ |
| ^IBT(356.018 - [#356.018] | GET1^DIQ |
| ^IBT(356.22 - [#356.22] | EXTERNAL^DILFD |
| 356.2211 | EXTERNAL^DILFD |
| 356.2216 | EXTERNAL^DILFD |
| 356.223 | EXTERNAL^DILFD |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^IBE(365.013 - [#365.013] | GET1^DIQ |
| ^IBE(365.022 - [#365.022] | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | BLDSUB+7, BLDDEP+7 |
| ^IBE(365.12 - [#365.12] | BLDUMO+11 |
| ^IBT(356.22 - [#356.22] | INIT+5, INIT+6, INIT+7, INIT+8, INIT+11, INIT+12, INIT+13, INIT+14, BLDDIAG+9, BLDDIAG+10 , BLDPROV+9, BLDPROV+10, BLDSVC+9, BLDSVC+10, BLDSVC+11, BLDAPI+9, BLDAPI+10, WRTCNUM+2, GETCNUM+6, NEWSL+5 |
| ^TMP("IBTRH6" | INIT+2!, SET1+12, EXIT+2! |
| ^UTILITY($J | BLDCOM+9!, BLDCOM+11, BLDCOM+12! |
| Name | Line Occurrences |
|---|---|
| $$SELSHORT | EN+9 |
| $$SET | BLDUMO+7, BLDUMO+9, BLDUMO+12, BLDUMO+13, BLDSUB+8, BLDSUB+10, BLDSUB+11, BLDSUB+12, BLDSUB+13, BLDSUB+14 , BLDSUB+15, BLDSUB+17, BLDREQ+9, BLDREQ+11, BLDREQ+12, BLDREQ+13, BLDREQ+14, BLDREQ+15, BLDREQ+16, BLDREQ+17 , BLDREQ+19, BLDREQ+20, BLDREQ+21, BLDREQ+22, BLDREQ+23, BLDDEP+9, BLDDEP+11, BLDDIAG+7, BLDDIAG+12, BLDDIAG+13 , BLDHCSR+7, BLDHCSR+9, BLDHCSR+10, BLDHCSR+11, BLDHCSR+12, BLDHCSR+15, BLDHCSR+16, BLDPROV+7, BLDPROV+12, BLDPROV+13 , BLDPROV+14, BLDSVC+7, BLDSVC+12, BLDSVC+13, BLDSVC+16, BLDAPI+7, BLDAPI+11, BLDAPI+12, BLDAPI+13, BLDCOM+7 , BLDCOM+11 |
| $$SETN | BLDUMO+8, BLDSUB+9, BLDREQ+10, BLDDEP+10, BLDDIAG+8, BLDHCSR+8, BLDPROV+8, BLDSVC+8, BLDAPI+8, BLDCOM+8 |
| BLD | INIT+15 |
| BLDAPI | BLD+15 |
| BLDCOM | BLD+17 |
| BLDDEP | BLD+8 |
| BLDDIAG | BLD+9 |
| BLDHCSR | BLD+11 |
| BLDPROV | BLD+12 |
| BLDREQ | BLD+6 |
| BLDSUB | BLD+5 |
| BLDSVC | BLD+14 |
| BLDUMO | BLD+4 |
| CLRCNUM | WRTFLDS+2 |
| GETCNUM | BLDREQ+8, WRTCNUM+3 |
| NEWSLX | NEWSL+4 |
| SET1 | SET+10, SETN+10 |
| WRTCNUM | INIT+9 |
| WRTFLDS | INIT+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ANODE0 | BLDAPI+6~, BLDAPI+10*, BLDAPI+11, BLDAPI+12, BLDAPI+13 |
| CNARY | BLDREQ+6~, BLDREQ+8, WRTCNUM+1~, WRTCNUM+3, GETCNUM~, GETCNUM+4* |
| CNARY( | WRTCNUM+9, WRTCNUM+13*, GETCNUM+7* |
| CNARY("EMPTY" | WRTCNUM+6, WRTCNUM+10, WRTCNUM+13!, GETCNUM+8* |
| CNARY("EX" | BLDREQ+22 |
| CNARY("FX" | BLDREQ+23 |
| CNARY("TE" | BLDREQ+21 |
| CNT | BLDSVC+6~, BLDSVC+9*, BLDSVC+10*, BLDSVC+12 |
| COL | SET~, SET+10, SETN~, SETN+10, SET1~, SET1+13, SET1+15 |
| DA | DATA+2~, DATA+10*, WRTFLDS+1~, WRTFLDS+3*, NEWSL+3~ |
| DA(1 | NEWSL+6* |
| DATA | BLDDIAG+6~, BLDDIAG+10*, BLDDIAG+11, BLDPROV+6~, BLDPROV+10*, BLDPROV+11, BLDPROV+12, SET~, SET+9 |
| DD | NEWSL+3~, NEWSL+7! |
| >> DFN | BLDSUB+7, BLDDEP+7 |
| DIC | NEWSL+3~, NEWSL+6* |
| DIC(0 | NEWSL+6* |
| DIE | DATA+2~, DATA+10*, WRTFLDS+1~, WRTFLDS+3* |
| DINUM | NEWSL+3~ |
| DIR | SELSHORT+3~, SELSHORT+13~ |
| DIR("A" | SELSHORT+8*, SELSHORT+15*, SELSHORT+16* |
| DIR(0 | SELSHORT+8*, SELSHORT+14* |
| DIROUT | SELSHORT+3~, SELSHORT+13~ |
| DIRUT | SELSHORT+3~, SELSHORT+10, SELSHORT+13~, WRTFLDS+1~ |
| DLAYGO | NEWSL+3~, NEWSL+6* |
| DO | NEWSL+3~, NEWSL+7! |
| DPTR | BLDDIAG+6~, BLDDIAG+11*, BLDDIAG+13 |
| DR | DATA+2~, DATA+10*, WRTFLDS+1~, WRTFLDS+3*, WRTFLDS+5*, WRTFLDS+6*, WRTFLDS+8*, WRTFLDS+9*, WRTFLDS+10*, WRTFLDS+11* , WRTFLDS+12* |
| DTOUT | SELSHORT+3~, SELSHORT+13~, DATA+2~, WRTFLDS+1~, NEWSL+3~ |
| DUOUT | SELSHORT+3~, SELSHORT+13~, WRTFLDS+1~, NEWSL+3~ |
| DUZ | WRTFLDS+2 |
| ELINE | BLDUMO~, BLDUMO+7*, BLDUMO+8*, BLDUMO+9*, BLDUMO+12*, BLDUMO+13*, BLDSUB~, BLDSUB+8*, BLDSUB+9*, BLDSUB+10* , BLDSUB+11*, BLDSUB+12*, BLDSUB+13*, BLDSUB+14*, BLDSUB+15*, BLDSUB+17*, BLDREQ~, BLDREQ+9*, BLDREQ+10*, BLDREQ+11* , BLDREQ+12*, BLDREQ+13*, BLDREQ+14*, BLDREQ+15*, BLDREQ+16*, BLDREQ+17*, BLDREQ+19*, BLDREQ+20*, BLDREQ+21*, BLDREQ+22* , BLDREQ+23*, BLDDEP~, BLDDEP+9*, BLDDEP+10*, BLDDEP+11*, BLDDIAG~, BLDDIAG+7*, BLDDIAG+8*, BLDDIAG+12*, BLDDIAG+13* , BLDHCSR~, BLDHCSR+7*, BLDHCSR+8*, BLDHCSR+9*, BLDHCSR+10*, BLDHCSR+11*, BLDHCSR+12*, BLDHCSR+15*, BLDHCSR+16*, BLDPROV~ , BLDPROV+7*, BLDPROV+8*, BLDPROV+12*, BLDPROV+13*, BLDPROV+14*, BLDSVC~, BLDSVC+7*, BLDSVC+8*, BLDSVC+12*, BLDSVC+13* , BLDSVC+16*, BLDAPI~, BLDAPI+7*, BLDAPI+8*, BLDAPI+11*, BLDAPI+12*, BLDAPI+13*, BLDCOM~, BLDCOM+7*, BLDCOM+8* , BLDCOM+11* |
| ELINEL | BLD+2~, BLD+4, BLD+5, BLD+7, BLD+8, BLD+10, BLD+11, BLD+13, BLD+14, BLD+16 , BLD+17, BLD+18 |
| ELINER | BLD+2~, BLD+6, BLD+7, BLD+9, BLD+10, BLD+12, BLD+13, BLD+15, BLD+16 |
| FDA | CLRCNUM+1~, WRTCNUM+1~, WRTCNUM+11!, WRTCNUM+12! |
| FDA( | CLRCNUM+3*, WRTCNUM+11*, WRTCNUM+12* |
| FLD | CLRCNUM+1~, CLRCNUM+3*, WRTCNUM+1~, WRTCNUM+5*, WRTCNUM+7, WRTCNUM+8 |
| FROMDATA | EN+3~, EN+7*, INIT+9, DATA+4* |
| >> IBFASTXT | EN+11 |
| IBPSTAT | DATA+2~, DATA+8* |
| IBRESP | SEND278+2~ |
| IBTRENT | EN+3~, SEND278+3* |
| IBTRIEN | EN+5, INIT+5, INIT+6, INIT+7, INIT+8, INIT+11, INIT+12, INIT+13, INIT+14, BLDDIAG+9 , BLDDIAG+10, BLDPROV+9, BLDPROV+10, BLDSVC+9, BLDSVC+10, BLDSVC+11, BLDAPI+9, BLDAPI+10, DATA+6, DATA+10 , DATA+12, WRTFLDS+2, WRTFLDS+3, CLRCNUM~, CLRCNUM+2, WRTCNUM+2, WRTCNUM+5, GETCNUM+6, NEWSL~, NEWSL+4 , NEWSL+5, NEWSL+6 |
| IBUPOUT | DATA+2~, DATA+10*, DATA+12 |
| IBX | SET1+11~, SET1+12*, SET1+13*, SET1+14 |
| IBY | SET+8~, SET+9*, SET+10, SETN+8~, SETN+9*, SETN+10 |
| >> IEN312 | BLDSUB+7, BLDDEP+7 |
| >> IEN36 | BLDUMO+9, BLDUMO+10, BLDUMO+13 |
| IENS | CLRCNUM+1~, CLRCNUM+2*, CLRCNUM+3, WRTCNUM+1~, WRTCNUM+5*, WRTCNUM+11, WRTCNUM+12 |
| IENS200 | WRTCNUM+1~, WRTCNUM+3*, WRTCNUM+7 |
| INPAT | EN+3~, EN+8*, EN+9, SELSHORT~, SELSHORT+5, SELSHORT+6, INIT+16, BLDHCSR+12, BLDHCSR+13, WRTFLDS+5 , WRTFLDS+9, WRTFLDS+10 |
| >> INSNODE0 | BLDSUB+10, BLDSUB+11 |
| INSNODE3 | BLDSUB+6~, BLDSUB+7*, BLDSUB+12, BLDSUB+13, BLDSUB+14, BLDSUB+15, BLDSUB+16 |
| INSNODE4 | BLDDEP+6~, BLDDEP+7*, BLDDEP+8 |
| >> IORVOFF | SET1+15 |
| >> IORVON | SET1+15 |
| LABEL | SET~, SET+9 |
| LINE | SET~, SET+10, SET+11*, SET+12, SETN~, SETN+10, SETN+11*, SETN+12, SET1~, SET1+12 , SET1+14, SET1+15 |
| >> NODE0 | EN+8, INIT+5*, INIT+11*, BLDREQ+20, DATA+8, WRTFLDS+2 |
| NODE19 | EN+3~, INIT+8*, INIT+14*, GETCNUM+5 |
| NODE2 | EN+3~, INIT+6*, INIT+12*, BLDHCSR+9, BLDHCSR+10, BLDHCSR+11, BLDHCSR+12, BLDHCSR+14, WRTFLDS+4, WRTFLDS+8 , WRTFLDS+9, WRTFLDS+10, WRTFLDS+11 |
| NODE7 | EN+3~, INIT+7*, INIT+13*, BLDHCSR+16, WRTFLDS+12 |
| PAYER | BLDUMO+6~, BLDUMO+10*, BLDUMO+11 |
| PAYID | BLDUMO+6~, BLDUMO+11*, BLDUMO+12 |
| PRCODE | BLDSVC+6~, BLDSVC+15*, BLDSVC+16 |
| PRTYPE | BLDSVC+6~, BLDSVC+14*, BLDSVC+15 |
| PRVDATA | BLDPROV+6~, BLDPROV+11*, BLDPROV+13, BLDPROV+14 |
| PRVPTR | BLDPROV+6~, BLDPROV+11* |
| QPTR | BLDDIAG+6~, BLDDIAG+11*, BLDDIAG+12 |
| QUAL | WRTCNUM+1~, WRTCNUM+8*, WRTCNUM+9, WRTCNUM+11, WRTCNUM+13, GETCNUM+3~, GETCNUM+5*, GETCNUM+7 |
| RDATA | WRTCNUM+1~ |
| RDATA(200 | WRTCNUM+7 |
| REQDATA | BLDREQ+6~ |
| REQIEN | BLDREQ+6~, BLDREQ+7*, BLDREQ+13 |
| REQSTR | BLDREQ+6~, BLDREQ+7*, BLDREQ+11, BLDREQ+12, BLDREQ+14, BLDREQ+15, BLDREQ+16, BLDREQ+17, BLDREQ+18 |
| RES | NEWSL+3~, NEWSL+4*, NEWSL+5*, NEWSL+7*, NEWSLX+1 |
| RIEN | WRTFLDS+1~, WRTFLDS+2*, WRTFLDS+3, WRTCNUM+1~, WRTCNUM+2*, WRTCNUM+3 |
| RV | SETN~, SETN+10, SET1~, SET1+15 |
| SLINE | BLD+2~, BLD+3*, BLD+4, BLD+6, BLD+7*, BLD+8, BLD+9, BLD+10*, BLD+11, BLD+12 , BLD+13*, BLD+14, BLD+15, BLD+16*, BLD+17, BLDUMO~, BLDUMO+7, BLDSUB~, BLDSUB+8, BLDREQ~ , BLDREQ+9, BLDDEP~, BLDDEP+9, BLDDIAG~, BLDHCSR~, BLDHCSR+7, BLDPROV~, BLDSVC~, BLDSVC+7, BLDAPI~ , BLDAPI+7, BLDCOM~, BLDCOM+7 |
| SNODE0 | BLDSVC+6~, BLDSVC+10*, BLDSVC+13 |
| SNODE1 | BLDSVC+6~, BLDSVC+10*, BLDSVC+14, BLDSVC+15 |
| SNODE12 | BLDSVC+6~, BLDSVC+11*, BLDSVC+15 |
| STOPFLG | WRTCNUM+1~, WRTCNUM+5*, WRTCNUM+6* |
| TEXT | SET1~, SET1+13 |
| TITLE | SETN~, SETN+9 |
| U | EN+8, HDR+6, BLDUMO+11, BLDSUB+10, BLDSUB+11, BLDSUB+12, BLDSUB+13, BLDSUB+14, BLDSUB+15, BLDSUB+16 , BLDREQ+7, BLDREQ+11, BLDREQ+12, BLDREQ+13, BLDREQ+14, BLDREQ+15, BLDREQ+16, BLDREQ+17, BLDREQ+18, BLDREQ+20 , BLDDEP+8, BLDDIAG+11, BLDHCSR+9, BLDHCSR+10, BLDHCSR+11, BLDHCSR+12, BLDHCSR+14, BLDHCSR+16, BLDPROV+11, BLDPROV+12 , BLDPROV+13, BLDPROV+14, BLDSVC+13, BLDSVC+14, BLDSVC+15, BLDAPI+11, BLDAPI+12, BLDAPI+13, DATA+8, DATA+12 , WRTFLDS+2, WRTFLDS+4, WRTFLDS+8, WRTFLDS+9, WRTFLDS+10, WRTFLDS+11, WRTFLDS+12, WRTCNUM+2, WRTCNUM+11, WRTCNUM+12 , GETCNUM+5, GETCNUM+6 |
| VADM | EN+3~ |
| VADM(1 | HDR+6, BLDDEP+11 |
| VADM(2 | HDR+6 |
| VADM(3 | HDR+6 |
| VADM(4 | HDR+6 |
| >> VALM("TITLE" | INIT+16*, INIT+17*, INIT+18* |
| >> VALMBCK | EN+6*, EN+11*, DATA+3*, SEND278+4* |
| >> VALMBG | INIT+3* |
| >> VALMCNT | BLD+18* |
| >> VALMHDR(1 | HDR+7* |
| >> VALMSG | HDR+8* |
| VALUE | WRTCNUM+1~, WRTCNUM+7*, WRTCNUM+12, WRTCNUM+13, GETCNUM+3~, GETCNUM+6*, GETCNUM+7 |
| WHICH | EN+3~, EN+9*, EN+10, INIT+16, INIT+17, INIT+18, WRTFLDS+5, WRTFLDS+8 |
| WIDTH | SET1~, SET1+13, SET1+15 |
| X | SELSHORT+3~, SELSHORT+13~, DATA+2~, HELP+2*, WRTFLDS+1~, NEWSL+3~, NEWSL+6* |
| XX | SELSHORT+3~, SELSHORT+5*, SELSHORT+6*, SELSHORT+7*, SELSHORT+8, BLDCOM+6~, BLDCOM+11* |
| Y | SELSHORT+3~, SELSHORT+11*, SELSHORT+13~, SELSHORT+17, DATA+2~, DATA+12, WRTFLDS+1~, NEWSL+3~, NEWSL+7 |
| Z | HDR+5~, HDR+6*, HDR+7, BLDDIAG+6~, BLDDIAG+9*, BLDDIAG+10, BLDHCSR+6~, BLDHCSR+14*, BLDHCSR+15, BLDPROV+6~ , BLDPROV+9*, BLDPROV+10, BLDSVC+6~, BLDSVC+9*, BLDSVC+10, BLDSVC+11, BLDAPI+6~, BLDAPI+9*, BLDAPI+10, WRTCNUM+1~ , WRTCNUM+10*, WRTCNUM+11, WRTCNUM+12, WRTCNUM+13, GETCNUM+3~, GETCNUM+4*, GETCNUM+5, GETCNUM+6, GETCNUM+8 |
| ZIP | BLDSUB+6~, BLDSUB+16*, BLDSUB+17, BLDREQ+6~, BLDREQ+18*, BLDREQ+19 |