IBJPC1 ;ALB/FA - Site Parameter HCSR Screens, Nodes 63-66 ;03-JUN-2014
Source file <IBJPC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(WHICH) | ;EP
; Main entry point for HCSR Site Parameters, nodes 63-66 ; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO |
|
| HDR(WHICH) | ;EP
; Header code for HCSR Site Parameters, nodes 63-66 ; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO |
|
| INIT(WHICH) | ;EP
; Initialize variables and list array ; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO ; Output: ^TMP("IBJPC1",$J) - Body lines to display for specified template |
|
| BLD(WHICH) | ; Build screen array, no variables required for input
; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO ; Output: ^TMP("IBJPC1",$J) - Body lines to display for specified template |
|
| BLDLN(CTR,NAME,IEN) | ; Builds a line to display and insurance
; Input: CTR - Current Line Counter ; NAME - Insurance Company Name ; IEN - IEN of the insurance to be displayed ; Output: LINE - Formatted for setting into the list display |
|
| 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 |
|
| HELP(WHICH) | ;EP
; Help code ; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO |
|
| EXIT(WHICH) | ;EP
; Exit code ; Input: WHICH - 1 - Using template IBJP HCSR CLINICS ; 2 - Using template IBJP HCSR WARDS ; 3 - Using template IBJP HCSR ADM INSCO ; 4 - Using template IBJP HCSR APPT INSCO |
|
| ADD(WHICH) | ;EP
; Listman Protocol Action to add an entry to the specified Site Parameter node ; Input: WHICH - 1 - Adding to the Clinic Search inclusion list ; 2 - Adding to the Ward Search inclusion list ; 3 - Adding to the Admission Search inclusion list ; 4 - Adding to the Appointment Search inclusion list |
|
| DEL(WHICH) | ;EP
; Listman Protocol Action to delete an entry from the specified Site Parameter ; node ; Input: WHICH - 1 - Deleting from the Clinic Search inclusion list ; 2 - Deleting from the Ward Search inclusion list ; 3 - Deleting from the Admission Search inclusion list ; 4 - Deleting from to the Appt Search exclusion list |
|
| WARNMSG | ;EP
; Displays a warning message to the user when they modify site parameters ; Input: None ; Output: Warning message displayed |
|
| ENTSEL(NODE,IENS,WHICHF) | ||
| ADDBYEID(IEN,IENS) | ||
| LOCK(NODE) | ||
| UNLOCK(NODE) | ;EP
; Unlocks the Site Parameter node that is being worked ; Input: NODE - Site Parameter node where the data resides |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(36 - [#36] | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
