%ZISG2 ;SFISC/AC -- Device Handler Prototype
Source file <ZISG2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LOAD | ;LOAD TMP ARRAY
|
|
B1 | ;OLD B1 CODE FROM ZISG ROUTINE
|
|
B2 | ;;I '^$W("ZISGTRM","G","SUBTYPE","VISIBLE") D
|
|
OK | ;Callbak for OK button.
|
|
TRM | ;W:$D(@REF@("PROMPT","VALUE")) !,@REF@("PROMPT","VALUE"),@REF@("PROMPT","CHOICE",+$O(@REF@("PROMPT","VALUE","")))
|
|
ERRMSG | ;Pop-up error message.
|
|
QTIME | ;
|
|
ASK | ;GET--ask for start time
|
|
DTHLP | ;Help for Date input
|
|
Z | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|