skill code for design Sheet Size need help

There can be no possible impact to not having standard design extents. That said. I understand why you would be reluctant to fight a long-standing company norm and large extents shouldn't cause any problems other than zoom-world will cause you to lose your part on the screen.

This code might help you with dimension checking:

defun( DE_DimensionParametersCheck ()
let((exts, maxExt, txtBlk, arrowWidth, arrowLength, paramFileName, p, ln, data, dimTxtBlk, dimArrowWidth, dimArrowLength, msg, flag)
exts = axlExtentDB()
when(exts, maxExt = max(x2(exts) - x1(exts), y2(exts) - y1(exts)))
txtBlk = cond((!exts || maxExt > axlMKSConvert(5.0, "mm"), "2"), (maxExt < axlMKSConvert(2.0, "mm"), "3"), (t, "1"))
arrowWidth = case(txtBlk, ("1", 0.25), ("2", 0.625), ("3", 0.125))
arrowLength = arrowWidth * 2
paramFileName = strcat(getTempDir(), "\\", axlCurrentDesign(), "commandParams.prm")
if(axlExportXmlDBRecords(paramFileName, '("Application or Command Parameters")) then
p = axlDMOpenFile("ALLEGRO_PARAMETER_FILE", paramFileName, "r")
while(p && gets(ln, p) && !(dimTxtBlk && dimArrowWidth)
when(ln
data = parseString(DE_Ltrim(ln), "<>")
case(car(data)
("dt_textblock", dimTxtBlk = cadr(data)); <dt_textblock>2</dt_textblock>
("dl_arrowlen_l", dimArrowLength = axlMKS2UU(cadr(data))); <dl_arrowlen_l>1.250 MM</dl_arrowlen_l>
("dl_arrowwid_l", dimArrowWidth = axlMKS2UU(cadr(data))); <dl_arrowwid_l>0.625 MM</dl_arrowwid_l>
)
)
)
axlDMClose(p)
deleteFile(paramFileName)
unless(dimTxtBlk, flag = "?")
and(
dimTxtBlk
msg = list("ERROR", sprintf(nil, "Dimension Text Block is %s - should be %s", dimTxtBlk || "empty", txtBlk))
dimTxtBlk == txtBlk
msg = list("ERROR", sprintf(nil, "Dimension Arrow Head width (%g) - should be %g.", dimArrowWidth, arrowWidth))
axlGeoEqual(arrowWidth, dimArrowWidth)
msg = list("ERROR", sprintf(nil, "Dimension Arrow Head length (%g) - should be %g.", dimArrowLength, arrowLength))
axlGeoEqual(arrowLength, dimArrowLength)
msg = list("OK", "Dimension settings appear to be OK")
flag = t
)
else
msg = list("ERROR", "Could not export design parameters to a file in your temp folder")
)
msg
))

defun( DE_Ltrim (txt @optional (ch " "), "St"), while(txt && substring(txt, 1, strlen(ch)) == ch, txt = substring(txt, strlen(ch) + 1)), txt || "")

There can be no possible impact to not having standard design extents. That said. I understand why you would be reluctant to fight a long-standing company norm and large extents shouldn't cause any problems other than zoom-world will cause you to lose your part on the screen.

This code might help you with dimension checking:

defun( DE_DimensionParametersCheck ()
let((exts, maxExt, txtBlk, arrowWidth, arrowLength, paramFileName, p, ln, data, dimTxtBlk, dimArrowWidth, dimArrowLength, msg, flag)
exts = axlExtentDB()
when(exts, maxExt = max(x2(exts) - x1(exts), y2(exts) - y1(exts)))
txtBlk = cond((!exts || maxExt > axlMKSConvert(5.0, "mm"), "2"), (maxExt < axlMKSConvert(2.0, "mm"), "3"), (t, "1"))
arrowWidth = case(txtBlk, ("1", 0.25), ("2", 0.625), ("3", 0.125))
arrowLength = arrowWidth * 2
paramFileName = strcat(getTempDir(), "\\", axlCurrentDesign(), "commandParams.prm")
if(axlExportXmlDBRecords(paramFileName, '("Application or Command Parameters")) then
p = axlDMOpenFile("ALLEGRO_PARAMETER_FILE", paramFileName, "r")
while(p && gets(ln, p) && !(dimTxtBlk && dimArrowWidth)
when(ln
data = parseString(DE_Ltrim(ln), "<>")
case(car(data)
("dt_textblock", dimTxtBlk = cadr(data)); <dt_textblock>2</dt_textblock>
("dl_arrowlen_l", dimArrowLength = axlMKS2UU(cadr(data))); <dl_arrowlen_l>1.250 MM</dl_arrowlen_l>
("dl_arrowwid_l", dimArrowWidth = axlMKS2UU(cadr(data))); <dl_arrowwid_l>0.625 MM</dl_arrowwid_l>
)
)
)
axlDMClose(p)
deleteFile(paramFileName)
unless(dimTxtBlk, flag = "?")
and(
dimTxtBlk
msg = list("ERROR", sprintf(nil, "Dimension Text Block is %s - should be %s", dimTxtBlk || "empty", txtBlk))
dimTxtBlk == txtBlk
msg = list("ERROR", sprintf(nil, "Dimension Arrow Head width (%g) - should be %g.", dimArrowWidth, arrowWidth))
axlGeoEqual(arrowWidth, dimArrowWidth)
msg = list("ERROR", sprintf(nil, "Dimension Arrow Head length (%g) - should be %g.", dimArrowLength, arrowLength))
axlGeoEqual(arrowLength, dimArrowLength)
msg = list("OK", "Dimension settings appear to be OK")
flag = t
)
else
msg = list("ERROR", "Could not export design parameters to a file in your temp folder")
)
msg
))

defun( DE_Ltrim (txt @optional (ch " "), "St"), while(txt && substring(txt, 1, strlen(ch)) == ch, txt = substring(txt, strlen(ch) + 1)), txt || "")