IBTRH7 ;ALB/JWS - HCSR Manually Create 278 Request ;15-MAY-2015
Source file <IBTRH7.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;EP
; Main entry point for IBT HCSR MANUAL 278 ADD protocol ; Input: None |
|
ASKPAT() | ||
ASKDATE(PROMPT,DEFAULT1,DEFAULT2) | ; get the from and thru dates
|
|
FM1 | ;
|
|
FM2 | ;
|
|
FMDQ | ;
|
|
FM1E | ;
|
|
FM2E | ;
|
|
SAVE(NODE0) | ; save entry in temporary ^TMP($J) global for list display
|
|
FILE | ; save selected entry into 356.22 file
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
2.312 | GET1^DIQ |
^IBT(356.22 - [#356.22] | FIND1^DIC |
^DIC(36 - [#36] | GET1^DIQ |
^DGPM - [#405] | GET1^DIQ |
^DGS(41.1 - [#41.1] | GET1^DIQ |
^DIC(42 - [#42] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |