IBOHLSE ;ALB/BAA - IB HELD CHARGES LIST MANAGER ;08-SEP-2015
Source file <IBOHLSE.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 HELD CHARGES EXPAND
; add code to do filters here |
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
; input - none ; output ^TMP($J,"IBOHLSE") |
|
| BLD | ; build data to display
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| SETL(LINE,DATA,LABEL,COL,LNG) | ; Creates a line of data to be set into the body
; of the worklist ; Input: LINE - Current line being created ; DATA - Information to be added to the end of the current line ; LABEL - Label to describe the information being added ; COL - Column position in line to add information add ; LNG - Maximum length of data information to include on the line ; Returns: Line updated with added information |
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | EXIT+2 |
| $$GET1^DIQ | BLD+6, BLD+11, BLD+15, BLD+23, BLD+27, BLD+31, BLD+32, BLD+36, BLD+38, BLD+42 |
| EN^VALM | EN+3 |
| FULL^VALM1 | BLD+8 |
| SET^VALM10 | BLD+9, BLD+11, BLD+13, BLD+17, BLD+21, BLD+23, BLD+25, BLD+29, BLD+31, BLD+32 , BLD+35, BLD+36, BLD+40, BLD+44, BLD+46, BLD+47, BLD+48 |
| $$FMTE^XLFDT | BLD+16, BLD+25, BLD+28, BLD+39, BLD+43, BLD+46, BLD+47, BLD+48 |
| DISP^XQORM1 | HELP+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^IBE(350.1 - [#350.1] | GET1^DIQ |
| ^IBE(350.21 - [#350.21] | GET1^DIQ |
| ^IBE(352.5 - [#352.5] | GET1^DIQ |
| ^IBAM(354.71 - [#354.71] | GET1^DIQ |
| ^IBBAA(375 - [#375] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IB - [#350] | BLD+4, BLD+5 |
| ^TMP($J | INIT+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLINIC | INIT+3~, INIT+7*, BLD+23 |
| CNT | INIT+3~, INIT+5*, BLD+1~, BLD+3* |
| COL | SETL~, SETL+11 |
| DATA | SETL~, SETL+10 |
| DFN | INIT+3~, INIT+5*, BLD+6 |
| EADAT | BLD+2~, BLD+39*, BLD+40 |
| EAWHO | BLD+2~, BLD+38*, BLD+40 |
| GMT | BLD+1~, BLD+34*, BLD+35 |
| IB0 | BLD+1~, BLD+4*, BLD+11, BLD+13, BLD+15, BLD+16, BLD+19, BLD+20, BLD+23, BLD+25 , BLD+27, BLD+28, BLD+31, BLD+32, BLD+34, BLD+36 |
| IB1 | BLD+1~, BLD+5*, BLD+38, BLD+39, BLD+42, BLD+43, BLD+46, BLD+47, BLD+48 |
| IBIEN | INIT+3~, INIT+6*, BLD+4, BLD+5 |
| LABEL | SETL~, SETL+10 |
| LINE | BLD+1~, BLD+15*, BLD+16*, BLD+17, BLD+19*, BLD+20*, BLD+21, BLD+27*, BLD+28*, BLD+29 , SETL~, SETL+11*, SETL+12 |
| LNG | SETL~, SETL+10 |
| LST | INIT+3~, INIT+7*, BLD+23 |
| LUDAT | BLD+2~, BLD+43*, BLD+44 |
| LUWHO | BLD+2~, BLD+42*, BLD+44 |
| NAME | INIT+3~, INIT+6*, BLD+9 |
| NEW | SETL+9~, SETL+10*, SETL+11 |
| PATIEN | BLD+1~ |
| REC | INIT+3~, INIT+4*, INIT+5, INIT+6, INIT+7 |
| RX | BLD+1~ |
| SS | BLD+1~, BLD+6*, BLD+9 |
| U | INIT+5, INIT+6, INIT+7, BLD+11, BLD+13, BLD+15, BLD+16, BLD+19, BLD+20, BLD+23 , BLD+25, BLD+27, BLD+28, BLD+31, BLD+32, BLD+34, BLD+36, BLD+38, BLD+39, BLD+42 , BLD+43, BLD+46, BLD+47, BLD+48 |
| >> VALM("TITLE" | HDR+2* |
| >> VALMBCK | BLD+49*, EXIT+4* |
| >> VALMBG | BLD+49* |
| >> VALMCNT | BLD+3*, BLD+49* |
| X | HELP+1~, HELP+2* |
| >> XQORM("B" | HDR+3* |
| XX | BLD+1~ |
