MAN ListMan - Revision history

DavidWhitten at 04:02, 17 June 2020

2020-06-17T04:02:31Z

← Older revision		Revision as of 04:02, 17 June 2020
Line 7:		Line 7:
	=== Callable Entry Points ===		=== Callable Entry Points ===

	==== Entry Point: D FULL^VALM1 (restore full screen scroll region) ====		==== Entry Point: [[ROUTINE VALM \| D EN^VALM]] Start a screen based on a [[FILE 409.61\|LIST TEMPLATE]] entry ====
	==== Entry Point: D SHOW^VALM1 (?) ====		==== Entry Point: [[ROUTINE VALM1 \| D FULL^VALM1]] (restore full screen scroll region) ====
	==== Entry Point: EN^VALM2 (entry selection call) ====		==== Entry Point: [[ROUTINE VALM1 \| D SHOW^VALM1]] (?) ====
			==== Entry Point: [[ROUTINE VALM2 \| D EN^VALM2]] (entry selection call) ====

	==== Change Header and force redraw of screen including header ====		==== Change Header and force redraw of screen including header ====

DavidWhitten: /* Variables while running */

2019-10-09T01:57:30Z

Variables while running

← Older revision		Revision as of 01:57, 9 October 2019
Line 25:		Line 25:
	^TMP("VALM DATA",$J,0,"HLP")= code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]		^TMP("VALM DATA",$J,0,"HLP")= code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]
	^TMP("VALM DATA",$J,0,"INIT")= code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]		^TMP("VALM DATA",$J,0,"INIT")= code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]
			May have duplicates at (with a different INDEX value)
			Exact values from DEBUGGING
			^TMP("VALM DATA",23877,0,"DAYS")=30
			^TMP("VALM DATA",23877,0,"FNL")="D EXIT^PSOLMAO"
			^TMP("VALM DATA",23877,0,"HIDDEN")="PSO HIDDEN ACTIONS #2"
			^TMP("VALM DATA",23877,0,"HLP")="D HELP^PSOLMAO"
			^TMP("VALM DATA",23877,0,"INIT")="D INIT^PSOLMAO"
			^TMP("VALM DATA",23877,1,"DAYS")=30
			^TMP("VALM DATA",23877,1,"FNL")="D EXIT^PSOLMLST"
			^TMP("VALM DATA",23877,1,"HIDDEN")="PSO HIDDEN ACTIONS"
			^TMP("VALM DATA",23877,1,"HLP")="D HELP^PSOLMLST"
			^TMP("VALM DATA",23877,1,"INIT")="D INIT^PSOLMLST"

DavidWhitten: /* Variables while running */

2019-10-09T01:19:53Z

Variables while running

← Older revision		Revision as of 01:19, 9 October 2019
Line 52:		Line 52:
	VALM("BM")=20		VALM("BM")=20
	VALM("DEFS")=1		VALM("DEFS")=1
	VALM("ENTITY") Used with "SELECT " to allow user input. Value comes from [[FILE 409.61/FIELD .09\| ~~ENTITY NAME Field #.09 in~~ LIST TEMPLATE File #409.61		VALM("ENTITY") Used with "SELECT " to allow user input. Value comes from [[FILE 409.61/FIELD .09\| LIST TEMPLATE File #409.61 ENTITY NAME Field #.09]]
	VALM("EXP")=""		VALM("EXP")=""
	VALM("FIXED")=0		VALM("FIXED")=0

DavidWhitten: /* Variables while running */

2019-10-09T01:18:33Z

Variables while running

← Older revision		Revision as of 01:18, 9 October 2019
Line 52:		Line 52:
	VALM("BM")=20		VALM("BM")=20
	VALM("DEFS")=1		VALM("DEFS")=1
	VALM("ENTITY")=""		VALM("ENTITY") Used with "SELECT " to allow user input. Value comes from [[FILE 409.61/FIELD .09\| ENTITY NAME Field #.09 in LIST TEMPLATE File #409.61
	VALM("EXP")=""		VALM("EXP")=""
	VALM("FIXED")=0		VALM("FIXED")=0

DavidWhitten: /* Overview Data */

2019-10-09T01:06:27Z

Overview Data

← Older revision		Revision as of 01:06, 9 October 2019
Line 7:		Line 7:
	=== Callable Entry Points ===		=== Callable Entry Points ===

	==== D FULL^VALM1 (restore full screen scroll region) ====		==== Entry Point: D FULL^VALM1 (restore full screen scroll region) ====
			==== Entry Point: D SHOW^VALM1 (?) ====
	==== EN^VALM2 (entry selection call) ====		==== Entry Point: EN^VALM2 (entry selection call) ====

	==== Change Header and force redraw of screen including header ====		==== Change Header and force redraw of screen including header ====
Line 28:		Line 28:

	XQORM = IEN_";ORD(101," variable pointer into current PROTOCOL ?? same as VALM("PROTOCOL") ??		XQORM = IEN_";ORD(101," variable pointer into current PROTOCOL ?? same as VALM("PROTOCOL") ??
	XQORM("#") = PROTOCOL IEN		XQORM(0)= ??parameters?? including "1" "A" "R" "\"
			XQORM("#") = PROTOCOL IEN ^ 1:0
	XQORM("H") same as [[FILE 101/FIELD 26\|PROTOCOL File #101 Field HEADER Field #26]] for PROTOCOL in XQORM		XQORM("H") same as [[FILE 101/FIELD 26\|PROTOCOL File #101 Field HEADER Field #26]] for PROTOCOL in XQORM
			XQORM("??") Help code ?? default == D HELP^VALM2
			XQORM("A") == Prompt at bottom of page
			XQORM("B") == default action
			XQORM("KEY", keypress-name or character ) = #^1
			XQORM("M") = number
			XQORM("XLATE", keypress-name ) == Letter-group

			XQORNEST= number same as # subscript for XQORNEST(*)
			XQORNEST(#)= PROTOCOL IEN_";ORD(101,"

			XQORNOD= PROTOCOL IEN_";ORD(101," ?? same as XQORNEST(#)
			XQORNOD(0)=""

			VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].
			VALM("PROTOCOL")=IEN_";ORD(101," Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer toW PROTOCOL File #101

	~~VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].~~
	~~VALM("PROTOCOL")=IEN_";ORD(101," Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101~~
	Other Variables:		Other Variables:

	VALM(0)=""		VALM(0)=""
	VALM("BM")=20		VALM("BM")=20

DavidWhitten: /* Variables while running */

2019-10-09T00:53:37Z

Variables while running

@@ Line 26: / Line 26: @@
   ^TMP("VALM DATA",$J,0,"INIT")=  code from [[FILE 409.61/FIELD 106|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]
    VALM("PROTOCOL")=IEN_";ORD(101,"  Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101
+  Other Variables:
-  XQORM = IEN_";ORD(101," variable pointer into current PROTOCOL ?? same as VALM("PROTOCOL")
+  VALM(0)=""

DavidWhitten: /* Variables while running */

2019-10-09T00:44:24Z

Variables while running

← Older revision		Revision as of 00:44, 9 October 2019
Line 25:		Line 25:
	^TMP("VALM DATA",$J,0,"HLP")= code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]		^TMP("VALM DATA",$J,0,"HLP")= code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]
	^TMP("VALM DATA",$J,0,"INIT")= code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]		^TMP("VALM DATA",$J,0,"INIT")= code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]

	VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].		VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].

	VALM("PROTOCOL")=IEN_";ORD(101," Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101		VALM("PROTOCOL")=IEN_";ORD(101," Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101

			XQORM = IEN_";ORD(101," variable pointer into current PROTOCOL ?? same as VALM("PROTOCOL")

DavidWhitten: /* Variables while running */

2019-10-09T00:41:40Z

Variables while running

← Older revision		Revision as of 00:41, 9 October 2019
Line 23:		Line 23:
	^TMP("VALM DATA",$J,0,"FNL")= code from [[FILE 409.61/FIELD 105\|LIST TEMPLATE File #409.61 EXIT CODE Field #105]]		^TMP("VALM DATA",$J,0,"FNL")= code from [[FILE 409.61/FIELD 105\|LIST TEMPLATE File #409.61 EXIT CODE Field #105]]
	^TMP("VALM DATA",$J,0,"HIDDEN")="PSO HIDDEN ACTIONS #2"		^TMP("VALM DATA",$J,0,"HIDDEN")="PSO HIDDEN ACTIONS #2"
	^TMP("VALM DATA",$J,0,"HLP")=		^TMP("VALM DATA",$J,0,"HLP")= code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]
	: code from [[FILE 409.61/FIELD 103\|LIST TEMPLATE File #409.61 EXIT CODE Field #103]]		^TMP("VALM DATA",$J,0,"INIT")= code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]
	^TMP("VALM DATA",$J,0,"INIT")=
	: code from [[FILE 409.61/FIELD 106\|LIST TEMPLATE File #409.61 ENTRY CODE Field #106]]

	VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].		VALM = index into ^SD(409.61,VALM,*) current entry in [[LIST TEMPLATE FILE]].

	VALM("PROTOCOL")=IEN_";ORD(101,"		VALM("PROTOCOL")=IEN_";ORD(101," Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101
	: Current PROTOCOL MENU from LIST TEMPLATE (resolved FreeText Pointer to PROTOCOL File #101

DavidWhitten at 00:40, 9 October 2019

2019-10-09T00:40:58Z

@@ Line 1: / Line 1: @@
 look at: https://www.va.gov/vdl/application.asp?appid=14
 local copy: http://www.vistapedia.com/images/9/9d/List_manager_developer.pdf
 === Callable Entry Points ===
@@ Line 14: / Line 16: @@
    SET VALMBCK="R".
    Then List Manager will automatically invoke this [[FILE LIST TEMPLATE FIELD HEADER CODE]] as part of the re-display of the screen.

DavidWhitten at 13:06, 8 October 2019

2019-10-08T13:06:50Z

← Older revision		Revision as of 13:06, 8 October 2019
Line 5:		Line 5:
	=== Callable Entry Points ===		=== Callable Entry Points ===

	==== D FULL^VALM1 (~~resotre~~ full screen scroll region) ====		==== D FULL^VALM1 (restore full screen scroll region) ====

			==== EN^VALM2 (entry selection call) ====

			==== Change Header and force redraw of screen including header ====
			If header needs to be changed,
			KILL VALMHDR
			SET VALMBCK="R".
			Then List Manager will automatically invoke this [[FILE LIST TEMPLATE FIELD HEADER CODE]] as part of the re-display of the screen.