TIUCOPP ;SLC/TDP - Copy/Paste Paste Tracking ;Jul 30, 2020@11:14:22
Source file <TIUCOPP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PUTPASTE(INST,ARY,ERR,SVARY) | ;Save Pasted Text
; Call using $$PUTPASTE^TIUCOPP(INST,.ARY,.ERR) |
|
| SVPSTQ | ||
| PRNTFND(PSTXTIEN,TIUCPRCD,ARY) | ;
|
|
| KLLCHLD(PRNT) | ;Kill off child paste entries
|
|
| SVPST | ;Save the paste information
|
|
| GETPASTE(TIUIEN,INST,APP,ARY,ZERO) | ;Retrieve pasted text
; Call using GETPASTE^TIUCOPP(NOTE IEN,INSTITUTION IEN,CALLING APPLICATION,.RETURN ARRAY) |
|
| GETPSTQ | ||
| CHKPASTE(TIUIEN,INST) | ;Check pasted text exists for a document
; Call using $$CHKPASTE^TIUCOPP(DOCUMENT IDENTIFIER,INSTITUTION IEN) |
| FileNo | Call Tags |
|---|---|
| ^DIC - [#1] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DIC(4 - [#4] | FIND1^DIC |
| ^LRT(67 - [#67] | GET1^DIQ |
| ^TIUP(8928 - [#8928] | Classic Fileman Calls |
