IBTRH2 ;ALB/YMG - HCSR worklist expand entry ;18-JUN-2014
Source file <IBTRH2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; main entry point for IBT HCSR ENTRY
|
|
EN2(IBTRNM,IBTRIEN) | ; Secondary entry point.
; IBTRNM is the calling routine name. ; IBTRIEN is the internal id for ^IBT(356.22) |
|
HDR | ; header code
|
|
INIT | ; init variables and list array
|
|
HELP | ; help code
|
|
EXIT | ; exit code
|
|
BLD | ; build screen array
|
|
SETL(LINE,DATA,LABEL,COL,LNG) | ;
|
|
SET(LINE,SPEC) | ;
|
|
ADDCMT(FROMWL) | ; add entry comment
; called from action protocol IBT HCSR ADD COMMENT ; Input: FROMWL - Optional, only sent when adding a comment to entry ; directly from the main worklist. ; Defaults to 0 |
|
SEND278 | ; send 278 request
|
|
STATUS(IBTRIEN) | ; returns 356.22 entry status
; IBTRIEN - file 356.22 ien |
|
PRMARK(WHICH) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBA(355.3 - [#355.3] | GETS^DIQ |
^IBT(356 - [#356] | GET1^DIQ |
^IBT(356.22 - [#356.22] | GETS^DIQ |
^DIC(36 - [#36] | GETS^DIQ |
^DGPM - [#405] | GET1^DIQ |